Changeset 164

Timestamp:

01/19/08 13:21:10 (23 months ago)

Author:

mart

Message:

Add better error message for the "restored filesize is wrong" error.

Files:

• trunk/lib/Brackup/Restore.pm (modified) (2 diffs)

trunk/lib/Brackup/Restore.pm

@@ -64 +64 @@
     my $target = eval {"$driver_class"->new_from_backup_header($driver_meta); };
     if ($@) {
-        die "Failed to instantiate target ($driver_class) for restore, perhaps it doesn't support restoring yet?\n\nThe error was: $@";
+        die "Failed to instantiate target ($driver_class) for restore. Perhaps it doesn't support restoring yet?\n\nThe error was: $@";
     }
     $self->{_target} = $target;
@@ -271 +271 @@
     print $fh $$ref;
     close($fh) or die;
-    die unless -s $file == length $$ref;
+    die "Restored file is not of the correct size" unless -s $file == length $$ref;
     return 1;
 }