From 34166581d3764ad0bdc5de7c32221c5c598e3044 Mon Sep 17 00:00:00 2001
From: John Ellson <ellson@research.att.com>
Date: Sat, 25 Feb 2012 16:29:39 -0500
Subject: [PATCH] need agbindrec when graph is created

---
 tclpkg/tcldot/tcldot.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/tclpkg/tcldot/tcldot.c b/tclpkg/tcldot/tcldot.c
index 6be52d960..8a0e913ec 100644
--- a/tclpkg/tcldot/tcldot.c
+++ b/tclpkg/tcldot/tcldot.c
@@ -1527,6 +1527,9 @@ static int dotnew(ClientData clientData, Tcl_Interp * interp,
 #endif
 	i = 2;
     }
+#ifdef WITH_CGRAPH
+    agbindrec(g, "Agraphinfo_t", sizeof(Agraphinfo_t), TRUE);
+#endif
     if (!g) {
 	Tcl_AppendResult(interp, "\nFailure to open graph.", NULL);
 	return TCL_ERROR;
-- 
2.40.0