summaryrefslogtreecommitdiffstats
path: root/tests/spinbox.test
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2015-12-11 10:49:31 (GMT)
committerfvogel <fvogelnew1@free.fr>2015-12-11 10:49:31 (GMT)
commit12fba5ace646e3d7b037ca0caa7a7c55bdcd7d63 (patch)
treef49c9f78792bd736881c586456cdf50ba075fa02 /tests/spinbox.test
parent2f823dce353535fda34fff8883078e034675eec3 (diff)
parentfbcd240c74caa743dc1fef3f144cd2154895befc (diff)
downloadtk-12fba5ace646e3d7b037ca0caa7a7c55bdcd7d63.zip
tk-12fba5ace646e3d7b037ca0caa7a7c55bdcd7d63.tar.gz
tk-12fba5ace646e3d7b037ca0caa7a7c55bdcd7d63.tar.bz2
Merged core-8-5-branch
Diffstat (limited to 'tests/spinbox.test')
-rw-r--r--tests/spinbox.test19
1 files changed, 17 insertions, 2 deletions
diff --git a/tests/spinbox.test b/tests/spinbox.test
index e8f027b..5fba390 100644
--- a/tests/spinbox.test
+++ b/tests/spinbox.test
@@ -1568,7 +1568,23 @@ test spinbox-22.3 {spinbox config, -from changes SF bug 559078} {
set val
} {6}
-test spinbox-23.1 {error in trace proc attached to the textvariable} {
+test spinbox-23.1 {selection present while disabled, bug 637828} {
+ destroy .e
+ spinbox .e
+ .e insert end 0123456789
+ .e select from 3
+ .e select to 6
+ set out [.e selection present]
+ .e configure -state disabled
+ # still return 1 when disabled, because 'selection get' will work,
+ # but selection cannot be changed (new behavior since 8.4)
+ .e select to 9
+ lappend out [.e selection present] [selection get]
+} {1 1 345}
+
+destroy .e
+
+test spinbox-24.1 {error in trace proc attached to the textvariable} {
destroy .s
trace variable myvar w traceit
proc traceit args {error "Intentional error here!"}
@@ -1583,7 +1599,6 @@ test spinbox-23.1 {error in trace proc attached to the textvariable} {
{can't set "myvar": Intentional error here!} \
{can't set "myvar": Intentional error here!}]
-destroy .e
catch {unset ::e ::vVals}
##