projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
24fef2a
)
Ask about /usr/bin/perl iff STDIN and STDERR are terminals
author
Chip Salzenberg
<chip@perl.com>
Fri, 31 Jan 1997 12:23:07 +0000
(
00:23
+1200)
committer
Chip Salzenberg
<chip@atlantic.net>
Tue, 4 Feb 1997 05:47:00 +0000
(17:47 +1200)
installperl
patch
|
blob
|
history
diff --git
a/installperl
b/installperl
index
bbcd1c3
..
d4cb711
100755
(executable)
--- a/
installperl
+++ b/
installperl
@@
-179,7
+179,8
@@
foreach $file (@corefiles) {
$mainperl_is_instperl = 0;
-if (-w $mainperldir && ! &samepath($mainperldir, $installbin) && !$nonono) {
+if (!$nonono && -t STDIN && -t STDERR
+ && -w $mainperldir && ! &samepath($mainperldir, $installbin)) {
local($usrbinperl) = "$mainperldir/perl$exe_ext";
local($instperl) = "$installbin/perl$exe_ext";
local($expinstperl) = "$binexp/perl$exe_ext";