From ce04675ec202300fff7f49884944e34ca67cbdf1 Mon Sep 17 00:00:00 2001
From: mertz
Date: Fri, 16 May 2003 08:48:08 +0000
Subject: the contour used to make a not rectangulaire window (Xfree shape
 extension) has been made cocave so to go around a TkZinc bug

---
 Perl/demos/Tk/demos/zinc_lib/tiger.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Perl/demos/Tk')

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);
-- 
cgit v1.1