diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2003-09-01 11:24:54 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-09-01 11:24:54 +0000 |
| commit | 3c86bfca024532cfbee0c2ba796f93d567af203f (patch) | |
| tree | 2fa10eafb2abaa0373eefc9a38f1637dc995cd4a /perl-install | |
| parent | 2a657dab8f8d01df6a7fd0df6c7431fc04f935ec (diff) | |
| download | drakx-backup-do-not-use-3c86bfca024532cfbee0c2ba796f93d567af203f.tar drakx-backup-do-not-use-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.gz drakx-backup-do-not-use-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.bz2 drakx-backup-do-not-use-3c86bfca024532cfbee0c2ba796f93d567af203f.tar.xz drakx-backup-do-not-use-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)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 2 |
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); |