diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-10-17 18:34:49 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-10-17 18:34:49 +0000 |
commit | acdc26142db3112becc42fe2e5c67147ed8a9fa7 (patch) | |
tree | eb30f32b12e11786e3a8c6d94db4dc92b42344d3 /perl-install/interactive/gtk.pm | |
parent | 369fb96d664c7f80217611e52458cdfffc89af72 (diff) | |
download | drakx-acdc26142db3112becc42fe2e5c67147ed8a9fa7.tar drakx-acdc26142db3112becc42fe2e5c67147ed8a9fa7.tar.gz drakx-acdc26142db3112becc42fe2e5c67147ed8a9fa7.tar.bz2 drakx-acdc26142db3112becc42fe2e5c67147ed8a9fa7.tar.xz drakx-acdc26142db3112becc42fe2e5c67147ed8a9fa7.zip |
make new perl_checker happy: replacing PKG::f by PKG::f()
Diffstat (limited to 'perl-install/interactive/gtk.pm')
-rw-r--r-- | perl-install/interactive/gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 3fb7fd02a..32e42b496 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -19,7 +19,7 @@ sub new { sub enter_console { my ($o) = @_; $o->{suspended} = common::setVirtual(1) } sub leave_console { my ($o) = @_; common::setVirtual(delete $o->{suspended}) } -sub exit { my_gtk::exit @_ } +sub exit { my_gtk::exit(@_) } sub ask_warn { local $my_gtk::pop_it = 1; |