summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/mygtk2.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 7d399a4f3..4fd53b3f4 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -624,6 +624,7 @@ sub mygtk2::MagicWindow::AUTOLOAD {
my ($s1, $s2) = $meth eq 'show'
? ('real_window', 'child') :
+ $meth eq 'get' && $args[0] eq 'window-position' ||
$w->{pop_it} && ($meth eq 'destroy' || $meth eq 'hide') ||
$for_real_window{$meth} ||
!$w->{child}->can($meth)