summaryrefslogtreecommitdiffstats
path: root/library
diff options
context:
space:
mode:
Diffstat (limited to 'library')
-rw-r--r--library/tk.tcl1
1 files changed, 1 insertions, 0 deletions
diff --git a/library/tk.tcl b/library/tk.tcl
index 1935bbc..57525f1 100644
--- a/library/tk.tcl
+++ b/library/tk.tcl
@@ -122,6 +122,7 @@ proc ::tk::PlaceWindow {w {place ""} {anchor ""}} {
if {$y < 22} { set y 22 }
}
}
+ wm maxsize $w [winfo vrootwidth $w] [winfo vrootheight $w]
wm geometry $w +$x+$y
wm deiconify $w
}