Forgotten chunk by jhi
Rafael Garcia-Suarez [Wed, 19 Oct 2005 13:19:17 +0000 (13:19 +0000)]
p4raw-id: //depot/perl@25805

symbian/makesis.pl

index 1ee5e8d..3c20ced 100644 (file)
@@ -75,6 +75,10 @@ for my $target (@target) {
             next unless /^lib\s+(.+)/;
             chomp;
             my $f = $1;
+           unless (-f "lib/$f") {
+               warn qq[$0: No "lib/$f", skipping...\n];
+               next;
+           }
             $f =~ s:/:\\:g;
             $copy{"lib\\$f"} = "$lib\\Perl\\$R_V_SV\\$f";
             print "\t$f\n";