diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2020-07-22 20:06:54 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2020-07-22 20:06:54 (GMT) |
commit | 562a649a1f5145e6563ca33766d5030c17782006 (patch) | |
tree | 9dae88caa104812b1a3bc0941901a37fd39c8748 /tests/barpen.tcl | |
parent | 7f27a43cedb771534c895921dd84eede4cd48874 (diff) | |
download | blt-562a649a1f5145e6563ca33766d5030c17782006.zip blt-562a649a1f5145e6563ca33766d5030c17782006.tar.gz blt-562a649a1f5145e6563ca33766d5030c17782006.tar.bz2 |
fix tkblt tests
Diffstat (limited to 'tests/barpen.tcl')
-rw-r--r-- | tests/barpen.tcl | 78 |
1 files changed, 39 insertions, 39 deletions
diff --git a/tests/barpen.tcl b/tests/barpen.tcl index d06928b..6f77889 100644 --- a/tests/barpen.tcl +++ b/tests/barpen.tcl @@ -1,50 +1,50 @@ source base.tcl set w .bar -set graph [bltBarGraph $w] +set bltgr [bltBarGraph $w] -$graph pen create foo -color red -showvalues y -$graph element configure data2 -pen foo +$bltgr pen create foo -color red -showvalues y +$bltgr element configure data2 -pen foo puts stderr "Testing Bar Pen..." -bltTest3 $graph pen foo -background yellow $dops -bltTest3 $graph pen foo -bd 4 $dops -bltTest3 $graph pen foo -bg yellow $dops -bltTest3 $graph pen foo -borderwidth 4 $dops -bltTest3 $graph pen foo -color yellow $dops -bltTest3 $graph pen foo -errorbarcolor green $dops -bltTest3 $graph pen foo -errorbarwidth 2 $dops -bltTest3 $graph pen foo -errorbarcap 10 $dops -bltTest3 $graph pen foo -fg yellow $dops -bltTest3 $graph pen foo -fill cyan $dops -bltTest3 $graph pen foo -foreground green $dops -bltTest3 $graph pen foo -outline red $dops -bltTest3 $graph pen foo -relief flat $dops -bltTest3 $graph pen foo -showerrorbars no $dops -bltTest3 $graph pen foo -showvalues none $dops -bltTest3 $graph pen foo -showvalues x $dops -bltTest3 $graph pen foo -showvalues both $dops -bltTest3 $graph pen foo -valueanchor nw $dops -bltTest3 $graph pen foo -valueanchor n $dops -bltTest3 $graph pen foo -valueanchor ne $dops -bltTest3 $graph pen foo -valueanchor e $dops -bltTest3 $graph pen foo -valueanchor se $dops -bltTest3 $graph pen foo -valueanchor s $dops -bltTest3 $graph pen foo -valueanchor sw $dops -bltTest3 $graph pen foo -valueanchor w $dops -bltTest3 $graph pen foo -valuecolor cyan $dops -bltTest3 $graph pen foo -valuefont {times 18 bold italic} $dops -bltTest3 $graph pen foo -valueformat "%e" $dops -bltTest3 $graph pen foo -valuerotate 45 $dops +bltTest3 $bltgr pen foo -background yellow $dops +bltTest3 $bltgr pen foo -bd 4 $dops +bltTest3 $bltgr pen foo -bg yellow $dops +bltTest3 $bltgr pen foo -borderwidth 4 $dops +bltTest3 $bltgr pen foo -color yellow $dops +bltTest3 $bltgr pen foo -errorbarcolor green $dops +bltTest3 $bltgr pen foo -errorbarwidth 2 $dops +bltTest3 $bltgr pen foo -errorbarcap 10 $dops +bltTest3 $bltgr pen foo -fg yellow $dops +bltTest3 $bltgr pen foo -fill cyan $dops +bltTest3 $bltgr pen foo -foreground green $dops +bltTest3 $bltgr pen foo -outline red $dops +bltTest3 $bltgr pen foo -relief flat $dops +bltTest3 $bltgr pen foo -showerrorbars no $dops +bltTest3 $bltgr pen foo -showvalues none $dops +bltTest3 $bltgr pen foo -showvalues x $dops +bltTest3 $bltgr pen foo -showvalues both $dops +bltTest3 $bltgr pen foo -valueanchor nw $dops +bltTest3 $bltgr pen foo -valueanchor n $dops +bltTest3 $bltgr pen foo -valueanchor ne $dops +bltTest3 $bltgr pen foo -valueanchor e $dops +bltTest3 $bltgr pen foo -valueanchor se $dops +bltTest3 $bltgr pen foo -valueanchor s $dops +bltTest3 $bltgr pen foo -valueanchor sw $dops +bltTest3 $bltgr pen foo -valueanchor w $dops +bltTest3 $bltgr pen foo -valuecolor cyan $dops +bltTest3 $bltgr pen foo -valuefont {times 18 bold italic} $dops +bltTest3 $bltgr pen foo -valueformat "%e" $dops +bltTest3 $bltgr pen foo -valuerotate 45 $dops -bltCmd $graph pen cget foo -color -bltCmd $graph pen configure foo -bltCmd $graph pen configure foo -color -bltCmd $graph pen create bar -bltCmd $graph pen delete bar -bltCmd $graph pen names -bltCmd $graph pen type foo +bltCmd $bltgr pen cget foo -color +bltCmd $bltgr pen configure foo +bltCmd $bltgr pen configure foo -color +bltCmd $bltgr pen create bar +bltCmd $bltgr pen delete bar +bltCmd $bltgr pen names +bltCmd $bltgr pen type foo puts stderr "done" bltPlotDestroy $w |