summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorjenglish <jenglish@flightlab.com>2008-08-19 14:47:54 (GMT)
committerjenglish <jenglish@flightlab.com>2008-08-19 14:47:54 (GMT)
commit03d77dae7c7add838a4b5a9e29dd3561899decc5 (patch)
treec70888bfe7837c6e68b6021de9a3587db899cd04 /tests
parent8899e854a9fbe9bd153ceb639caab38ac6c150cb (diff)
downloadtk-03d77dae7c7add838a4b5a9e29dd3561899decc5.zip
tk-03d77dae7c7add838a4b5a9e29dd3561899decc5.tar.gz
tk-03d77dae7c7add838a4b5a9e29dd3561899decc5.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.test4
-rw-r--r--tests/ttk/treeview.test4
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 2a58444..bf5f8ec 100644
--- a/tests/ttk/treeview.test
+++ b/tests/ttk/treeview.test
@@ -1,5 +1,5 @@
#
-# $Id: treeview.test,v 1.4 2008/05/23 20:20:07 jenglish Exp $
+# $Id: treeview.test,v 1.5 2008/08/19 14:47:55 jenglish Exp $
#
# [7Jun2005] TO CHECK: [$tv see {}] -- shouldn't work (at least, shouldn't do
# what it currently does)
@@ -471,7 +471,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]
### identify tests:
#