From f2f37374e45e8fe44fd80704895ee502a7c88d17 Mon Sep 17 00:00:00 2001
From: ellson <devnull@localhost>
Date: Sun, 2 Mar 2008 15:22:47 +0000
Subject: [PATCH] Add "folder" shape. 	- patch provided by: Pander
 <pander@users.sourceforge.net>

---
 doc/info/shapegen.tcl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/doc/info/shapegen.tcl b/doc/info/shapegen.tcl
index df7379a1d..193fa2681 100755
--- a/doc/info/shapegen.tcl
+++ b/doc/info/shapegen.tcl
@@ -31,6 +31,7 @@ set shapes {
 	none { }
 	note {}
 	tab {}
+	folder {}
 	box3d {}
 	component {}
 }
@@ -63,6 +64,6 @@ foreach {shape attrs} $shapes {
 
 	file delete $shape.dot
 }
-	puts $h "  </TR>"
-	puts $h "</TABLE>"
-	close $h
+puts $h "  </TR>"
+puts $h "</TABLE>"
+close $h
-- 
2.40.0