Replace #4596 with the change done in 5.005_03.
authorJarkko Hietaniemi <jhi@iki.fi>
Sun, 21 Nov 1999 16:21:21 +0000 (16:21 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Sun, 21 Nov 1999 16:21:21 +0000 (16:21 +0000)
p4raw-id: //depot/cfgperl@4597

ext/Errno/Errno_pm.PL

index ba0b281..75dacfc 100644 (file)
@@ -21,7 +21,7 @@ unlink "errno.c" if -f "errno.c";
 sub process_file {
     my($file) = @_;
 
-    return if !defined $file || $file eq '-';
+    return unless defined $file and -f $file;
 
     local *FH;
     if (($^O eq 'VMS') && ($Config{vms_cc_type} ne 'gnuc')) {