diff options
Diffstat (limited to 'Perl/demos')
-rw-r--r-- | Perl/demos/Tk/demos/zinc_lib/tiger.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Perl/demos/Tk/demos/zinc_lib/tiger.pl b/Perl/demos/Tk/demos/zinc_lib/tiger.pl index 1700501..218c764 100644 --- a/Perl/demos/Tk/demos/zinc_lib/tiger.pl +++ b/Perl/demos/Tk/demos/zinc_lib/tiger.pl @@ -30,7 +30,7 @@ esc for getting help on ZincDebug functions. "; my $clip= $zinc->add('curve',1, - [ [0,150], [150,0], [470,20], [580, 200], [600,300], [500,560], [50,550], [10,450], [100,480] ], + [ [0,150], [150,0], [470,20], [580, 200], [600,300], [500,560], [50,550], [10,450] ], -closed => 1, -visible => 0); $zinc->itemconfigure(1, -clip => $clip); |