diff options
| author | fvogel <fvogelnew1@free.fr> | 2018-05-13 17:41:24 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2018-05-13 17:41:24 (GMT) |
| commit | 5087fdaa7d95cbb0604ea7df6a84b2f8cce91640 (patch) | |
| tree | e5b3b7b3153ea0e7ab71b472157b65e4f90be402 /library | |
| parent | be77eeb2e9ca398484104e26a98f826d9fc7c41d (diff) | |
| parent | 271cd56eb5cb8de37e5ee3664310cdd00312e803 (diff) | |
| download | tk-5087fdaa7d95cbb0604ea7df6a84b2f8cce91640.zip tk-5087fdaa7d95cbb0604ea7df6a84b2f8cce91640.tar.gz tk-5087fdaa7d95cbb0604ea7df6a84b2f8cce91640.tar.bz2 | |
Fix [66db98f30d]: choosedir, filebox, msgbox tests fails on macOS + undocumented options -message and -command
Diffstat (limited to 'library')
| -rw-r--r-- | library/msgbox.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/library/msgbox.tcl b/library/msgbox.tcl index 6d329c2..98603af 100644 --- a/library/msgbox.tcl +++ b/library/msgbox.tcl @@ -234,7 +234,8 @@ proc ::tk::MessageBox {args} { } if {!$valid} { return -code error -errorcode {TK MSGBOX DEFAULT} \ - "invalid default button \"$data(-default)\"" + "bad -default value \"$data(-default)\": must be\ + abort, retry, ignore, ok, cancel, no, or yes" } # 2. Set the dialog to be a child window of $parent |