summaryrefslogtreecommitdiff
path: root/installperl
diff options
context:
space:
mode:
authorHans Mulder <hansmu@xs4all.nl>1998-06-29 09:31:29 -0700
committerGurusamy Sarathy <gsar@cpan.org>1998-07-04 02:16:03 +0000
commit8530e788ed7c379a2ce97baf3a0eaa5e1470f685 (patch)
treeabe65a39064f6e1fab4a56f2c2af4cbf5098c130 /installperl
parentc73bb82c00a639630ef310b1ac1d896f5afcedab (diff)
downloadperl-8530e788ed7c379a2ce97baf3a0eaa5e1470f685.tar.gz
don't attempt to copy directories on VMS
Message-Id: <3.0.5.32.19980629163129.00a82140@ous.edu> Subject: [PATCH 5.004_69]Tweak to installperl p4raw-id: //depot/perl@1280
Diffstat (limited to 'installperl')
-rwxr-xr-xinstallperl1
1 files changed, 1 insertions, 0 deletions
diff --git a/installperl b/installperl
index dadb99bad6..44e5d1b493 100755
--- a/installperl
+++ b/installperl
@@ -558,6 +558,7 @@ sub installlib {
sub copy_if_diff {
my($from,$to)=@_;
+ return 1 if (($^O eq 'VMS') && (-d $from));
-f $from || die "$0: $from not found";
$packlist->{$to} = { type => 'file' };
if (compare($from, $to) || $nonono) {