summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2020-11-17 21:26:56 (GMT)
committerfvogel <fvogelnew1@free.fr>2020-11-17 21:26:56 (GMT)
commit53e248b0eff7bbdb7c6f1fa5c6502671da166d5e (patch)
tree86bb6ec6675b8844e632af1657d5b5a50b86a2d4 /library
parent9776d994f95f15c0022b05594576e7dde5871230 (diff)
downloadtk-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.tcl4
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