diff options
Diffstat (limited to 'library')
| -rw-r--r-- | library/tk.tcl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/library/tk.tcl b/library/tk.tcl index 57525f1..90a4d0c 100644 --- a/library/tk.tcl +++ b/library/tk.tcl @@ -106,6 +106,10 @@ proc ::tk::PlaceWindow {w {place ""} {anchor ""}} { set windowingsystem [tk windowingsystem] + if {$windowingsystem eq "win32"} { + # Bug 533519: win32 multiple desktops may produce negative geometry. + set checkBounds 0 + } if {$checkBounds} { if {$x < [winfo vrootx $w]} { set x [winfo vrootx $w] |