diff options
author | jenglish <jenglish@flightlab.com> | 2008-08-19 14:48:00 (GMT) |
---|---|---|
committer | jenglish <jenglish@flightlab.com> | 2008-08-19 14:48:00 (GMT) |
commit | 93897604fb513d30386f1ad7749a3fefb8b55be6 (patch) | |
tree | b7d2b9b4dea24ec9eac88253408fb5ff88e1fa11 /tests | |
parent | 83d4d9ee4363e56070ad0805976fdcbe59a09073 (diff) | |
download | tk-93897604fb513d30386f1ad7749a3fefb8b55be6.zip tk-93897604fb513d30386f1ad7749a3fefb8b55be6.tar.gz tk-93897604fb513d30386f1ad7749a3fefb8b55be6.tar.bz2 |
generic/ttk/ttkScroll.c: Don't use sprintf "%g" to format floating
point numbers in -[xy]scrollcommand callbacks or [xy]view methods.
Minor incompatibility: 0 and 1 now formatted as "0.0" resp "1.0".
Diffstat (limited to 'tests')
-rw-r--r-- | tests/ttk/entry.test | 4 | ||||
-rw-r--r-- | tests/ttk/treeview.test | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/tests/ttk/entry.test b/tests/ttk/entry.test index 929e856..0c2f0be 100644 --- a/tests/ttk/entry.test +++ b/tests/ttk/entry.test @@ -79,7 +79,7 @@ test entry-2.2 "Initial scroll position" -body { .e insert end "0123456789" pack .e; update set scrollInfo -} -result {0 0.5} -cleanup { destroy .e } +} -result {0.0 0.5} -cleanup { destroy .e } # NOTE: result can vary depending on font. # Bounding box / scrolling tests. @@ -105,7 +105,7 @@ test entry-3.2 "xview" -body { .e insert end [string repeat "0" 40] update idletasks set result [.e xview] -} -result {0 0.5} +} -result {0.0 0.5} test entry-3.last "Series 3 cleanup" -body { destroy .e diff --git a/tests/ttk/treeview.test b/tests/ttk/treeview.test index d2b33a9..46c3f6e 100644 --- a/tests/ttk/treeview.test +++ b/tests/ttk/treeview.test @@ -1,5 +1,5 @@ # -# $Id: treeview.test,v 1.3 2008/01/06 19:16:12 jenglish Exp $ +# $Id: treeview.test,v 1.3.2.1 2008/08/19 14:48:00 jenglish Exp $ # # [7Jun2005] TO CHECK: [$tv see {}] -- shouldn't work (at least, shouldn't do # what it currently does) @@ -472,7 +472,7 @@ test treeview-9.0 "scroll callback - empty tree" -body { .tv delete [.tv children {}] update set ::scrolldata -} -result [list 0 1] +} -result [list 0.0 1.0] ### NEED: tests for focus item, selection |