summaryrefslogtreecommitdiffstats
path: root/script
diff options
context:
space:
mode:
authorFlorian Pritz <bluewind@xinu.at>2017-11-12 01:08:09 +0100
committerFlorian Pritz <bluewind@xinu.at>2017-11-12 01:08:09 +0100
commit28688c3b7f872bd56939eb6da39ca038f9e4d3dd (patch)
treebdccb4e0d507b6f53bb84373dd504db7584583ef /script
parent1884b461e52b31ff26af8f7739ba1919d12d016c (diff)
downloadApp-BorgRestore-28688c3b7f872bd56939eb6da39ca038f9e4d3dd.tar.gz
App-BorgRestore-28688c3b7f872bd56939eb6da39ca038f9e4d3dd.tar.xz
Prefix logging of uncaught exceptions
Signed-off-by: Florian Pritz <bluewind@xinu.at>
Diffstat (limited to 'script')
-rwxr-xr-xscript/borg-restore.pl2
1 files changed, 1 insertions, 1 deletions
diff --git a/script/borg-restore.pl b/script/borg-restore.pl
index c349df0..d6e97e5 100755
--- a/script/borg-restore.pl
+++ b/script/borg-restore.pl
@@ -198,7 +198,7 @@ sub logger_setup {
return if($^S);
local $Log::Log4perl::caller_depth =
$Log::Log4perl::caller_depth + 1;
- Log::Log4perl->get_logger()->fatal(@_);
+ Log::Log4perl->get_logger()->fatal("Uncaught exception: ".$_[0], @_[1..$#_]);
exit(2);
};
}