diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-13 00:54:36 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-13 00:54:36 +0000 |
commit | 9254117a69ef2349e35ff4dd02800571e0634dd7 (patch) | |
tree | 5832370eee953b1d4f6bad2f38151023f77f89c4 /perl-install | |
parent | 7e8ff9d936a7fa1108c82910d9b4bb6ac6fd94f0 (diff) | |
download | drakx-9254117a69ef2349e35ff4dd02800571e0634dd7.tar drakx-9254117a69ef2349e35ff4dd02800571e0634dd7.tar.gz drakx-9254117a69ef2349e35ff4dd02800571e0634dd7.tar.bz2 drakx-9254117a69ef2349e35ff4dd02800571e0634dd7.tar.xz drakx-9254117a69ef2349e35ff4dd02800571e0634dd7.zip |
Remove a perl compilation warning
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/standalone.pm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 04b373955..4ef99726a 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -119,6 +119,11 @@ Network & Internet connection and monitoring application $usages{$_} = $usages{rpmdrake} foreach qw(rpmdrake-remove MandrakeUpdate); $usages{Xdrakres} = $usages{XFdrake}; +sub version() { + print 'Drakxtools version 10 +Copyright (C) 1999-2004 Mandrakesoft by <install@mandrakesoft.com> +', $::license, "\n"; +} my ($i, @new_ARGV); foreach (@ARGV) { @@ -152,12 +157,6 @@ foreach (@ARGV) { @ARGV = @new_ARGV; -sub version() { - print 'Drakxtools version 10 -Copyright (C) 1999-2004 Mandrakesoft by <install@mandrakesoft.com> -', $::license, "\n"; -} - ################################################################################ #- stuff will go to special /var/log/explanations file |