From 6240d91b29e35bed5308139eb63c9cac7c3578fd Mon Sep 17 00:00:00 2001
From: Michael Vrable <mvrable@cs.ucsd.edu>
Date: Wed, 16 May 2007 22:27:31 -0700
Subject: [PATCH] Bugfix for restore.pl.

Indirect references to data blocks were not being properly handled, so
large files (those using an indirect reference to the data) were not
restored properly.

This was at least caught by the checksums, so no data was ever silently
corrupted.
---
 restore.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/restore.pl b/restore.pl
index c7b4cca..53b48dc 100755
--- a/restore.pl
+++ b/restore.pl
@@ -166,7 +166,7 @@ sub iterate_objects {
         next if $obj eq "";
         if ($obj =~ /^@(\S+)$/) {
             my $indirect = load_ref($1);
-            iterate_objects($callback, $arg, $1, $recursion_level + 1);
+            iterate_objects($callback, $arg, $indirect, $recursion_level + 1);
         } else {
             &$callback($arg, $obj);
         }
-- 
2.20.1