summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-11 06:53:15 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-11 06:53:15 +0000
commit5958cf1a7d33507f531c6322dd8f2eac903ae1d5 (patch)
tree46710716f3fb5b425fdb9d28404d29ec53357bf8 /perl-install
parent8a4b29f7b0c727357677ad2c6d476a19770b082f (diff)
downloaddrakx-5958cf1a7d33507f531c6322dd8f2eac903ae1d5.tar
drakx-5958cf1a7d33507f531c6322dd8f2eac903ae1d5.tar.gz
drakx-5958cf1a7d33507f531c6322dd8f2eac903ae1d5.tar.bz2
drakx-5958cf1a7d33507f531c6322dd8f2eac903ae1d5.tar.xz
drakx-5958cf1a7d33507f531c6322dd8f2eac903ae1d5.zip
perl_checker cleanups
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/standalone.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 0a24c4cf5..04b373955 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -152,7 +152,7 @@ foreach (@ARGV) {
@ARGV = @new_ARGV;
-sub version {
+sub version() {
print 'Drakxtools version 10
Copyright (C) 1999-2004 Mandrakesoft by <install@mandrakesoft.com>
', $::license, "\n";
@@ -170,7 +170,7 @@ our @drakx_modules = qw(Xconfig::card Xconfig::default Xconfig::main Xconfig::mo
$SIG{SEGV} = sub { my $progname = $0; $progname =~ s|.*/||; exec("drakbug --incident $progname") };
-sub import {
+sub import() {
($standalone_name = $0) =~ s|.*/||;
c::openlog($standalone_name . "[$$]");
explanations('### Program is starting ###');