diff options
| -rw-r--r-- | perl-install/standalone.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 97f4e0fe1..03babd9b2 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -146,10 +146,10 @@ foreach (@ARGV) { print N("\nUsage: %s [--auto] [--beginner] [--expert] [-h|--help] [--noauto] [--testing] [-v|--version] ", $progname), if_($usages{$progname}, common::translate($usages{$progname})), "\n"; # print N("\nUsage: "), $::usage, "\n" if $::usage; - exit(0); + CORE::exit(0); } elsif (/^-(-version|v)$/) { version(); - exit(0); + CORE::exit(0); } elsif (/^--embedded$/) { $::XID = splice @ARGV, $i, 1; $::isEmbedded = 1; |