diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-14 13:31:25 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-03-14 13:31:25 (GMT) |
| commit | 6669e94c070680392a0e8c77203e45084d9c09d0 (patch) | |
| tree | 4374617eea84da0b0c281f7df9d54a9ca69eb029 /tests/ttk/spinbox.test | |
| parent | 88c76da7f7b34507aafaf94a6329fb943f881029 (diff) | |
| download | tk-6669e94c070680392a0e8c77203e45084d9c09d0.zip tk-6669e94c070680392a0e8c77203e45084d9c09d0.tar.gz tk-6669e94c070680392a0e8c77203e45084d9c09d0.tar.bz2 | |
Excess spacing in test-suite
Diffstat (limited to 'tests/ttk/spinbox.test')
| -rw-r--r-- | tests/ttk/spinbox.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/ttk/spinbox.test b/tests/ttk/spinbox.test index 32b77af..6c328bb 100644 --- a/tests/ttk/spinbox.test +++ b/tests/ttk/spinbox.test @@ -232,7 +232,7 @@ test spinbox-nostomp-3 "don't stomp on -variable (configure; -from/to)" -body { test spinbox-nostomp-4 "don't stomp on -variable (configure; -values)" -body { set SBV Apr - ttk::spinbox .sb + ttk::spinbox .sb .sb configure -textvariable SBV -values {Jan Feb Mar Apr May Jun Jul Aug} list $SBV [.sb get] } -cleanup { @@ -257,7 +257,7 @@ test spinbox-dieoctaldie-1 "Cope with leading zeros" -body { event generate .sb <<Decrement>>; lappend result $secs set result -} -result [list 07 08 09 10 11 10 09 08 07] -cleanup { +} -result [list 07 08 09 10 11 10 09 08 07] -cleanup { destroy .sb unset secs } |