From 726263a100064e866738251613206d3eddd0acaa Mon Sep 17 00:00:00 2001 From: lecoanet Date: Mon, 10 Jun 2002 13:12:22 +0000 Subject: *** empty log message *** --- sandbox/lines.pl | 3 +-- sandbox/testtext.tcl | 2 +- 2 files changed, 2 insertions(+), 3 deletions(-) (limited to 'sandbox') diff --git a/sandbox/lines.pl b/sandbox/lines.pl index d4ca52d..794de7b 100644 --- a/sandbox/lines.pl +++ b/sandbox/lines.pl @@ -37,8 +37,7 @@ $mp3 = $zinc->add('curve', $view, [20, 280, 100, 430, 200, 430], # -firstend => [3, 12, 8], # -lastend => "12 12 8", -capstyle => 'round', - -linecolor => 'red', - -linealpha => 100); + -linecolor => 'red:100'); new Controls($zinc); $mw->Tk::bind('

', sub { print "perfs: ", join(',', $zinc->monitor()), "\n" }); diff --git a/sandbox/testtext.tcl b/sandbox/testtext.tcl index 3a88023..9b41d4d 100644 --- a/sandbox/testtext.tcl +++ b/sandbox/testtext.tcl @@ -1,6 +1,6 @@ #!/usr/bin/wish8.0 -f -load tkzinc3.1.so +load tkzinc3.2.so #package require Img set mask "/usr/X11R6/include/X11/bitmaps/fvwm.xbm" -- cgit v1.1