diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-01-07 22:11:31 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-01-07 22:11:31 +0000 |
commit | 3d8f88d8ed6c648233297aca4564e7d98f831db5 (patch) | |
tree | 38211d546936a1da5e390c461bd61a5b4c44970d /perl-install | |
parent | f2dffc6fa695defa60e90367426b806921b74a64 (diff) | |
download | drakx-backup-do-not-use-3d8f88d8ed6c648233297aca4564e7d98f831db5.tar drakx-backup-do-not-use-3d8f88d8ed6c648233297aca4564e7d98f831db5.tar.gz drakx-backup-do-not-use-3d8f88d8ed6c648233297aca4564e7d98f831db5.tar.bz2 drakx-backup-do-not-use-3d8f88d8ed6c648233297aca4564e7d98f831db5.tar.xz drakx-backup-do-not-use-3d8f88d8ed6c648233297aca4564e7d98f831db5.zip |
fix ugly global setting of $ugtk2::pop_it
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/diskdrake/hd_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index f065eac0f..e6e0b6676 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -93,7 +93,7 @@ sub main { }); $w->sync; $done_button->grab_focus; - $ugtk2::pop_it = 1; + local $ugtk2::pop_it = 1; $in->ask_okcancel(N("Read carefully!"), N("Please make a backup of your data first"), 1) or return if $::isStandalone; $in->ask_warn('', |