I did look at DialogBox.pm and a few others. This is why I feld that probably the Show routine was at fault. I did not know where to find Popup till your message, however. In Wm.pm I now see it. Indeed, this part of it would appear to cause the problem.
# adjust to not cross screen borders
if ($X < 0) { $X = 0 }
Unfortunately, when I change this line my code runs the same. So I'm mystified.
Also in Wm.pm I noted the Post routine. It contains this.
$w->geometry("+$X+$Y");
# $w->MoveToplevelWindow($X,$Y);
I'm guessing that the commented out MoveToplevelWindow call was replaced by the one to geometry (which works OK on multiple monitors).
Thanks for the leads, however. :)
|