diff options
| author | lecoanet | 2002-12-09 14:20:35 +0000 |
|---|---|---|
| committer | lecoanet | 2002-12-09 14:20:35 +0000 |
| commit | fe6df269930a79ef5deea1bd3cc42104ab5b715b (patch) | |
| tree | 86da392d1cbad9fca643c6453202a659feb25b96 /sandbox/zinc.tcl | |
| parent | 04c4fbe731eb6322c2434f135dfcd843135b3d07 (diff) | |
| download | tkzinc-fe6df269930a79ef5deea1bd3cc42104ab5b715b.zip tkzinc-fe6df269930a79ef5deea1bd3cc42104ab5b715b.tar.gz tkzinc-fe6df269930a79ef5deea1bd3cc42104ab5b715b.tar.bz2 tkzinc-fe6df269930a79ef5deea1bd3cc42104ab5b715b.tar.xz | |
*** empty log message ***
Diffstat (limited to 'sandbox/zinc.tcl')
| -rw-r--r-- | sandbox/zinc.tcl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/sandbox/zinc.tcl b/sandbox/zinc.tcl index e959022..6f632db 100644 --- a/sandbox/zinc.tcl +++ b/sandbox/zinc.tcl @@ -1,7 +1,7 @@ -#!/usr/bin/wish8.0 -f +#!/usr/local/bin/wish -f -load tkzinc3.2.so -#package require Img +load ../tkzinc3.2.so +package require Img set top 1 @@ -96,7 +96,7 @@ set track [.r add track $view 6 -tags track -leaderanchors "|0|0"] -markercolor salmon .r itemconfigure $track -labelformat "120x40 l0l0+0+0 x80x20+0+0 x40x20+80+0 x40x20+0+20 x20x20>3>2 x60x20>1>1" .r itemconfigure $track 0 -filled 1 -backcolor gray -bordercolor gray -relief groove -.r itemconfigure $track 1 -filled 1 -backcolor tan -bordercolot tan -relief groove \ +.r itemconfigure $track 1 -filled 1 -backcolor tan -bordercolor tan -relief groove \ -font "cenapii-etiquette-m17" -text "AFR451" .r itemconfigure $track 2 -text "WPY" \ -font "cenapii-etiquette-m17" |