diff options
| author | fvogel <fvogelnew1@free.fr> | 2018-05-01 12:37:46 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2018-05-01 12:37:46 (GMT) |
| commit | 4ac45f804f667661e9260de1cb319c6ce72e97ac (patch) | |
| tree | a721f5b651acd6613ee3049820eb1fec60aec701 /tests | |
| parent | 6e10bc49e4bbf264dadd76df5de6046e0601d127 (diff) | |
| download | tk-4ac45f804f667661e9260de1cb319c6ce72e97ac.zip tk-4ac45f804f667661e9260de1cb319c6ce72e97ac.tar.gz tk-4ac45f804f667661e9260de1cb319c6ce72e97ac.tar.bz2 | |
Unify error messages for wrong values of 'tk_messageBox -default' among platforms: Windows and X11 now return the same error
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/msgbox.test | 23 |
1 files changed, 7 insertions, 16 deletions
diff --git a/tests/msgbox.test b/tests/msgbox.test index 38004f5..023b1ef 100644 --- a/tests/msgbox.test +++ b/tests/msgbox.test @@ -57,35 +57,26 @@ test msgbox-1.11.2 {tk_messageBox command} -constraints aqua -body { tk_messageBox -type foo } -returnCodes error -result {bad value "foo": must be abortretryignore, ok, okcancel, retrycancel, yesno, or yesnocancel} -test msgbox-1.12 {tk_messageBox command} -constraints x11 -body { +test msgbox-1.13 {tk_messageBox command} -constraints nonAqua -body { tk_messageBox -default 1.1 -} -returnCodes error -result {invalid default button "1.1"} -test msgbox-1.13 {tk_messageBox command} -constraints aqua -body { +} -returnCodes error -result {bad -default value "1.1": must be abort, retry, ignore, ok, cancel, no, or yes} +test msgbox-1.13a {tk_messageBox command} -constraints aqua -body { tk_messageBox -default 1.1 } -returnCodes error -result {bad value "1.1": must be abort, retry, ignore, ok, cancel, yes, or no} -test msgbox-1.13a {tk_messageBox command} -constraints win -body { - tk_messageBox -default 1.1 -} -returnCodes error -result {bad -default value "1.1": must be abort, retry, ignore, ok, cancel, no, or yes} -test msgbox-1.14 {tk_messageBox command} -constraints x11 -body { +test msgbox-1.14 {tk_messageBox command} -constraints notAqua -body { tk_messageBox -default foo -} -returnCodes error -result {invalid default button "foo"} +} -returnCodes error -result {bad -default value "foo": must be abort, retry, ignore, ok, cancel, no, or yes} test msgbox-1.15 {tk_messageBox command} -constraints aqua -body { tk_messageBox -default foo } -returnCodes error -result {bad value "foo": must be abort, retry, ignore, ok, cancel, yes, or no} -test msgbox-1.15a {tk_messageBox command} -constraints win -body { - tk_messageBox -default foo -} -returnCodes error -result {bad -default value "foo": must be abort, retry, ignore, ok, cancel, no, or yes} -test msgbox-1.16 {tk_messageBox command} -constraints x11 -body { +test msgbox-1.16 {tk_messageBox command} -constraints notAqua -body { tk_messageBox -type yesno -default 3 -} -returnCodes error -result {invalid default button "3"} +} -returnCodes error -result {bad -default value "3": must be abort, retry, ignore, ok, cancel, no, or yes} test msgbox-1.17 {tk_messageBox command} -constraints aqua -body { tk_messageBox -type yesno -default 3 } -returnCodes error -result {bad value "3": must be abort, retry, ignore, ok, cancel, yes, or no} -test msgbox-1.17a {tk_messageBox command} -constraints win -body { - tk_messageBox -type yesno -default 3 -} -returnCodes error -result {bad -default value "3": must be abort, retry, ignore, ok, cancel, no, or yes} test msgbox-1.18 {tk_messageBox command} -constraints notAqua -body { tk_messageBox -icon foo |