diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-02-05 17:44:34 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-02-05 17:44:34 (GMT) |
| commit | 5e0ccea47993ed0c38eb6d8b5b2d134dea29c55e (patch) | |
| tree | cf24d154f023ca48a7ede5738ca161c7ada9f153 /tests/cursor.test | |
| parent | d52304ef37cf777a3f7f435d6a7b0fdd937e7234 (diff) | |
| download | tk-5e0ccea47993ed0c38eb6d8b5b2d134dea29c55e.zip tk-5e0ccea47993ed0c38eb6d8b5b2d134dea29c55e.tar.gz tk-5e0ccea47993ed0c38eb6d8b5b2d134dea29c55e.tar.bz2 | |
Restore failing tests to passing.
Diffstat (limited to 'tests/cursor.test')
| -rw-r--r-- | tests/cursor.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/cursor.test b/tests/cursor.test index 1039b52..ab7949e 100644 --- a/tests/cursor.test +++ b/tests/cursor.test @@ -145,11 +145,11 @@ test cursor-3.1 {Tk_FreeCursorFromObj - reference counts} -constraints { test cursor-4.1 {FreeCursorObjProc} -constraints { testcursor } -body { - set x [format heart] + set x [join heart] button .b -cursor $x - set y [format heart] + set y [join heart] .b configure -cursor $y - set z [format heart] + set z [join heart] .b configure -cursor $z set result {} lappend result [testcursor heart] |