From 7cb056a656708f7e7fa1d0bf00b2c8449a7f5aba Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Mon, 27 Apr 2015 19:01:45 +0200
Subject: [PATCH] don't emit STDERR output without DEBUG envirment variable

---
 scripts/aleph2iso.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/scripts/aleph2iso.pl b/scripts/aleph2iso.pl
index 7b8df6b..b058008 100755
--- a/scripts/aleph2iso.pl
+++ b/scripts/aleph2iso.pl
@@ -10,6 +10,8 @@ my $source = shift @ARGV || die "usage: $0 file.m21\n";
 my $dest = $source;
 $dest .= '.iso';
 
+close(STDERR) unless $ENV{DEBUG};
+
 open(my $m21, '<', $source);
 open(my $out, '>:encoding(utf-8)', $dest);
 
-- 
2.20.1