diff options
Diffstat (limited to 'perl-install/mygtk2.pm')
| -rw-r--r-- | perl-install/mygtk2.pm | 1 |
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) |