summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--tests/select.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/select.test b/tests/select.test
index e4c512d..77bfb2e 100644
--- a/tests/select.test
+++ b/tests/select.test
@@ -628,7 +628,7 @@ test select-5.15 {Tk_GetSelection procedure} -setup {
set ::bgerrors {}
} -body {
proc ::bgerror msg {lappend ::bgerrors $msg}
- selection handle .f1 ERROR errHandler
+ selection handle -type ERROR .f1 errHandler
list [catch {selection get ERROR} msg] $msg [update] {*}$::bgerrors
} -cleanup {
rename ::bgerror {}