@@ -1,6 +1,7 @@

+  * Report nonzero death of m4 better.

1 files changed, 1 insertions, 1 deletions

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+$//;