diff options
| author | Florian Pritz <bluewind@xinu.at> | 2017-11-12 01:08:09 +0100 |
|---|---|---|
| committer | Florian Pritz <bluewind@xinu.at> | 2017-11-12 01:08:09 +0100 |
| commit | 28688c3b7f872bd56939eb6da39ca038f9e4d3dd (patch) | |
| tree | bdccb4e0d507b6f53bb84373dd504db7584583ef | |
| parent | 1884b461e52b31ff26af8f7739ba1919d12d016c (diff) | |
| download | App-BorgRestore-28688c3b7f872bd56939eb6da39ca038f9e4d3dd.tar.gz App-BorgRestore-28688c3b7f872bd56939eb6da39ca038f9e4d3dd.tar.xz | |
Prefix logging of uncaught exceptions
Signed-off-by: Florian Pritz <bluewind@xinu.at>
| -rwxr-xr-x | script/borg-restore.pl | 2 |
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); }; } |