diff options
| -rw-r--r-- | library/demos/items.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/library/demos/items.tcl b/library/demos/items.tcl index aca37c2..be9214a 100644 --- a/library/demos/items.tcl +++ b/library/demos/items.tcl @@ -94,14 +94,14 @@ $c create line 12c 6c 13.5c 4.5c 16.5c 7.5c 18c 6c \ $c create text 25c .2c -text Polygons -anchor n $c create polygon 21c 1.0c 22.5c 1.75c 24c 1.0c 23.25c 2.5c \ - 24c 4.0c 22.5c 3.25c 21c 4.0c 21.75c 2.5c -outline $green \ - -width 4 -tags item + 24c 4.0c 22.5c 3.25c 21c 4.0c 21.75c 2.5c -fill $green \ + -outline {} -width 4 -tags item $c create polygon 25c 4c 25c 4c 25c 1c 26c 1c 27c 4c 28c 1c \ 29c 1c 29c 4c 29c 4c -fill $red -outline {} -smooth on -tags item $c create polygon 22c 4.5c 25c 4.5c 25c 6.75c 28c 6.75c \ 28c 5.25c 24c 5.25c 24c 6.0c 26c 6c 26c 7.5c 22c 7.5c \ -stipple @[file join $tk_demoDirectory images gray25.xbm] \ - -fill $blue -tags item + -fill $blue -outline {} -tags item $c create text 5c 8.2c -text Rectangles -anchor n $c create rectangle 1c 9.5c 4c 12.5c -outline $red -width 3m -tags item |