diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 22:00:15 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-07-07 22:00:15 (GMT) |
| commit | 8acb512c92c1b619073eac7d604ab9791ef0e713 (patch) | |
| tree | 3e9691c13e240731e5cf78e7e27ff536d68a4bab /tests/bind.test | |
| parent | 90b1090817bbf37d8787cc9ed77f2a4ca7460bb7 (diff) | |
| parent | 2d8d71bb9e77b74a29295db7280e8383c4ac4df0 (diff) | |
| download | tk-8acb512c92c1b619073eac7d604ab9791ef0e713.zip tk-8acb512c92c1b619073eac7d604ab9791ef0e713.tar.gz tk-8acb512c92c1b619073eac7d604ab9791ef0e713.tar.bz2 | |
Merge trunk
Diffstat (limited to 'tests/bind.test')
| -rw-r--r-- | tests/bind.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/bind.test b/tests/bind.test index 50289b5..ebc39b7 100644 --- a/tests/bind.test +++ b/tests/bind.test @@ -5994,7 +5994,7 @@ test bind-28.8 {keysym names} -setup { } -result {X x {keysym X}} -test bind-29.1 {Tk_BackgroundError procedure} -setup { +test bind-29.1 {Tcl_BackgroundError procedure} -setup { proc bgerror msg { global x errorInfo set x [list $msg $errorInfo] @@ -6018,7 +6018,7 @@ test bind-29.1 {Tk_BackgroundError procedure} -setup { "error "This is a test"" (command bound to event)}} -test bind-29.2 {Tk_BackgroundError procedure} -setup { +test bind-29.2 {Tcl_BackgroundError procedure} -setup { proc do {} { event generate .t.f <Button> event generate .t.f <ButtonRelease> |