summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorjoye <joye>2014-06-16 18:34:47 (GMT)
committerjoye <joye>2014-06-16 18:34:47 (GMT)
commit271f5abb7cfcd54a8edfaeb16b61357ef9262ea0 (patch)
tree2ba3a32573254052bac7869909e557e55f5ee32b /tests
parent92531dc3020f4dfdca47d47085105840af77cfa3 (diff)
downloadblt-271f5abb7cfcd54a8edfaeb16b61357ef9262ea0.zip
blt-271f5abb7cfcd54a8edfaeb16b61357ef9262ea0.tar.gz
blt-271f5abb7cfcd54a8edfaeb16b61357ef9262ea0.tar.bz2
*** empty log message ***
Diffstat (limited to 'tests')
-rw-r--r--tests/axis.tcl110
-rw-r--r--tests/barelement.tcl90
-rw-r--r--tests/bargraph.tcl92
-rw-r--r--tests/barpen.tcl44
-rw-r--r--tests/base.tcl21
-rw-r--r--tests/bitmapmarker.tcl36
-rw-r--r--tests/crosshairs.tcl12
-rw-r--r--tests/legend.tcl86
-rw-r--r--tests/lineelement.tcl118
-rw-r--r--tests/linegraph.tcl84
-rw-r--r--tests/linemarker.tcl36
-rw-r--r--tests/linepen.tcl52
-rw-r--r--tests/polygonmarker.tcl38
-rw-r--r--tests/test.tcl2
-rw-r--r--tests/textmarker.tcl42
15 files changed, 438 insertions, 425 deletions
diff --git a/tests/axis.tcl b/tests/axis.tcl
index d6fd914..dfa4a11 100644
--- a/tests/axis.tcl
+++ b/tests/axis.tcl
@@ -10,61 +10,61 @@ bltCmd $graph axis activate y
echo "Testing Axis..."
bltCmd $graph axis configure x
-bltTest3 $graph axis y -activeforeground red
-bltTest3 $graph axis y -activerelief sunken
-#bltTest3 $graph axis x -autorange 10
-bltTest3 $graph axis x -background yellow
-bltTest3 $graph axis x -bg blue
-#bltTest3 $graph axis x -bindtags
-bltTest3 $graph axis y -bd 4
-bltTest3 $graph axis y -borderwidth 4
-#bltTest3 $graph axis x -checklimits
-bltTest3 $graph axis x -color red
-#bltTest3 $graph axis x -command
-bltTest3 $graph axis x -descending yes
-bltTest3 $graph axis x -exterior no
-bltTest3 $graph axis x -fg magenta
-bltTest3 $graph axis x -foreground yellow
-bltTest3 $graph axis x -grid no
-bltTest3 $graph axis x -gridcolor blue
-bltTest3 $graph axis x -griddashes {8 3}
-bltTest3 $graph axis x -gridlinewidth 2
-bltTest3 $graph axis x -gridminor no
-bltTest3 $graph axis x -gridminorcolor blue
-bltTest3 $graph axis x -gridminordashes {8 3}
-bltTest3 $graph axis x -gridminorlinewidth 2
-bltTest3 $graph axis x -hide yes
-bltTest3 $graph axis x -justify left
-bltTest3 $graph axis x -labeloffset yes
-bltTest3 $graph axis x -limitscolor red
-bltTest3 $graph axis x -limitsfont "times 18 bold italic"
-bltTest3 $graph axis x -limitsformat "%e"
-bltTest3 $graph axis x -linewidth 2
-bltTest3 $graph axis x -logscale yes
-#bltTest3 $graph axis x -loosemin
-#bltTest3 $graph axis x -loosemax
-#bltTest3 $graph axis x -majorticks
-#bltTest3 $graph axis x -max
-#bltTest3 $graph axis x -min
-#bltTest3 $graph axis x -minorticks
-bltTest3 $graph axis x -relief groove
-bltTest3 $graph axis x -rotate 45
-#bltTest3 $graph axis x -scrollcommand
-#bltTest3 $graph axis x -scrollincrement
-#bltTest3 $graph axis x -scrollmax
-#bltTest3 $graph axis x -scrollmin
-##bltTest3 $graph axis x -shiftby 10
-bltTest3 $graph axis x -showticks no
-bltTest3 $graph axis x -stepsize 10
-bltTest3 $graph axis x -subdivisions 4
-##bltTest3 $graph axis x -tickanchor n
-bltTest3 $graph axis x -tickfont {times 12 bold italic}
-bltTest3 $graph axis x -ticklength 20
-bltTest3 $graph axis x -tickdefault 10
-bltTest3 $graph axis x -title {This is a Title}
-bltTest3 $graph axis x -titlealternate yes
-bltTest3 $graph axis x -titlecolor yellow
-bltTest3 $graph axis x -titlefont {times 24 bold italic}
+bltTest3 $graph axis y -activeforeground red $dops
+bltTest3 $graph axis y -activerelief sunken $dops
+#bltTest3 $graph axis x -autorange 10 $dops
+bltTest3 $graph axis x -background yellow $dops
+bltTest3 $graph axis x -bg blue $dops
+bltTest3 $graph axis x -bindtags {aa} 0
+bltTest3 $graph axis y -bd 4 $dops
+bltTest3 $graph axis y -borderwidth 4 $dops
+#bltTest3 $graph axis x -checklimits $dops
+bltTest3 $graph axis x -color red $dops
+#bltTest3 $graph axis x -command $dops
+bltTest3 $graph axis x -descending yes $dops
+bltTest3 $graph axis x -exterior no $dops
+bltTest3 $graph axis x -fg magenta $dops
+bltTest3 $graph axis x -foreground yellow $dops
+bltTest3 $graph axis x -grid no $dops
+bltTest3 $graph axis x -gridcolor blue $dops
+bltTest3 $graph axis x -griddashes {8 3} $dops
+bltTest3 $graph axis x -gridlinewidth 2 $dops
+bltTest3 $graph axis x -gridminor no $dops
+bltTest3 $graph axis x -gridminorcolor blue $dops
+bltTest3 $graph axis x -gridminordashes {8 3} $dops
+bltTest3 $graph axis x -gridminorlinewidth 2 $dops
+bltTest3 $graph axis x -hide yes $dops
+bltTest3 $graph axis x -justify left $dops
+bltTest3 $graph axis x -labeloffset yes $dops
+bltTest3 $graph axis x -limitscolor red $dops
+bltTest3 $graph axis x -limitsfont {times 18 bold italic} $dops
+bltTest3 $graph axis x -limitsformat "%e" $dops
+bltTest3 $graph axis x -linewidth 2 $dops
+bltTest3 $graph axis x -logscale yes $dops
+#bltTest3 $graph axis x -loosemin $dops
+#bltTest3 $graph axis x -loosemax $dops
+#bltTest3 $graph axis x -majorticks $dops
+#bltTest3 $graph axis x -max $dops
+#bltTest3 $graph axis x -min $dops
+#bltTest3 $graph axis x -minorticks $dops
+bltTest3 $graph axis x -relief groove $dops
+bltTest3 $graph axis x -rotate 45 $dops
+#bltTest3 $graph axis x -scrollcommand $dops
+#bltTest3 $graph axis x -scrollincrement $dops
+#bltTest3 $graph axis x -scrollmax $dops
+#bltTest3 $graph axis x -scrollmin $dops
+##bltTest3 $graph axis x -shiftby 10 $dops
+bltTest3 $graph axis x -showticks no $dops
+bltTest3 $graph axis x -stepsize 10 $dops
+bltTest3 $graph axis x -subdivisions 4 $dops
+##bltTest3 $graph axis x -tickanchor n $dops
+bltTest3 $graph axis x -tickfont {times 12 bold italic} $dops
+bltTest3 $graph axis x -ticklength 20 $dops
+bltTest3 $graph axis x -tickdefault 10 $dops
+bltTest3 $graph axis x -title {This is a Title} $dops
+bltTest3 $graph axis x -titlealternate yes $dops
+bltTest3 $graph axis x -titlecolor yellow $dops
+bltTest3 $graph axis x -titlefont {times 24 bold italic} $dops
#bltCmd $graph axis activate foo
#bltCmd $graph axis bind x
diff --git a/tests/barelement.tcl b/tests/barelement.tcl
index 5574432..414d14c 100644
--- a/tests/barelement.tcl
+++ b/tests/barelement.tcl
@@ -12,51 +12,51 @@ $graph element activate data3
echo "Testing Bar Element..."
bltCmd $graph element data1 configure
-bltTest3 $graph element data3 -activepen foo
-bltTest3 $graph element data2 -background yellow
-bltTest3 $graph element data2 -barwidth 1
-bltTest3 $graph element data2 -bd 4
-bltTest3 $graph element data2 -bg yellow
-#bltTest3 $graph element data2 -bindtags
-bltTest3 $graph element data2 -borderwidth 4
-bltTest3 $graph element data2 -color yellow
-bltTest3 $graph element data1 -data {0.2 8 0.4 20 0.6 31 0.8 41 1.0 50 1.2 59 1.4 65 1.6 70 1.8 75 2.0 85}
-bltTest3 $graph element data2 -errorbarcolor green
-bltTest3 $graph element data2 -errorbarwidth 2
-bltTest3 $graph element data2 -errorbarcap 10
-bltTest3 $graph element data2 -fg yellow
-bltTest3 $graph element data1 -fill cyan
-bltTest3 $graph element data2 -foreground green
-bltTest3 $graph element data2 -hide yes
-bltTest3 $graph element data2 -label "This is a test"
-bltTest3 $graph element data2 -legendrelief groove
-bltTest3 $graph element data2 -mapx x2
-bltTest3 $graph element data2 -mapy y2
-bltTest3 $graph element data1 -outline red
-bltTest3 $graph element data2 -pen foo
-bltTest3 $graph element data2 -relief flat
-bltTest3 $graph element data2 -showerrorbars no
-bltTest3 $graph element data1 -showvalues none
-bltTest3 $graph element data1 -showvalues x
-bltTest3 $graph element data1 -showvalues both
-#bltTest3 $graph element data2 -stack
-#bltTest3 $graph element data2 -styles
-bltTest3 $graph element data1 -valueanchor n
-bltTest3 $graph element data1 -valuecolor cyan
-bltTest3 $graph element data1 -valuefont "times 18 bold italic"
-bltTest3 $graph element data1 -valueformat "%e"
-bltTest3 $graph element data1 -valuerotate 45
-#bltTest3 $graph element data2 -weights
-bltTest3 $graph element data1 -x {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8}
-bltTest3 $graph element data1 -xdata {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8}
-bltTest3 $graph element data2 -xerror {.1 .1 .1 .1 .1 .1 .1 .1 .1 .1 .1}
-#bltTest3 $graph element data2 -xhigh
-#bltTest3 $graph element data2 -xlow
-bltTest3 $graph element data1 -y {8 20 31 41 50 59 65 70 75 85}
-bltTest3 $graph element data1 -ydata {8 20 31 41 50 59 65 70 75 85}
-bltTest3 $graph element data2 -yerror {5 5 5 5 5 5 5 5 5 5 5}
-#bltTest3 $graph element data2 -yhigh
-#bltTest3 $graph element data2 -ylow
+bltTest3 $graph element data3 -activepen foo $dops
+bltTest3 $graph element data2 -background yellow $dops
+bltTest3 $graph element data2 -barwidth 1 $dops
+bltTest3 $graph element data2 -bd 4 $dops
+bltTest3 $graph element data2 -bg yellow $dops
+bltTest3 $graph element data2 -bindtags {aa} 0
+bltTest3 $graph element data2 -borderwidth 4 $dops
+bltTest3 $graph element data2 -color yellow $dops
+bltTest3 $graph element data1 -data {0.2 8 0.4 20 0.6 31 0.8 41 1.0 50 1.2 59 1.4 65 1.6 70 1.8 75 2.0 85} $dops
+bltTest3 $graph element data2 -errorbarcolor green $dops
+bltTest3 $graph element data2 -errorbarwidth 2 $dops
+bltTest3 $graph element data2 -errorbarcap 10 $dops
+bltTest3 $graph element data2 -fg yellow $dops
+bltTest3 $graph element data1 -fill cyan $dops
+bltTest3 $graph element data2 -foreground green $dops
+bltTest3 $graph element data2 -hide yes $dops
+bltTest3 $graph element data2 -label "This is a test" $dops
+bltTest3 $graph element data2 -legendrelief groove $dops
+bltTest3 $graph element data2 -mapx x2 $dops
+bltTest3 $graph element data2 -mapy y2 $dops
+bltTest3 $graph element data1 -outline red $dops
+bltTest3 $graph element data2 -pen foo $dops
+bltTest3 $graph element data2 -relief flat $dops
+bltTest3 $graph element data2 -showerrorbars no $dops
+bltTest3 $graph element data1 -showvalues none $dops
+bltTest3 $graph element data1 -showvalues x $dops
+bltTest3 $graph element data1 -showvalues both $dops
+#bltTest3 $graph element data2 -stack $dops
+#bltTest3 $graph element data2 -styles $dops
+bltTest3 $graph element data1 -valueanchor n $dops
+bltTest3 $graph element data1 -valuecolor cyan $dops
+bltTest3 $graph element data1 -valuefont {times 18 bold italic} $dops
+bltTest3 $graph element data1 -valueformat "%e" $dops
+bltTest3 $graph element data1 -valuerotate 45 $dops
+#bltTest3 $graph element data2 -weights $dops
+bltTest3 $graph element data1 -x {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8} $dops
+bltTest3 $graph element data1 -xdata {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8} $dops
+bltTest3 $graph element data2 -xerror {.1 .1 .1 .1 .1 .1 .1 .1 .1 .1 .1} $dops
+#bltTest3 $graph element data2 -xhigh $dops
+#bltTest3 $graph element data2 -xlow $dops
+bltTest3 $graph element data1 -y {8 20 31 41 50 59 65 70 75 85} $dops
+bltTest3 $graph element data1 -ydata {8 20 31 41 50 59 65 70 75 85} $dops
+bltTest3 $graph element data2 -yerror {5 5 5 5 5 5 5 5 5 5 5} $dops
+#bltTest3 $graph element data2 -yhigh $dops
+#bltTest3 $graph element data2 -ylow $dops
bltCmd $graph element activate data2
bltCmd $graph element deactivate data2
diff --git a/tests/bargraph.tcl b/tests/bargraph.tcl
index a4d0097..c9a77aa 100644
--- a/tests/bargraph.tcl
+++ b/tests/bargraph.tcl
@@ -7,52 +7,52 @@ echo "Testing Bar Graph..."
bltCmd $graph configure
# Graph
-bltTest $graph -aspect 2
-bltTest $graph -background red
-bltTest $graph -barmode stacked
-bltTest $graph -barmode aligned
-bltTest $graph -barmode overlap
-bltTest $graph -barwidth .15
-#bltTest $graph -baseline
-bltTest $graph -bd 50
-bltTest $graph -bg green
-bltTest $graph -bm 50
-bltTest $graph -borderwidth 50
-bltTest $graph -bottommargin 50
-#bltTest $graph -bufferelements
-#bltTest $graph -buffergraph
-bltTest $graph -cursor cross
-bltTest $graph -fg blue
-bltTest $graph -font {times 36 bold italic}
-bltTest $graph -foreground cyan
-#bltTest $graph -halo
-bltTest $graph -height 300
-#bltTest $graph -highlightbackground
-#bltTest $graph -highlightcolor
-#bltTest $graph -highlightthickness
-bltTest $graph -invertxy yes
-bltTest $graph -justify left
-bltTest $graph -leftmargin 50
-bltTest $graph -lm 50
-bltTest $graph -plotbackground cyan
-bltTest $graph -plotborderwidth 50
-bltTest $graph -plotpadx 50
-bltTest $graph -plotpady 50
-bltTest $graph -plotrelief groove
-bltTest $graph -relief groove
-bltTest $graph -rightmargin 50
-bltTest $graph -rm 50
-#bltTest $graph -searchhalo
-#bltTest $graph -searchmode
-#bltTest $graph -searchalong
-#bltTest $graph -stackaxes
-#bltTest $graph -takefocus
-bltTest $graph -title "This is a Title"
-bltTest $graph -tm 50
-bltTest $graph -topmargin 50
-bltTest $graph -width 300
-bltTest $graph -plotwidth 300
-bltTest $graph -plotheight 300
+bltTest $graph -aspect 2 $dops
+bltTest $graph -background red $dops
+bltTest $graph -barmode stacked $dops
+bltTest $graph -barmode aligned $dops
+bltTest $graph -barmode overlap $dops
+bltTest $graph -barwidth .15 $dops
+#bltTest $graph -baseline $dops
+bltTest $graph -bd 50 $dops
+bltTest $graph -bg green $dops
+bltTest $graph -bm 50 $dops
+bltTest $graph -borderwidth 50 $dops
+bltTest $graph -bottommargin 50 $dops
+#bltTest $graph -bufferelements $dops
+#bltTest $graph -buffergraph $dops
+bltTest $graph -cursor cross $dops
+bltTest $graph -fg blue $dops
+bltTest $graph -font {times 36 bold italic} $dops
+bltTest $graph -foreground cyan $dops
+#bltTest $graph -halo $dops
+bltTest $graph -height 300 $dops
+#bltTest $graph -highlightbackground $dops
+#bltTest $graph -highlightcolor $dops
+#bltTest $graph -highlightthickness $dops
+bltTest $graph -invertxy yes $dops
+bltTest $graph -justify left $dops
+bltTest $graph -leftmargin 50 $dops
+bltTest $graph -lm 50 $dops
+bltTest $graph -plotbackground cyan $dops
+bltTest $graph -plotborderwidth 50 $dops
+bltTest $graph -plotpadx 50 $dops
+bltTest $graph -plotpady 50 $dops
+bltTest $graph -plotrelief groove $dops
+bltTest $graph -relief groove $dops
+bltTest $graph -rightmargin 50 $dops
+bltTest $graph -rm 50 $dops
+#bltTest $graph -searchhalo $dops
+#bltTest $graph -searchmode $dops
+#bltTest $graph -searchalong $dops
+#bltTest $graph -stackaxes $dops
+#bltTest $graph -takefocus $dops
+bltTest $graph -title "This is a Title" $dops
+bltTest $graph -tm 50 $dops
+bltTest $graph -topmargin 50 $dops
+bltTest $graph -width 300 $dops
+bltTest $graph -plotwidth 300 $dops
+bltTest $graph -plotheight 300 $dops
##bltCmd $graph axis
bltCmd $graph cget -background
diff --git a/tests/barpen.tcl b/tests/barpen.tcl
index 6189b2a..2a02e50 100644
--- a/tests/barpen.tcl
+++ b/tests/barpen.tcl
@@ -8,28 +8,28 @@ $graph element configure data2 -pen foo
echo "Testing Bar Pen..."
-bltTest3 $graph pen foo -background yellow
-bltTest3 $graph pen foo -bd 4
-bltTest3 $graph pen foo -bg yellow
-bltTest3 $graph pen foo -borderwidth 4
-bltTest3 $graph pen foo -color yellow
-bltTest3 $graph pen foo -errorbarcolor green
-bltTest3 $graph pen foo -errorbarwidth 2
-bltTest3 $graph pen foo -errorbarcap 10
-bltTest3 $graph pen foo -fg yellow
-bltTest3 $graph pen foo -fill cyan
-bltTest3 $graph pen foo -foreground green
-bltTest3 $graph pen foo -outline red
-bltTest3 $graph pen foo -relief flat
-bltTest3 $graph pen foo -showerrorbars no
-bltTest3 $graph pen foo -showvalues none
-bltTest3 $graph pen foo -showvalues x
-bltTest3 $graph pen foo -showvalues both
-bltTest3 $graph pen foo -valueanchor n
-bltTest3 $graph pen foo -valuecolor cyan
-bltTest3 $graph pen foo -valuefont "times 18 bold italic"
-bltTest3 $graph pen foo -valueformat "%e"
-bltTest3 $graph pen foo -valuerotate 45
+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 n $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
bltCmd $graph pen cget foo -color
bltCmd $graph pen configure foo
diff --git a/tests/base.tcl b/tests/base.tcl
index 6cc63c3..710fbd8 100644
--- a/tests/base.tcl
+++ b/tests/base.tcl
@@ -1,5 +1,8 @@
#set sleep 1000
set sleep 500
+if {![info exists dops]} {
+ set dops 0
+}
proc bltPlot {w title} {
toplevel $w
@@ -16,13 +19,17 @@ proc bltPlotDestroy {w} {
destroy $w
}
-proc bltTest {graph option value} {
+proc bltTest {graph option value {dops 0}} {
global sleep
echo " $option $value"
set org [$graph cget $option]
$graph configure $option $value
update
+ if {$dops} {
+ $graph postscript output foo.ps
+ exec open /Applications/Preview.app/ foo.ps
+ }
# after $sleep
read stdin 1
$graph configure $option $org
@@ -30,13 +37,17 @@ proc bltTest {graph option value} {
after $sleep
}
-proc bltTest2 {graph which option value} {
+proc bltTest2 {graph which option value {dops 0}} {
global sleep
echo " $option $value"
set org [$graph $which cget $option]
$graph $which configure $option $value
update
+ if {$dops} {
+ $graph postscript output foo.ps
+ exec open /Applications/Preview.app/ foo.ps
+ }
# after $sleep
read stdin 1
$graph $which configure $option $org
@@ -44,13 +55,17 @@ proc bltTest2 {graph which option value} {
after $sleep
}
-proc bltTest3 {graph which item option value} {
+proc bltTest3 {graph which item option value {dops 0}} {
global sleep
echo " $item $option $value"
set org [$graph $which cget $item $option]
$graph $which configure $item $option $value
update
+ if {$dops} {
+ $graph postscript output foo.ps
+ exec open /Applications/Preview.app/ foo.ps
+ }
# after $sleep
read stdin 1
$graph $which configure $item $option $org
diff --git a/tests/bitmapmarker.tcl b/tests/bitmapmarker.tcl
index fffada0..655929c 100644
--- a/tests/bitmapmarker.tcl
+++ b/tests/bitmapmarker.tcl
@@ -10,24 +10,24 @@ $graph element configure data1 -hide yes
echo "Testing Bitmap Marker..."
bltCmd $graph marker configure $mm
-bltTest3 $graph marker $mm -anchor nw
-bltTest3 $graph marker $mm -background yellow
-bltTest3 $graph marker $mm -bg red
-#bltTest3 $graph marker $mm -bindtags {aa}
-bltTest3 $graph marker $mm -bitmap hourglass
-bltTest3 $graph marker $mm -coords {1 50}
-bltTest3 $graph marker $mm -element data1
-bltTest3 $graph marker $mm -fg cyan
-bltTest3 $graph marker $mm -fill yellow
-bltTest3 $graph marker $mm -foreground blue
-bltTest3 $graph marker $mm -hide yes
-bltTest3 $graph marker $mm -mapx x2
-bltTest3 $graph marker $mm -mapy y2
-bltTest3 $graph marker $mm -outline green
-bltTest3 $graph marker $mm -state disabled
-bltTest3 $graph marker $mm -under yes
-bltTest3 $graph marker $mm -xoffset 20
-bltTest3 $graph marker $mm -yoffset 20
+bltTest3 $graph marker $mm -anchor nw $dops
+bltTest3 $graph marker $mm -background yellow $dops
+bltTest3 $graph marker $mm -bg red $dops
+bltTest3 $graph marker $mm -bindtags {aa} 0
+bltTest3 $graph marker $mm -bitmap hourglass $dops
+bltTest3 $graph marker $mm -coords {1 50} $dops
+bltTest3 $graph marker $mm -element data1 $dops
+bltTest3 $graph marker $mm -fg cyan $dops
+bltTest3 $graph marker $mm -fill yellow $dops
+bltTest3 $graph marker $mm -foreground blue $dops
+bltTest3 $graph marker $mm -hide yes $dops
+bltTest3 $graph marker $mm -mapx x2 $dops
+bltTest3 $graph marker $mm -mapy y2 $dops
+bltTest3 $graph marker $mm -outline green $dops
+bltTest3 $graph marker $mm -state disabled $dops
+bltTest3 $graph marker $mm -under yes $dops
+bltTest3 $graph marker $mm -xoffset 20 $dops
+bltTest3 $graph marker $mm -yoffset 20 $dops
echo "done"
bltPlotDestroy $w
diff --git a/tests/crosshairs.tcl b/tests/crosshairs.tcl
index 86efb8c..dd1f41b 100644
--- a/tests/crosshairs.tcl
+++ b/tests/crosshairs.tcl
@@ -9,12 +9,12 @@ $graph crosshairs configure -x 200 -y 200
echo "Testing Crosshairs..."
$graph crosshairs configure
-bltTest2 $graph crosshairs -color green
-bltTest2 $graph crosshairs -dashes "8 3"
-bltTest2 $graph crosshairs -hide yes
-bltTest2 $graph crosshairs -linewidth 3
-bltTest2 $graph crosshairs -x 100
-bltTest2 $graph crosshairs -y 100
+bltTest2 $graph crosshairs -color green $dops
+bltTest2 $graph crosshairs -dashes "8 3" $dops
+bltTest2 $graph crosshairs -hide yes $dops
+bltTest2 $graph crosshairs -linewidth 3 $dops
+bltTest2 $graph crosshairs -x 100 $dops
+bltTest2 $graph crosshairs -y 100 $dops
bltCmd $graph crosshairs cget -color
bltCmd $graph crosshairs configure
diff --git a/tests/legend.tcl b/tests/legend.tcl
index 5c775eb..ea59f2c 100644
--- a/tests/legend.tcl
+++ b/tests/legend.tcl
@@ -10,49 +10,49 @@ $graph legend configure -selectrelief groove
echo "Testing Legend..."
$graph legend configure
-#bltTest2 $graph legend -activebackground
-#bltTest2 $graph legend -activeborderwidth
-#bltTest2 $graph legend -activeforeground
-#bltTest2 $graph legend -activerelief
-bltTest2 $graph legend -anchor s
-bltTest2 $graph legend -bg pink
-bltTest2 $graph legend -background cyan
-bltTest2 $graph legend -borderwidth 20
-bltTest2 $graph legend -bd 20
-bltTest2 $graph legend -columns 2
-#bltTest2 $graph legend -exportselection
-bltTest2 $graph legend -focusdashes "8 3"
-bltTest2 $graph legend -focusforeground red
-bltTest2 $graph legend -font "times 18 bold italic"
-bltTest2 $graph legend -fg yellow
-bltTest2 $graph legend -foreground purple
-bltTest2 $graph legend -hide yes
-bltTest2 $graph legend -ipadx 20
-bltTest2 $graph legend -ipady 20
-#bltTest2 $graph legend -nofocusselectbackground
-#bltTest2 $graph legend -nofocusselectforeground
-bltTest2 $graph legend -padx 20
-bltTest2 $graph legend -pady 20
-bltTest2 $graph legend -position rightmargin
-bltTest2 $graph legend -position leftmargin
-bltTest2 $graph legend -position topmargin
-bltTest2 $graph legend -position bottommargin
-bltTest2 $graph legend -position plotarea
-bltTest2 $graph legend -position xy
-bltTest2 $graph legend -x 250
-bltTest2 $graph legend -y 100
-bltTest2 $graph legend -raised yes
-bltTest2 $graph legend -relief groove
-bltTest2 $graph legend -rows 1
-#bltTest2 $graph legend -selectbackground
-bltTest2 $graph legend -selectborderwidth 3
-#bltTest2 $graph legend -selectcommand
-#bltTest2 $graph legend -selectforeground
-#bltTest2 $graph legend -selectmode
-bltTest2 $graph legend -selectrelief flat
-bltTest2 $graph legend -title "Hello World"
-bltTest2 $graph legend -titlecolor red
-bltTest2 $graph legend -titlefont "times 24 bold italic"
+#bltTest2 $graph legend -activebackground $dops
+#bltTest2 $graph legend -activeborderwidth $dops
+#bltTest2 $graph legend -activeforeground $dops
+#bltTest2 $graph legend -activerelief $dops
+bltTest2 $graph legend -anchor s $dops
+bltTest2 $graph legend -bg pink $dops
+bltTest2 $graph legend -background cyan $dops
+bltTest2 $graph legend -borderwidth 20 $dops
+bltTest2 $graph legend -bd 20 $dops
+bltTest2 $graph legend -columns 2 $dops
+#bltTest2 $graph legend -exportselection $dops
+bltTest2 $graph legend -focusdashes "8 3" $dops
+bltTest2 $graph legend -focusforeground red $dops
+bltTest2 $graph legend -font {times 18 bold italic} $dops
+bltTest2 $graph legend -fg yellow $dops
+bltTest2 $graph legend -foreground purple $dops
+bltTest2 $graph legend -hide yes $dops
+bltTest2 $graph legend -ipadx 20 $dops
+bltTest2 $graph legend -ipady 20 $dops
+#bltTest2 $graph legend -nofocusselectbackground $dops
+#bltTest2 $graph legend -nofocusselectforeground $dops
+bltTest2 $graph legend -padx 20 $dops
+bltTest2 $graph legend -pady 20 $dops
+bltTest2 $graph legend -position rightmargin $dops
+bltTest2 $graph legend -position leftmargin $dops
+bltTest2 $graph legend -position topmargin $dops
+bltTest2 $graph legend -position bottommargin $dops
+bltTest2 $graph legend -position plotarea $dops
+bltTest2 $graph legend -position xy $dops
+bltTest2 $graph legend -x 250 $dops
+bltTest2 $graph legend -y 100 $dops
+bltTest2 $graph legend -raised yes $dops
+bltTest2 $graph legend -relief groove $dops
+bltTest2 $graph legend -rows 1 $dops
+#bltTest2 $graph legend -selectbackground $dops
+bltTest2 $graph legend -selectborderwidth 3 $dops
+#bltTest2 $graph legend -selectcommand $dops
+#bltTest2 $graph legend -selectforeground $dops
+#bltTest2 $graph legend -selectmode $dops
+bltTest2 $graph legend -selectrelief flat $dops
+bltTest2 $graph legend -title "Hello World" $dops
+bltTest2 $graph legend -titlecolor red $dops
+bltTest2 $graph legend -titlefont {times 24 bold italic} $dops
#bltCmd $graph legend activate
#bltCmd $graph legend bind
diff --git a/tests/lineelement.tcl b/tests/lineelement.tcl
index b4200f4..4a402c6 100644
--- a/tests/lineelement.tcl
+++ b/tests/lineelement.tcl
@@ -11,65 +11,65 @@ $graph element activate data3
echo "Testing Line Element.."
bltTest3 $graph element configure data1
-bltTest3 $graph element data3 -activepen foo
-bltTest3 $graph element data2 -areabackground yellow
-#bltTest3 $graph element data2 -bindtags
-bltTest3 $graph element data2 -color yellow
-bltTest3 $graph element data2 -dashes {8 3}
-bltTest3 $graph element data1 -data {0.2 8 0.4 20 0.6 31 0.8 41 1.0 50 1.2 59 1.4 65 1.6 70 1.8 75 2.0 85}
-bltTest3 $graph element data2 -errorbarcolor green
-bltTest3 $graph element data2 -errorbarwidth 2
-bltTest3 $graph element data2 -errorbarcap 10
-bltTest3 $graph element data1 -fill cyan
-bltTest3 $graph element data2 -hide yes
-bltTest3 $graph element data2 -label "This is a test"
-bltTest3 $graph element data2 -legendrelief groove
-bltTest3 $graph element data2 -linewidth 3
-bltTest3 $graph element data2 -mapx x2
-bltTest3 $graph element data2 -mapy y2
-bltTest3 $graph element data1 -maxsymbols 4
-bltTest3 $graph element data1 -offdash black
-bltTest3 $graph element data1 -outline green
-bltTest3 $graph element data1 -outlinewidth 5
-bltTest3 $graph element data2 -pen foo
-bltTest3 $graph element data1 -pixels 20
-#bltTest3 $graph element data2 -reduce
-bltTest3 $graph element data1 -scalesymbols no
-bltTest3 $graph element data2 -showerrorbars no
-bltTest3 $graph element data1 -showvalues none
-bltTest3 $graph element data1 -showvalues x
-bltTest3 $graph element data1 -showvalues both
-bltTest3 $graph element data1 -smooth linear
-bltTest3 $graph element data1 -smooth cubic
-bltTest3 $graph element data1 -smooth quadratic
-bltTest3 $graph element data1 -smooth catrom
-#bltTest3 $graph element data2 -styles
-bltTest3 $graph element data1 -symbol arrow
-bltTest3 $graph element data1 -symbol cross
-bltTest3 $graph element data1 -symbol diamond
-bltTest3 $graph element data1 -symbol none
-bltTest3 $graph element data1 -symbol plus
-bltTest3 $graph element data1 -symbol scross
-bltTest3 $graph element data1 -symbol splus
-bltTest3 $graph element data1 -symbol square
-bltTest3 $graph element data1 -symbol triangle
-bltTest3 $graph element data2 -trace both
-bltTest3 $graph element data1 -valueanchor n
-bltTest3 $graph element data1 -valuecolor cyan
-bltTest3 $graph element data1 -valuefont "times 18 bold italic"
-bltTest3 $graph element data1 -valueformat "%e"
-bltTest3 $graph element data1 -valuerotate 45
-#bltTest3 $graph element data2 -weights
-bltTest3 $graph element data1 -x {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8}
-bltTest3 $graph element data1 -xdata {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8}
-bltTest3 $graph element data2 -xerror {.1 .1 .1 .1 .1 .1 .1 .1 .1 .1 .1}
-#bltTest3 $graph element data2 -xhigh
-#bltTest3 $graph element data2 -xlow
-bltTest3 $graph element data1 -y {8 20 31 41 50 59 65 70 75 85}
-bltTest3 $graph element data1 -ydata {8 20 31 41 50 59 65 70 75 85}
-bltTest3 $graph element data2 -yerror {5 5 5 5 5 5 5 5 5 5 5}
-#bltTest3 $graph element data2 -yhigh
-#bltTest3 $graph element data2 -ylow
+bltTest3 $graph element data3 -activepen foo $dops
+bltTest3 $graph element data2 -areabackground yellow $dops
+bltTest3 $graph element data2 -bindtags {aa}
+bltTest3 $graph element data2 -color yellow $dops
+bltTest3 $graph element data2 -dashes {8 3} $dops
+bltTest3 $graph element data1 -data {0.2 8 0.4 20 0.6 31 0.8 41 1.0 50 1.2 59 1.4 65 1.6 70 1.8 75 2.0 85} $dops
+bltTest3 $graph element data2 -errorbarcolor green $dops
+bltTest3 $graph element data2 -errorbarwidth 2 $dops
+bltTest3 $graph element data2 -errorbarcap 10 $dops
+bltTest3 $graph element data1 -fill cyan $dops
+bltTest3 $graph element data2 -hide yes $dops
+bltTest3 $graph element data2 -label "This is a test" $dops
+bltTest3 $graph element data2 -legendrelief groove $dops
+bltTest3 $graph element data2 -linewidth 3 $dops
+bltTest3 $graph element data2 -mapx x2 $dops
+bltTest3 $graph element data2 -mapy y2 $dops
+bltTest3 $graph element data1 -maxsymbols 4 $dops
+bltTest3 $graph element data1 -offdash black $dops
+bltTest3 $graph element data1 -outline green $dops
+bltTest3 $graph element data1 -outlinewidth 5 $dops
+bltTest3 $graph element data2 -pen foo $dops
+bltTest3 $graph element data1 -pixels 20 $dops
+#bltTest3 $graph element data2 -reduce $dops
+bltTest3 $graph element data1 -scalesymbols no $dops
+bltTest3 $graph element data2 -showerrorbars no $dops
+bltTest3 $graph element data1 -showvalues none $dops
+bltTest3 $graph element data1 -showvalues x $dops
+bltTest3 $graph element data1 -showvalues both $dops
+bltTest3 $graph element data1 -smooth linear $dops
+bltTest3 $graph element data1 -smooth cubic $dops
+bltTest3 $graph element data1 -smooth quadratic $dops
+bltTest3 $graph element data1 -smooth catrom $dops
+#bltTest3 $graph element data2 -styles $dops
+bltTest3 $graph element data1 -symbol arrow $dops
+bltTest3 $graph element data1 -symbol cross $dops
+bltTest3 $graph element data1 -symbol diamond $dops
+bltTest3 $graph element data1 -symbol none $dops
+bltTest3 $graph element data1 -symbol plus $dops
+bltTest3 $graph element data1 -symbol scross $dops
+bltTest3 $graph element data1 -symbol splus $dops
+bltTest3 $graph element data1 -symbol square $dops
+bltTest3 $graph element data1 -symbol triangle $dops
+bltTest3 $graph element data2 -trace both $dops
+bltTest3 $graph element data1 -valueanchor n $dops
+bltTest3 $graph element data1 -valuecolor cyan $dops
+bltTest3 $graph element data1 -valuefont {times 18 bold italic} $dops
+bltTest3 $graph element data1 -valueformat "%e" $dops
+bltTest3 $graph element data1 -valuerotate 45 $dops
+#bltTest3 $graph element data2 -weights $dops
+bltTest3 $graph element data1 -x {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8} $dops
+bltTest3 $graph element data1 -xdata {0 .2 .4 .6 .8 1 1.2 1.4 1.6 1.8} $dops
+bltTest3 $graph element data2 -xerror {.1 .1 .1 .1 .1 .1 .1 .1 .1 .1 .1} $dops
+#bltTest3 $graph element data2 -xhigh $dops
+#bltTest3 $graph element data2 -xlow $dops
+bltTest3 $graph element data1 -y {8 20 31 41 50 59 65 70 75 85} $dops
+bltTest3 $graph element data1 -ydata {8 20 31 41 50 59 65 70 75 85} $dops
+bltTest3 $graph element data2 -yerror {5 5 5 5 5 5 5 5 5 5 5} $dops
+#bltTest3 $graph element data2 -yhigh $dops
+#bltTest3 $graph element data2 -ylow $dops
bltCmd $graph element activate data2
bltCmd $graph element deactivate data2
diff --git a/tests/linegraph.tcl b/tests/linegraph.tcl
index d591348..a40ea99 100644
--- a/tests/linegraph.tcl
+++ b/tests/linegraph.tcl
@@ -6,48 +6,48 @@ set graph [bltLineGraph $w]
echo "Testing Line Graph..."
bltCmd $graph configure
-bltTest $graph -aspect 2
-bltTest $graph -background red
-#bltTest $graph -baseline
-bltTest $graph -bd 50
-bltTest $graph -bg green
-bltTest $graph -bm 50
-bltTest $graph -borderwidth 50
-bltTest $graph -bottommargin 50
-#bltTest $graph -bufferelements
-#bltTest $graph -buffergraph
-bltTest $graph -cursor cross
-bltTest $graph -fg blue
-bltTest $graph -font {times 36 bold italic}
-bltTest $graph -foreground cyan
-#bltTest $graph -halo
-bltTest $graph -height 300
-#bltTest $graph -highlightbackground
-#bltTest $graph -highlightcolor
-#bltTest $graph -highlightthickness
-bltTest $graph -invertxy yes
-bltTest $graph -justify left
-bltTest $graph -leftmargin 50
-bltTest $graph -lm 50
-bltTest $graph -plotbackground cyan
-bltTest $graph -plotborderwidth 50
-bltTest $graph -plotpadx 50
-bltTest $graph -plotpady 50
-bltTest $graph -plotrelief groove
-bltTest $graph -relief groove
-bltTest $graph -rightmargin 50
-bltTest $graph -rm 50
-#bltTest $graph -searchhalo
-#bltTest $graph -searchmode
-#bltTest $graph -searchalong
-#bltTest $graph -stackaxes
-#bltTest $graph -takefocus
-bltTest $graph -title "This is a Title"
-bltTest $graph -tm 50
-bltTest $graph -topmargin 50
-bltTest $graph -width 300
-bltTest $graph -plotwidth 300
-bltTest $graph -plotheight 300
+bltTest $graph -aspect 2 $dops
+bltTest $graph -background red $dops
+#bltTest $graph -baseline $dops
+bltTest $graph -bd 50 $dops
+bltTest $graph -bg green $dops
+bltTest $graph -bm 50 $dops
+bltTest $graph -borderwidth 50 $dops
+bltTest $graph -bottommargin 50 $dops
+#bltTest $graph -bufferelements $dops
+#bltTest $graph -buffergraph $dops
+bltTest $graph -cursor cross $dops
+bltTest $graph -fg blue $dops
+bltTest $graph -font {times 36 bold italic} $dops
+bltTest $graph -foreground cyan $dops
+#bltTest $graph -halo $dops
+bltTest $graph -height 300 $dops
+#bltTest $graph -highlightbackground $dops
+#bltTest $graph -highlightcolor $dops
+#bltTest $graph -highlightthickness $dops
+bltTest $graph -invertxy yes $dops
+bltTest $graph -justify left $dops
+bltTest $graph -leftmargin 50 $dops
+bltTest $graph -lm 50 $dops
+bltTest $graph -plotbackground cyan $dops
+bltTest $graph -plotborderwidth 50 $dops
+bltTest $graph -plotpadx 50 $dops
+bltTest $graph -plotpady 50 $dops
+bltTest $graph -plotrelief groove $dops
+bltTest $graph -relief groove $dops
+bltTest $graph -rightmargin 50 $dops
+bltTest $graph -rm 50 $dops
+#bltTest $graph -searchhalo $dops
+#bltTest $graph -searchmode $dops
+#bltTest $graph -searchalong $dops
+#bltTest $graph -stackaxes $dops
+#bltTest $graph -takefocus $dops
+bltTest $graph -title "This is a Title" $dops
+bltTest $graph -tm 50 $dops
+bltTest $graph -topmargin 50 $dops
+bltTest $graph -width 300 $dops
+bltTest $graph -plotwidth 300 $dops
+bltTest $graph -plotheight 300 $dops
##bltCmd $graph axis
bltCmd $graph cget -background
diff --git a/tests/linemarker.tcl b/tests/linemarker.tcl
index 7df2cff..c2ecf81 100644
--- a/tests/linemarker.tcl
+++ b/tests/linemarker.tcl
@@ -13,24 +13,24 @@ $graph element configure data1 -hide yes
echo "Testing Line Marker..."
bltCmd $graph marker configure $mm
-#bltTest3 $graph marker $mm -bindtags {aa}
-bltTest3 $graph marker $mm -cap round
-bltTest3 $graph marker $mm -coords {1 50 1.5 100 2 150}
-bltTest3 $graph marker $mm -dashes {8 3}
-bltTest3 $graph marker $mm -dashoffset 10
-bltTest3 $graph marker $mm -element data1
-bltTest3 $graph marker $nn -fill yellow
-bltTest3 $graph marker $mm -join round
-bltTest3 $graph marker $mm -linewidth 1
-bltTest3 $graph marker $mm -hide yes
-bltTest3 $graph marker $mm -mapx x2
-bltTest3 $graph marker $mm -mapy y2
-bltTest3 $graph marker $mm -outline green
-bltTest3 $graph marker $mm -state disabled
-bltTest3 $graph marker $mm -under yes
-bltTest3 $graph marker $mm -xoffset 20
-bltTest3 $graph marker $mm -xor yes
-bltTest3 $graph marker $mm -yoffset 20
+bltTest3 $graph marker $mm -bindtags {aa} 0
+bltTest3 $graph marker $mm -cap round $dops
+bltTest3 $graph marker $mm -coords {1 50 1.5 100 2 150} $dops
+bltTest3 $graph marker $mm -dashes {8 3} $dops
+bltTest3 $graph marker $mm -dashoffset 10 $dops
+bltTest3 $graph marker $mm -element data1 $dops
+bltTest3 $graph marker $nn -fill yellow $dops
+bltTest3 $graph marker $mm -join round $dops
+bltTest3 $graph marker $mm -linewidth 1 $dops
+bltTest3 $graph marker $mm -hide yes $dops
+bltTest3 $graph marker $mm -mapx x2 $dops
+bltTest3 $graph marker $mm -mapy y2 $dops
+bltTest3 $graph marker $mm -outline green $dops
+bltTest3 $graph marker $mm -state disabled $dops
+bltTest3 $graph marker $mm -under yes $dops
+bltTest3 $graph marker $mm -xoffset 20 $dops
+bltTest3 $graph marker $mm -xor yes $dops
+bltTest3 $graph marker $mm -yoffset 20 $dops
echo "done"
bltPlotDestroy $w
diff --git a/tests/linepen.tcl b/tests/linepen.tcl
index d8cf2b0..3228cce 100644
--- a/tests/linepen.tcl
+++ b/tests/linepen.tcl
@@ -9,32 +9,32 @@ $graph element configure data2 -pen foo
echo "Testing Line Pen..."
$graph element configure data1
-bltTest3 $graph pen foo -color yellow
-bltTest3 $graph pen foo -dashes {8 3}
-bltTest3 $graph pen foo -errorbarcolor green
-bltTest3 $graph pen foo -errorbarwidth 2
-bltTest3 $graph pen foo -errorbarcap 10
-bltTest3 $graph pen foo -fill cyan
-bltTest3 $graph pen foo -linewidth 3
-bltTest3 $graph pen foo -offdash black
-bltTest3 $graph pen foo -outline green
-bltTest3 $graph pen foo -outlinewidth 5
-bltTest3 $graph pen foo -pixels 20
-bltTest3 $graph pen foo -showvalues none
-bltTest3 $graph pen foo -symbol arrow
-bltTest3 $graph pen foo -symbol cross
-bltTest3 $graph pen foo -symbol diamond
-bltTest3 $graph pen foo -symbol none
-bltTest3 $graph pen foo -symbol plus
-bltTest3 $graph pen foo -symbol scross
-bltTest3 $graph pen foo -symbol splus
-bltTest3 $graph pen foo -symbol square
-bltTest3 $graph pen foo -symbol triangle
-bltTest3 $graph pen foo -valueanchor n
-bltTest3 $graph pen foo -valuecolor cyan
-bltTest3 $graph pen foo -valuefont "times 18 bold italic"
-bltTest3 $graph pen foo -valueformat "%e"
-bltTest3 $graph pen foo -valuerotate 45
+bltTest3 $graph pen foo -color yellow $dops
+bltTest3 $graph pen foo -dashes {8 3} $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 -fill cyan $dops
+bltTest3 $graph pen foo -linewidth 3 $dops
+bltTest3 $graph pen foo -offdash black $dops
+bltTest3 $graph pen foo -outline green $dops
+bltTest3 $graph pen foo -outlinewidth 5 $dops
+bltTest3 $graph pen foo -pixels 20 $dops
+bltTest3 $graph pen foo -showvalues none $dops
+bltTest3 $graph pen foo -symbol arrow $dops
+bltTest3 $graph pen foo -symbol cross $dops
+bltTest3 $graph pen foo -symbol diamond $dops
+bltTest3 $graph pen foo -symbol none $dops
+bltTest3 $graph pen foo -symbol plus $dops
+bltTest3 $graph pen foo -symbol scross $dops
+bltTest3 $graph pen foo -symbol splus $dops
+bltTest3 $graph pen foo -symbol square $dops
+bltTest3 $graph pen foo -symbol triangle $dops
+bltTest3 $graph pen foo -valueanchor n $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
bltCmd $graph pen cget foo -color
bltCmd $graph pen configure foo
diff --git a/tests/polygonmarker.tcl b/tests/polygonmarker.tcl
index 4acd7c5..52460f2 100644
--- a/tests/polygonmarker.tcl
+++ b/tests/polygonmarker.tcl
@@ -10,25 +10,25 @@ $graph element configure data1 -hide yes
echo "Testing Polygon Marker..."
bltCmd $graph marker configure $mm
-#bltTest3 $graph marker $mm -bindtags {aa}
-bltTest3 $graph marker $mm -cap round
-bltTest3 $graph marker $mm -coords {1 50 1.5 100 2 150}
-bltTest3 $graph marker $mm -dashes {8 3}
-bltTest3 $graph marker $mm -element data1
-bltTest3 $graph marker $mm -fill yellow
-bltTest3 $graph marker $mm -fillbg blue
-bltTest3 $graph marker $mm -join round
-bltTest3 $graph marker $mm -linewidth 1
-bltTest3 $graph marker $mm -hide yes
-bltTest3 $graph marker $mm -mapx x2
-bltTest3 $graph marker $mm -mapy y2
-bltTest3 $graph marker $mm -outline green
-bltTest3 $graph marker $mm -outlinebg cyan
-bltTest3 $graph marker $mm -state disabled
-bltTest3 $graph marker $mm -under yes
-bltTest3 $graph marker $mm -xoffset 20
-bltTest3 $graph marker $mm -xor yes
-bltTest3 $graph marker $mm -yoffset 20
+bltTest3 $graph marker $mm -bindtags {aa} 0
+bltTest3 $graph marker $mm -cap round $dops
+bltTest3 $graph marker $mm -coords {1 50 1.5 100 2 150} $dops
+bltTest3 $graph marker $mm -dashes {8 3} $dops
+bltTest3 $graph marker $mm -element data1 $dops
+bltTest3 $graph marker $mm -fill yellow $dops
+bltTest3 $graph marker $mm -fillbg blue $dops
+bltTest3 $graph marker $mm -join round $dops
+bltTest3 $graph marker $mm -linewidth 1 $dops
+bltTest3 $graph marker $mm -hide yes $dops
+bltTest3 $graph marker $mm -mapx x2 $dops
+bltTest3 $graph marker $mm -mapy y2 $dops
+bltTest3 $graph marker $mm -outline green $dops
+bltTest3 $graph marker $mm -outlinebg cyan $dops
+bltTest3 $graph marker $mm -state disabled $dops
+bltTest3 $graph marker $mm -under yes $dops
+bltTest3 $graph marker $mm -xoffset 20 $dops
+bltTest3 $graph marker $mm -xor yes $dops
+bltTest3 $graph marker $mm -yoffset 20 $dops
echo "done"
bltPlotDestroy $w
diff --git a/tests/test.tcl b/tests/test.tcl
index 120958b..b51a5f2 100644
--- a/tests/test.tcl
+++ b/tests/test.tcl
@@ -4,8 +4,6 @@ set w .line
set graph [bltLineGraph $w]
#set graph [bltBarGraph $w]
-$graph postscript output foo.ps
-
#echo "done"
#bltPlotDestroy $w
diff --git a/tests/textmarker.tcl b/tests/textmarker.tcl
index 12b5f23..f741ad8 100644
--- a/tests/textmarker.tcl
+++ b/tests/textmarker.tcl
@@ -10,27 +10,27 @@ $graph element configure data1 -hide yes
echo "Testing Text Marker..."
bltCmd $graph marker configure $mm
-bltTest3 $graph marker $mm -anchor nw
-bltTest3 $graph marker $mm -background yellow
-bltTest3 $graph marker $mm -bg red
-#bltTest3 $graph marker $mm -bindtags {aa}
-bltTest3 $graph marker $mm -coords {1 50}
-bltTest3 $graph marker $mm -element data1
-bltTest3 $graph marker $mm -fg cyan
-bltTest3 $graph marker $mm -fill yellow
-bltTest3 $graph marker $mm -font {times 24 bold italic}
-bltTest3 $graph marker $mm -foreground blue
-bltTest3 $graph marker $mm -justify left
-bltTest3 $graph marker $mm -hide yes
-bltTest3 $graph marker $mm -mapx x2
-bltTest3 $graph marker $mm -mapy y2
-bltTest3 $graph marker $mm -outline green
-bltTest3 $graph marker $mm -rotate 45
-bltTest3 $graph marker $mm -state disabled
-bltTest3 $graph marker $mm -text {Hello World}
-bltTest3 $graph marker $mm -under yes
-bltTest3 $graph marker $mm -xoffset 20
-bltTest3 $graph marker $mm -yoffset 20
+bltTest3 $graph marker $mm -anchor nw $dops
+bltTest3 $graph marker $mm -background yellow $dops
+bltTest3 $graph marker $mm -bg red $dops
+bltTest3 $graph marker $mm -bindtags {aa} 0
+bltTest3 $graph marker $mm -coords {1 50} $dops
+bltTest3 $graph marker $mm -element data1 $dops
+bltTest3 $graph marker $mm -fg cyan $dops
+bltTest3 $graph marker $mm -fill yellow $dops
+bltTest3 $graph marker $mm -font {times 24 bold italic} $dops
+bltTest3 $graph marker $mm -foreground blue $dops
+bltTest3 $graph marker $mm -justify left $dops
+bltTest3 $graph marker $mm -hide yes $dops
+bltTest3 $graph marker $mm -mapx x2 $dops
+bltTest3 $graph marker $mm -mapy y2 $dops
+bltTest3 $graph marker $mm -outline green $dops
+bltTest3 $graph marker $mm -rotate 45 $dops
+bltTest3 $graph marker $mm -state disabled $dops
+bltTest3 $graph marker $mm -text {Hello World} $dops
+bltTest3 $graph marker $mm -under yes $dops
+bltTest3 $graph marker $mm -xoffset 20 $dops
+bltTest3 $graph marker $mm -yoffset 20 $dops
echo "done"
bltPlotDestroy $w