diff options
author | fvogel <fvogelnew1@free.fr> | 2020-11-17 21:26:56 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2020-11-17 21:26:56 (GMT) |
commit | 53e248b0eff7bbdb7c6f1fa5c6502671da166d5e (patch) | |
tree | 86bb6ec6675b8844e632af1657d5b5a50b86a2d4 /library | |
parent | 9776d994f95f15c0022b05594576e7dde5871230 (diff) | |
download | tk-53e248b0eff7bbdb7c6f1fa5c6502671da166d5e.zip tk-53e248b0eff7bbdb7c6f1fa5c6502671da166d5e.tar.gz tk-53e248b0eff7bbdb7c6f1fa5c6502671da166d5e.tar.bz2 |
Remove unused parameter of proc _win_callback
Diffstat (limited to 'library')
-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 67ade37..59ab824 100644 --- a/library/systray.tcl +++ b/library/systray.tcl @@ -44,7 +44,7 @@ namespace eval ::tk::systray { raise $top } - proc _win_callback {msg icn} { + proc _win_callback {msg} { variable _current switch -exact -- $msg { WM_LBUTTONDOWN { @@ -162,7 +162,7 @@ proc ::tk::systray::create {args} { "win32" { set _ico [_systray add -image [dict get $values -image] \ -text [dict get $values -text] \ - -callback [list ::tk::systray::_win_callback %m %i]] + -callback [list ::tk::systray::_win_callback %m]] } "x11" { _systray ._tray -image [dict get $values -image] -visible true |