# General purpose code for being a tray applet
+# Copyright 2016,2020 Ian Jackson
+# SPDX-License-Identifier: GPL-3.0-or-later
+# There is NO WARRANTY.
+
package require Tclx
package require tktray
.i configure -image applet::innerwindow-ph-horizontal
destroy [frame .i.make-exist]
- destroy [frame .i.i.make-exist]
+ #destroy [frame .i.i.make-exist]
bind .i <<IconConfigure>> {
applet::subwindow-need-recreate %T "%T i=%i k=%K N=%N R=%R S=%S k=%k m=%m d=%d s=%s a=%a b=%b c=%c f=%f w,h=%w,%h o=%o p=%p t=%t x,y=%x,%y B=%B D=%D E=%E P=%P W=%W X,Y=%X,%Y"
}