t/lib/common.pl: Ignore editor droppings

This bites me all the time.

diff --git a/t/lib/common.pl b/t/lib/common.pl
index 4ff2b09..561e1ff 100644 (file)
--- 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, "*");
 }