summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive/gtk.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-10-17 18:34:49 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-10-17 18:34:49 +0000
commitacdc26142db3112becc42fe2e5c67147ed8a9fa7 (patch)
treeeb30f32b12e11786e3a8c6d94db4dc92b42344d3 /perl-install/interactive/gtk.pm
parent369fb96d664c7f80217611e52458cdfffc89af72 (diff)
downloaddrakx-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.pm2
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;