diff options
| author | fvogel <fvogelnew1@free.fr> | 2020-11-11 13:35:35 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2020-11-11 13:35:35 (GMT) |
| commit | f3d241ae7f0b06e61cbcd86d5010091eb10cdb41 (patch) | |
| tree | d2cb942698e9afb933bd01f132397fb65ad9444e /library/systray.tcl | |
| parent | 90a9948b71e6ca61e44cad664850d4573c34a9c8 (diff) | |
| download | tk-f3d241ae7f0b06e61cbcd86d5010091eb10cdb41.zip tk-f3d241ae7f0b06e61cbcd86d5010091eb10cdb41.tar.gz tk-f3d241ae7f0b06e61cbcd86d5010091eb10cdb41.tar.bz2 | |
Improve error messages
Diffstat (limited to 'library/systray.tcl')
| -rw-r--r-- | library/systray.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/library/systray.tcl b/library/systray.tcl index ca5a8e5..9e56aeb 100644 --- a/library/systray.tcl +++ b/library/systray.tcl @@ -184,7 +184,7 @@ proc ::tk::systray {args} { } if {[lindex $args 0] eq "destroy" && [llength $args] > 1} { - error "wrong # args: \"tk systray destroy\"" + error "wrong # args: should be \"tk systray destroy\"" } #Create the system tray icon. @@ -228,7 +228,7 @@ proc ::tk::systray {args} { #Modify the system tray icon properties. if {[lindex $args 0] eq "modify"} { if {[llength $args] != 3} { - error "wrong # args: \"tk systray modify image | text | b1_callback | b3_callback option?\"" + error "wrong # args: should be \"tk systray modify image | text | b1_callback | b3_callback option\"" } switch -- [tk windowingsystem] { "win32" { |