summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-09-01 11:24:54 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-09-01 11:24:54 +0000
commit3c86bfca024532cfbee0c2ba796f93d567af203f (patch)
tree2fa10eafb2abaa0373eefc9a38f1637dc995cd4a
parent2a657dab8f8d01df6a7fd0df6c7431fc04f935ec (diff)
downloaddrakx-3c86bfca024532cfbee0c2ba796f93d567af203f.tar
drakx-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.gz
drakx-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.bz2
drakx-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.xz
drakx-3c86bfca024532cfbee0c2ba796f93d567af203f.zip
_ask_file: don't forget to overwrite $o->{window} as well or else
it will be ->show'ed as a blank window (#5083)
-rw-r--r--perl-install/ugtk2.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index ffd6c5d90..4f434ce52 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -1029,7 +1029,7 @@ sub _ask_okcancel($@) {
sub _ask_file {
my ($o, $title, $path) = @_;
my ($modality, $position) = ($o->{rwindow}->get_modal, $o->{rwindow}->get('window-position'));
- my $f = $o->{rwindow} = Gtk2::FileSelection->new($title);
+ my $f = $o->{rwindow} = $o->{window} = Gtk2::FileSelection->new($title);
$f->set_modal($modality);
$f->set_position($position);
$path and $f->set_filename($path);