diff options
author | Father Chrysostomos <sprout@cpan.org> | 2016-07-30 23:19:11 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2016-07-31 06:35:05 -0700 |
commit | aebe74f4cf6c4b5d292a30ff3da053b73c26477a (patch) | |
tree | 8c5c3966949e30d75614c5ee0fb6097838024d3e | |
parent | 7bb33634741e6401456a85c49eb51fe0fc1aefc7 (diff) | |
download | perl-aebe74f4cf6c4b5d292a30ff3da053b73c26477a.tar.gz |
t/lib/common.pl: Ignore editor droppings
This bites me all the time.
-rw-r--r-- | t/lib/common.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/common.pl b/t/lib/common.pl index 4ff2b09dfb..561e1ffca8 100644 --- a/t/lib/common.pl +++ b/t/lib/common.pl @@ -27,7 +27,7 @@ if (@ARGV) { print "ARGV = [@ARGV]\n"; @w_files = map { "./lib/$pragma_name/$_" } @ARGV; } else { - @w_files = sort grep !/\.rej\z/, + @w_files = sort grep !/( \.rej | ~ | \ \(Autosaved\)\.txt ) \z/nx, glob catfile(curdir(), "lib", $pragma_name, "*"); } |