From: John Ellson <ellson@research.att.com>
Date: Thu, 7 Aug 2014 20:30:48 +0000 (-0400)
Subject: speacial case setting of html-like labels in tcldot
X-Git-Tag: TRAVIS_CI_BUILD_EXPERIMENTAL~179
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=f8833ed5f02beb0cc70af2ff5b20de2fc85f97ba;p=graphviz

speacial case setting of html-like labels in tcldot
---

diff --git a/tclpkg/tcldot/tcldot-util.c b/tclpkg/tcldot/tcldot-util.c
index eeeccdf2f..a22ceccfd 100644
--- a/tclpkg/tcldot/tcldot-util.c
+++ b/tclpkg/tcldot/tcldot-util.c
@@ -124,6 +124,22 @@ void deleteGraph(gctx_t * gctx, Agraph_t *g)
     Tcl_DeleteCommand(gctx->ictx->interp, hndl);
 }
 
+static void myagxset(void *obj, Agsym_t *a, char *val)
+{
+    int len;
+    char *hs;
+
+    if (a->name[0] == 'l' && val[0] == '<' && strcmp(a->name, "label") == 0) {
+        len = strlen(val);
+        if (val[len-1] == '>') {
+            hs = strdup(val+1);
+                *(hs+len-2) = '\0';
+            val = agstrdup_html(agraphof(obj),hs);
+            free(hs);
+        }
+    }
+    agxset(obj, a, val);
+}
 void setgraphattributes(Agraph_t * g, char *argv[], int argc)
 {
     int i;
@@ -132,7 +148,7 @@ void setgraphattributes(Agraph_t * g, char *argv[], int argc)
     for (i = 0; i < argc; i++) {
 	if (!(a = agfindgraphattr(agroot(g), argv[i])))
 	    a = agattr(agroot(g), AGRAPH, argv[i], "");
-	agxset(g, a, argv[++i]);
+	myagxset(g, a, argv[++i]);
     }
 }
 
@@ -150,7 +166,7 @@ void setedgeattributes(Agraph_t * g, Agedge_t * e, char *argv[], int argc)
 	if (e) {
 	    if (!(a = agfindedgeattr(g, argv[i])))
 		a = agattr(agroot(g), AGEDGE, argv[i], "");
-	    agxset(e, a, argv[++i]);
+	    myagxset(e, a, argv[++i]);
 	}
 	else {
 	    agattr(g, AGEDGE, argv[i], argv[i+1]);
@@ -168,7 +184,7 @@ void setnodeattributes(Agraph_t * g, Agnode_t * n, char *argv[], int argc)
 	if (n) {
 	    if (!(a = agfindnodeattr(g, argv[i])))
 		a = agattr(agroot(g), AGNODE, argv[i], "");
-	    agxset(n, a, argv[++i]);
+	    myagxset(n, a, argv[++i]);
 	}
 	else {
 	    agattr(g, AGNODE, argv[i], argv[i+1]);