chiark / gitweb /
Turn all perl warnings into errors
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Tue, 28 Apr 2015 12:06:02 +0000 (13:06 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sun, 31 May 2015 10:54:07 +0000 (11:54 +0100)
debian/changelog
dgit
infra/dgit-repos-policy-debian
infra/dgit-repos-server

index b925ce7..2dc8ab1 100644 (file)
@@ -63,6 +63,8 @@ dgit (0.23~) unstable; urgency=low
 
   * Use ftpmasterapi archive query method.  (Closes:#727702.)
 
+  * Turn all perl warnings into errors using $SIG{__WARN__}.
+
  --
 
 dgit (0.22.1) unstable; urgency=high
diff --git a/dgit b/dgit
index 68d8b42..1f1c425 100755 (executable)
--- a/dgit
+++ b/dgit
@@ -18,6 +18,7 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 use strict;
+$SIG{__WARN__} = sub { die $_[0]; };
 
 use IO::Handle;
 use Data::Dumper;
index 526db03..88eb4fc 100755 (executable)
@@ -2,6 +2,8 @@
 # dgit repos policy hook script for Debian
 
 use strict;
+$SIG{__WARN__} = sub { die $_[0]; };
+
 use POSIX;
 use JSON;
 use File::Temp qw(tempfile);
index 560f1ad..5155014 100755 (executable)
@@ -26,6 +26,7 @@
 #   mDM.TXT
 
 use strict;
+$SIG{__WARN__} = sub { die $_[0]; };
 
 # DGIT-REPOS-DIR contains:
 # git tree (or other object)      lock (in acquisition order, outer first)