From 15a3474aede2b22d277310e4302ea1a8bbd00fcc Mon Sep 17 00:00:00 2001
From: Bill Fenner <fenner@fenron.net>
Date: Wed, 30 May 2007 14:24:05 +0000
Subject: [PATCH] Annotate output graph with a parallelogram node with the
 model name.  - Legacy-Id: 183

---
 ietf/bin/graphall | 14 ++++++++++++--
 1 file changed, 12 insertions(+), 2 deletions(-)

diff --git a/ietf/bin/graphall b/ietf/bin/graphall
index eae75546b..ee512ec1d 100755
--- a/ietf/bin/graphall
+++ b/ietf/bin/graphall
@@ -13,5 +13,15 @@ do
 	then
 		python modelviz.py $d
 	fi
-done > models.dot
-unflatten -f -l 10 models.dot | dot -Tps -Gsize=10.5,8.0 -Gmargin=0.25 -Gratio=auto -Grotate=90 | sed -e 's/ Bold/-Bold/' > models.ps
+done | unflatten -f -l 10 | gvpr -c '
+BEG_G {
+	node_t title = node($G, "title");
+	title.shape="parallelogram";
+	string model = $G.name;
+	model = sub(model, "^ietf.");
+	model = sub(model, ".models$");
+	title.label = model;
+	title.fontsize = 24;
+}
+' > models.dot
+dot -Tps -Gsize=10.5,8.0 -Gmargin=0.25 -Gratio=auto -Grotate=90 models.dot | sed -e 's/ Bold/-Bold/' > models.ps