X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=installperl;h=44e5d1b49318db5fa85da4c48f74b066a379637a;hb=2d259d9294e79c03b1a69d3eaac3d6e5647468d7;hp=dadb99bad604dbddaa22f906241055046f972792;hpb=b3eb6a9ba72c92b7decf330d8d63b32ba5499629;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/installperl b/installperl
index dadb99b..44e5d1b 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) {