Added some annotation properties

Bug found by:
Submitted by:
Reviewed by:
Approved by:
Obtained from:

diff --git a/cfgparse.tcl b/cfgparse.tcl
index 402d7979c0fc8ef9a8648fca301034120f4695cf..e13ac9f8c89c3466ffb5450620b1807f8e2d6de4 100755 (executable)
--- a/cfgparse.tcl
+++ b/cfgparse.tcl
@@ -1,4 +1,4 @@
-# $Id: cfgparse.tcl,v 1.15.2.5 2007/07/20 12:57:15 miljenko Exp $ 
+# $Id: cfgparse.tcl,v 1.15.2.6 2007/07/20 15:16:24 miljenko Exp $ 
 #
 # Copyright 2005 University of Zagreb, Croatia.  All rights reserved.
 #
@@ -469,6 +469,15 @@ proc loadCfg { cfg } {
                        effects {
                            lappend $object "effects {$value}"
                        }
+                       width {
+                           lappend $object "width {$value}"
+                       }
+                       border {
+                           lappend $object "border {$value}"
+                       }
+                       rad {
+                           lappend $object "rad {$value}"
+                       }
                    }
                }
            }