summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2004-02-04 11:51:41 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2004-02-04 11:51:41 +0000
commitb7cb1aba6d00719171b15f0715fac27027fdb6f8 (patch)
tree3f97624d7fb6b8005746713f8822ab41dde5594e
parent524cc86121cfe73ccf0466acb5bcac2706d4e799 (diff)
downloaddrakx-b7cb1aba6d00719171b15f0715fac27027fdb6f8.tar
drakx-b7cb1aba6d00719171b15f0715fac27027fdb6f8.tar.gz
drakx-b7cb1aba6d00719171b15f0715fac27027fdb6f8.tar.bz2
drakx-b7cb1aba6d00719171b15f0715fac27027fdb6f8.tar.xz
drakx-b7cb1aba6d00719171b15f0715fac27027fdb6f8.zip
http://www.gnu.org/prep/standards_18.html says --help and --version are printed on standard output
-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 63bebc74e..f86e49fd5 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -126,7 +126,7 @@ foreach (@ARGV) {
$i++;
if (/^-(-help|h)$/) {
version();
- print STDERR N("\nUsage: %s [--auto] [--beginner] [--expert] [-h|--help] [--noauto] [--testing] [-v|--version] ", $progname), if_($usages{$progname}, $usages{$progname}), "\n";
+ print N("\nUsage: %s [--auto] [--beginner] [--expert] [-h|--help] [--noauto] [--testing] [-v|--version] ", $progname), if_($usages{$progname}, $usages{$progname}), "\n";
# print N("\nUsage: "), $::usage, "\n" if $::usage;
exit(0);
} elsif (/^-(-version|v)$/) {
@@ -154,7 +154,7 @@ foreach (@ARGV) {
sub version {
- print STDERR 'Drakxtools version 9.3.0
+ print 'Drakxtools version 9.3.0
Copyright (C) 1999-2004 MandrakeSoft by <install@mandrakesoft.com>
', $::license, "\n";
}