From 18a7dc0bc8242a556e4eea57b70bf92616a8948a Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Wed, 5 Oct 2005 08:52:50 +0000
Subject: Slightly modified the script to better conform to the book example.

---
 demos/fillRule.tcl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'demos')

diff --git a/demos/fillRule.tcl b/demos/fillRule.tcl
index 8817709..1e1b016 100644
--- a/demos/fillRule.tcl
+++ b/demos/fillRule.tcl
@@ -60,7 +60,7 @@ of "The OpenGL Programming Guide 3rd Edition" V 1.2}
     variable g3 [$w.zinc add group $group]
     variable curve3 [$w.zinc add curve $g3 {}]
     $w.zinc contour $curve3 add +1 { 20 0 20 120 100 120 100 0 20 0}
-    $w.zinc contour $curve3 add +1 { 40 20 60 120 80 20 40 20}
+    $w.zinc contour $curve3 add +1 { 40 20 60 140 80 20 40 20}
     $w.zinc contour $curve3 add +1 { 0 60 0 80 120 80 120 60 0 60}
     $w.zinc translate $g3 420 100
     
@@ -82,7 +82,7 @@ of "The OpenGL Programming Guide 3rd Edition" V 1.2}
 	set t [$w.zinc add text $group -text $fillrule]
 	$w.zinc translate $t -110 [expr 100+$dy]
 	foreach item "$curve1 $curve2 $curve3 $curve4" {
-	    set clone [$w.zinc clone $item -fillrule $fillrule -filled 1]
+	    set clone [$w.zinc clone $item -fillrule $fillrule -filled 1 -linewidth 0]
 	    $w.zinc translate $clone 0 $dy
 	}
     }
-- 
cgit v1.1