Warn but continue installing when file missing (Dan Sugalski)
Charles Bailey [Thu, 2 Mar 2000 03:39:46 +0000 (03:39 +0000)]
p4raw-id: //depot/vmsperl@5416

installperl

index 387f4b3..dd6d663 100755 (executable)
@@ -631,7 +631,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";
+    -f $from || warn "$0: $from not found";
     $packlist->{$to} = { type => 'file' };
     if (compare($from, $to) || $nonono) {
        safe_unlink($to);   # In case we don't have write permissions.