summaryrefslogtreecommitdiff
path: root/installperl
diff options
context:
space:
mode:
authorSlaven Rezic <slaven@rezic.de>2003-07-04 02:41:36 +0200
committerJarkko Hietaniemi <jhi@iki.fi>2003-07-03 21:33:10 +0000
commit876c2cbbc9e925f792f6d5946762821fc3773706 (patch)
tree7039cc6ffb91a088a50e3c6653e9524876302538 /installperl
parentfbd3c14b02955d6284575071522c5a5887bc02f5 (diff)
downloadperl-876c2cbbc9e925f792f6d5946762821fc3773706.tar.gz
installperl -n
Message-Id: <200307032241.h63Mfaka041281@vran.herceg.de> p4raw-id: //depot/perl@19972
Diffstat (limited to 'installperl')
-rwxr-xr-xinstallperl2
1 files changed, 1 insertions, 1 deletions
diff --git a/installperl b/installperl
index 17d1b39aa1..da86e09652 100755
--- a/installperl
+++ b/installperl
@@ -213,7 +213,7 @@ if ($Is_VMS) { # Hang in there until File::Spec hits the big time
# Do some quick sanity checks.
-if ($d_dosuid && $>) { die "You must run as root to install suidperl\n"; }
+if (!$nonono && $d_dosuid && $>) { die "You must run as root to install suidperl\n"; }
$installbin || die "No installbin directory in config.sh\n";
-d $installbin || mkpath($installbin, $verbose, 0777);