build system: debian/copyright file

[chiark-tcl-applet.git] / applet.tcl

diff --git a/applet.tcl b/applet.tcl
index 93e9c31e2e59507d7c5e25d79f1bf514bff1f9fc..871cf97f380764a13088b7495d3f4cc2bbcc98d0 100644 (file)
--- a/applet.tcl
+++ b/applet.tcl
@@ -1,5 +1,9 @@
 # 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
 
@@ -263,7 +267,7 @@ proc setup-subwindow {on_destroying on_ready} {
     .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"
     }