From babeab5a089ac6654e7d4ba2d3667f35aa3d54e7 Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Sun, 23 Jun 2002 22:32:06 +0000
Subject: [PATCH] @@ -1,6 +1,7 @@ +  * Report nonzero death of m4 better.

---
 changelog                | 1 +
 debian/changelog         | 1 +
 ipif/udptunnel-reconf.pl | 2 +-
 3 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/changelog b/changelog
index 1f5e2e2..8783e65 100644
--- a/changelog
+++ b/changelog
@@ -1,6 +1,7 @@
 userv-utils (0.2.4) unstable; urgency=low
 
   * Minor fixes to INSTALL.
+  * Report nonzero death of m4 better.
 
  --
 
diff --git a/debian/changelog b/debian/changelog
index 1f5e2e2..8783e65 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,6 +1,7 @@
 userv-utils (0.2.4) unstable; urgency=low
 
   * Minor fixes to INSTALL.
+  * Report nonzero death of m4 better.
 
  --
 
diff --git a/ipif/udptunnel-reconf.pl b/ipif/udptunnel-reconf.pl
index d802e6f..e4851a4 100755
--- a/ipif/udptunnel-reconf.pl
+++ b/ipif/udptunnel-reconf.pl
@@ -55,7 +55,7 @@ sub run_m4 ($$$) {
     undef $/;
     $m4out= <X>;
     $/= "\n";
-    close X; $? and exit -1;
+    $!=0; close X; $? and die "m4 failed with code $? $!";
     $m4out =~ s/^\s+//;
     $m4out =~ s/\n+/\n/g;
     $m4out =~ s/\s+$//;
-- 
2.30.2