(parse_files): Choked on CVS, backup files, and more. Fix to work only on
*.t. Closes #793707.
This commit is contained in:
parent
1feab53eca
commit
c91687c1b7
1 changed files with 1 additions and 4 deletions
|
@ -133,13 +133,10 @@ sub parse_files {
|
||||||
&error("Illegal filename (it is a type name).");
|
&error("Illegal filename (it is a type name).");
|
||||||
}
|
}
|
||||||
|
|
||||||
open (LS, "ls $dir|");
|
open (LS, "cd $dir && ls *.t|");
|
||||||
|
|
||||||
while (<LS>) {
|
while (<LS>) {
|
||||||
chop;
|
chop;
|
||||||
next if /^GNUmakefile$/;
|
|
||||||
next if /^Makefile$/;
|
|
||||||
next if /^MakeSrcs$/;
|
|
||||||
$filename = $_;
|
$filename = $_;
|
||||||
&parse_file;
|
&parse_file;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue