fix crash when trying to create new edge attributes from scripts

diff --git a/tclpkg/gv/gv.cpp b/tclpkg/gv/gv.cpp
index 2c329773d9d4bd1b185e2f30bae7ba3c9ccaf923..577c42466442da5b883c10666f348787c0dff653 100644 (file)
--- a/tclpkg/gv/gv.cpp
+++ b/tclpkg/gv/gv.cpp
@@ -261,7 +261,7 @@ char *setv(Agedge_t *e, char *attr, char *val)
     g = e->tail->graph;
     a = agfindattr(g->proto->e, attr);
     if (!a)
-        a = agnodeattr(g, attr, empty_string);
+        a = agedgeattr(g, attr, empty_string);
     agxset(e, a->index, val);
     return val;
 }