A slight simplification to the last change.
authorWayne Davison <wayned@samba.org>
Sat, 2 Sep 2006 20:05:08 +0000 (20:05 +0000)
committerWayne Davison <wayned@samba.org>
Sat, 2 Sep 2006 20:05:08 +0000 (20:05 +0000)
support/file-attr-restore

index 7238b00..c4da61e 100755 (executable)
@@ -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') {