chiark / gitweb /
Move a $debug check into printdebug (nfc)
[dgit.git] / Debian / Dgit.pm
index 2b9479d..641a917 100644 (file)
@@ -92,7 +92,7 @@ sub enabledebug () {
 }
     
 sub printdebug {
-    print ::DEBUG $debugprefix, @_ or die $!;
+    print ::DEBUG $debugprefix, @_ or die $! if $debug>0;
 }
 
 sub shellquote {