Change 18502 by jhi@lyta on 2003/01/16 22:53:23
Integrate from maint-5.6:
[ 18477]
search utility doesn't skip exe/lib/pdb files properly on windows
Affected files ...
... //depot/perl/win32/bin/search.pl#7 integrate
Differences ...
==== //depot/perl/win32/bin/search.pl#7 (text) ====
Index: perl/win32/bin/search.pl
--- perl/win32/bin/search.pl#6~8614~ Tue Jan 30 10:13:38 2001
+++ perl/win32/bin/search.pl Thu Jan 16 14:53:23 2003
@@ -634,8 +634,8 @@
## no RC file -- use this default.
@default = split(/\n/,<<'--------INLINE_LITERAL_TEXT');
magic: 32 : $H =~ m/[\x00-\x06\x10-\x1a\x1c-\x1f\x80\xff]{2}/
- option: -skip '.a .COM .elc .EXE .gz .o .pbm .xbm .dvi'
- option: -iskip '.tarz .zip .z .lzh .jpg .jpeg .gif .uu'
+ option: -skip '.a .elc .gz .o .pbm .xbm .dvi'
+ option: -iskip '.com .exe .lib .pdb .tarz .zip .z .lzh .jpg .jpeg .gif .uu'
<!~> option: -skip '~ #'
--------INLINE_LITERAL_TEXT
}
End of Patch.