X-Git-Url: https://mattmccutchen.net/rsync/rsync.git/blobdiff_plain/91a93df0497d9915d8b59e5caf1849dd9d14d5a1..5303941021034f9b6272d5c1512096e125aece1e:/support/file-attr-restore

diff --git a/support/file-attr-restore b/support/file-attr-restore
index 11d7524f..c4da61ef 100755
--- a/support/file-attr-restore
+++ b/support/file-attr-restore
@@ -47,7 +47,8 @@ while (<>) {
     my($type, $perms, $owner, $group, $name) = /$detail_line/;
     die "Invalid input line $.:\n$_" unless defined $name;
     die "A filename is not properly escaped:\n$_" unless $name =~ /^[^"\\]*(\\(\d\d\d|\D)[^"\\]*)*$/;
-    my $fn = eval "\"$name\"";
+    my $fn = $name;
+    $fn =~ s/\\(\d+|.)/ eval "\"\\$1\"" /eg;
     if ($type eq '-') {
 	undef $type unless -f $fn;
     } elsif ($type eq 'd') {