From d0f0c18f649a409008ecf4bf7f86ece271247918 Mon Sep 17 00:00:00 2001
From: Axel Burri <axel@tty0.ch>
Date: Mon, 19 Aug 2019 12:40:41 +0200
Subject: [PATCH] btrbk: logging functions take array as argument

---
 btrbk | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/btrbk b/btrbk
index e1a9b0c..f13aedd 100755
--- a/btrbk
+++ b/btrbk
@@ -374,11 +374,11 @@ END_HELP
 }
 
 
-sub TRACE { my $t = shift; print STDERR "... $t\n" if($loglevel >= 4);  }
-sub DEBUG { my $t = shift; print STDERR "$t\n" if($loglevel >= 3);  }
-sub INFO  { my $t = shift; print STDERR "$t\n" if($loglevel >= 2);  }
-sub WARN  { my $t = shift; print STDERR "WARNING: $t\n" if($loglevel >= 1);  }
-sub ERROR { my $t = shift; print STDERR "ERROR: $t\n";  }
+sub TRACE { if($loglevel >= 4) { print STDERR "... $_\n"      foreach(@_) } }
+sub DEBUG { if($loglevel >= 3) { print STDERR "$_\n"          foreach(@_) } }
+sub INFO  { if($loglevel >= 2) { print STDERR "$_\n"          foreach(@_) } }
+sub WARN  { if($loglevel >= 1) { print STDERR "WARNING: $_\n" foreach(@_) } }
+sub ERROR {                      print STDERR "ERROR: $_\n"   foreach(@_) ; }
 
 sub WARN_ONCE {
   my $t = shift;