Fix bug in nameOf for edges

diff --git a/lib/gvpr/compile.c b/lib/gvpr/compile.c
index cabc0b73a598fa195df2b43ce1bee3064989b5e3..ba85a12505d6798b1cb7303046a6cfd7792c3544 100644 (file)
--- a/lib/gvpr/compile.c
+++ b/lib/gvpr/compile.c
@@ -100,7 +100,7 @@ static char *nameOf(Expr_t * ex, Agobj_t * obj, Sfio_t* tmps)
        break;
     default:                   /* edge */
        e = (Agedge_t *) obj;
-       key = agnameof(AGMKOUT(obj));
+       key = agnameof(AGMKOUT(e));
        sfputr(tmps, agnameof(AGTAIL(e)), -1);
        if (agisdirected(agraphof(e)))
            sfputr(tmps, "->", -1);