From f6018b2e4b184a2ec9eca7bbd3e2532cc4ed17ed Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Tue, 7 Mar 2000 13:16:09 +0000
Subject: *** empty log message ***

---
 sandbox/testpoly.tcl | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

(limited to 'sandbox/testpoly.tcl')

diff --git a/sandbox/testpoly.tcl b/sandbox/testpoly.tcl
index 1d64a5e..7cb367d 100644
--- a/sandbox/testpoly.tcl
+++ b/sandbox/testpoly.tcl
@@ -13,22 +13,22 @@ set arrow "8 10 6"
 #  Cap        Join   Filled Border Relief Title
 #
 set show {\
-  {round      round  f      t      flat   JoinRound}\
-  {round      bevel  f      t      flat   JoinBevel}\
-  {round      miter  f      t      flat   JoinMiter}\
-  {butt       round  f      t      flat   CapButt}\
-  {projecting round  f      t      flat   CapProjecting}\
-  {round      round  f      t      sunken Sunken}\
-  {round      round  f      t      raised Raised}\
-  {round      round  f      t      groove Groove}\
-  {round      round  f      t      ridge  Ridge}\
-  {round      round  t      t      sunken FilledSunken}\
-  {round      round  t      t      raised FilledRaised}\
-  {round      round  t      t      groove FilledGroove}\
-  {round      round  t      t      ridge  FilledRidge}\
-  {round      round  f      f      flat   Marker}\
-  {round      round  t      f      flat   Fill}\
-  {round      round  t      t      flat   FillBorder}}
+  {round      round  f      1      flat   JoinRound}\
+  {round      bevel  f      1      flat   JoinBevel}\
+  {round      miter  f      1      flat   JoinMiter}\
+  {butt       round  f      1      flat   CapButt}\
+  {projecting round  f      1      flat   CapProjecting}\
+  {round      round  f      1      sunken Sunken}\
+  {round      round  f      1      raised Raised}\
+  {round      round  f      1      groove Groove}\
+  {round      round  f      1      ridge  Ridge}\
+  {round      round  t      1      sunken FilledSunken}\
+  {round      round  t      1      raised FilledRaised}\
+  {round      round  t      1      groove FilledGroove}\
+  {round      round  t      1      ridge  FilledRidge}\
+  {round      round  f      0      flat   Marker}\
+  {round      round  t      0      flat   Fill}\
+  {round      round  t      1      flat   FillBorder}}
 
 image create photo logo -file /usr/share/toccata/images/logo.gif
 #image create photo papier -file /usr/share/toccata/images/dgtexture-dragstrip.xpm
-- 
cgit v1.1