From: Emden R. Gansner <erg@research.att.com>
Date: Thu, 6 Jun 2013 17:37:25 +0000 (-0400)
Subject: On edge creation, move call to agbindrec from non-cgraph to cgraph fork.
X-Git-Tag: LAST_LIBGRAPH~32^2~192
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=ba5353d809b1d6858a18a11f9a7c54e87f10fee9;p=graphviz

On edge creation, move call to agbindrec from non-cgraph to cgraph fork.
---

diff --git a/tclpkg/tcldot/tcldot-graphcmd.c b/tclpkg/tcldot/tcldot-graphcmd.c
index 6af696fc9..60fc8323b 100644
--- a/tclpkg/tcldot/tcldot-graphcmd.c
+++ b/tclpkg/tcldot/tcldot-graphcmd.c
@@ -117,9 +117,9 @@ int graphcmd(ClientData clientData, Tcl_Interp * interp,
 	}
 #ifndef WITH_CGRAPH
 	e = agedge(g, tail, head);
-	agbindrec(ce, "Agedgeinfo_t", sizeof(Agedgeinfo_t), TRUE);
 #else
 	e = agedge(g, tail, head, NULL, 1);
+	agbindrec(e, "Agedgeinfo_t", sizeof(Agedgeinfo_t), TRUE);
 	Tcl_AppendResult(interp, obj2cmd(e), NULL);
 #endif
 #ifndef WITH_CGRAPH