diff options
| -rwxr-xr-x | borg-restore.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/borg-restore.pl b/borg-restore.pl index 116d9de..06eee24 100755 --- a/borg-restore.pl +++ b/borg-restore.pl @@ -587,7 +587,8 @@ sub clean_db { sub compact_db { my $db_path = shift; - run([qw(echo reorganize)], "|", ["gdbmtool", $db_path]) or die "Failed to reorganize database: $!"; + run([qw(echo reorganize)], "|", ["gdbmtool", $db_path], "2>", \my $output) or die "Failed to reorganize database: $!"; + print($output) if $opts{debug}; } sub update_cache { |