From 71f9e4673e5991f3ee149e8d41d5767371589fcb Mon Sep 17 00:00:00 2001 From: Wayne Davison Date: Sat, 2 Sep 2006 20:05:08 +0000 Subject: [PATCH] A slight simplification to the last change. --- support/file-attr-restore | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/support/file-attr-restore b/support/file-attr-restore index 7238b00f..c4da61ef 100755 --- a/support/file-attr-restore +++ b/support/file-attr-restore @@ -48,7 +48,7 @@ while (<>) { die "Invalid input line $.:\n$_" unless defined $name; die "A filename is not properly escaped:\n$_" unless $name =~ /^[^"\\]*(\\(\d\d\d|\D)[^"\\]*)*$/; my $fn = $name; - $fn =~ s/\\(\d+|[A-Za-z]|.)/ eval "\"\\$1\"" /eg; + $fn =~ s/\\(\d+|.)/ eval "\"\\$1\"" /eg; if ($type eq '-') { undef $type unless -f $fn; } elsif ($type eq 'd') { -- 2.34.1