diff options
Diffstat (limited to 'clone_build_tree.pl')
-rwxr-xr-x | clone_build_tree.pl | 40 |
1 files changed, 20 insertions, 20 deletions
diff --git a/clone_build_tree.pl b/clone_build_tree.pl index a374ed5f..c70ee525 100755 --- a/clone_build_tree.pl +++ b/clone_build_tree.pl @@ -62,26 +62,26 @@ sub findCallback { ); if ($matches) { - $matches &&= (! -l $_ && - ! /^core\z/s && - ! /^.*\.rej\z/s && - ! /^.*\.state\z/s && - ! /^.*\.so\z/s && - ! /^.*\.[oa]\z/s && - ! /^.*\.dll\z/s && - ! /^.*\.lib\z/s && - ! /^.*\.obj\z/s && - ! /^.*~\z/s && - ! /^\.\z/s && - ! /^\.#.*\z/s && - ! /^.*\.ncb\z/s && - ! /^.*\.opt\z/s && - ! /^.*\.bak\z/s && - ! /^.*\.suo\z/s && - ! /^.*\.ilk\z/s && - ! /^.*\.pdb\z/s && - ! /^.*\.pch\z/s && - ! /^.*\.log\z/s && + $matches &&= (! -l $_ && + ! ( -f $_ && /^core\z/s) && + ! /^.*\.rej\z/s && + ! /^.*\.state\z/s && + ! /^.*\.so\z/s && + ! /^.*\.[oa]\z/s && + ! /^.*\.dll\z/s && + ! /^.*\.lib\z/s && + ! /^.*\.obj\z/s && + ! /^.*~\z/s && + ! /^\.\z/s && + ! /^\.#.*\z/s && + ! /^.*\.ncb\z/s && + ! /^.*\.opt\z/s && + ! /^.*\.bak\z/s && + ! /^.*\.suo\z/s && + ! /^.*\.ilk\z/s && + ! /^.*\.pdb\z/s && + ! /^.*\.pch\z/s && + ! /^.*\.log\z/s && ! ( -f $_ && /^.*\.d\z/s ) ); |