From f2ca9ed86130f1be3363ef58eeb4ec25c0283bf8 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 22 Jan 2005 18:45:49 +0000 Subject: allow using {real_window} instead of {rwindow}{real_window} (esp. for set_transient_for for which we can't easily do some magic) --- perl-install/ugtk2.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install') diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 792462ca4..2721fa1fe 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -845,6 +845,7 @@ sub new { ); $o->{rwindow} = $o->{window} = $window; + $o->{real_window} = $window->{real_window}; $o->{pop_it} = $window->{pop_it}; $o; -- cgit v1.2.1