Improve dual-universe comments in hints/sunos_4_1.sh

[p5sagit/p5-mst-13.2.git] / win32 / bin / search.bat

diff --git a/win32/bin/search.bat b/win32/bin/search.bat
index 0bb1237..88e83e5 100644 (file)
--- a/win32/bin/search.bat
+++ b/win32/bin/search.bat
@@ -653,7 +653,7 @@ sub read_rc
 
     print "reading RC file: $file\n" if $show;
 
-    while ($_ = ($use_default ? shift(@default) : <RC>)) {
+    while (defined($_ = ($use_default ? shift(@default) : <RC>))) {
        $ln = ++$line_num;                           ## note starting line num.
         $_ .= <RC>, $line_num++ while s/\\\n?$/\n/;  ## allow continuations
        next if /^\s*(#.*)?$/;          ## skip blank or comment-only lines.