From: Eric Wong <e@80x24.org>
Date: Sun, 28 Feb 2016 23:39:12 +0000 (+0000)
Subject: spawnpp: die instead of exit on exec failure
X-Git-Tag: v1.0.0~685
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=89bd3f4826f91647216765534eacfb37267a27a3;p=public-inbox.git

spawnpp: die instead of exit on exec failure

Perl may complain about exit not being executed, but not die.
---

diff --git a/lib/PublicInbox/SpawnPP.pm b/lib/PublicInbox/SpawnPP.pm
index 1a402e42..288625d0 100644
--- a/lib/PublicInbox/SpawnPP.pm
+++ b/lib/PublicInbox/SpawnPP.pm
@@ -25,7 +25,7 @@ sub public_inbox_fork_exec ($$$$$$) {
 			$ENV{$k} = $v;
 		}
 		exec @$cmd;
-		exit 1;
+		die "exec $cmd->[0] failed: $!\n";
 	}
 	$pid;
 }