From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on dcvr.yhbt.net X-Spam-Level: X-Spam-Status: No, score=-4.0 required=3.0 tests=ALL_TRUSTED,BAYES_00 shortcircuit=no autolearn=ham autolearn_force=no version=3.4.2 Received: from localhost (dcvr.yhbt.net [127.0.0.1]) by dcvr.yhbt.net (Postfix) with ESMTP id E45DE1FA17 for ; Wed, 9 Sep 2020 06:26:19 +0000 (UTC) From: Eric Wong To: meta@public-inbox.org Subject: [PATCH 07/11] t/cgi.t: show stderr on failures Date: Wed, 9 Sep 2020 06:26:14 +0000 Message-Id: <20200909062618.5940-8-e@80x24.org> In-Reply-To: <20200909062618.5940-1-e@80x24.org> References: <20200909062618.5940-1-e@80x24.org> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit List-Id: This helped me diagnose an error I would've introduced in the next commit. --- t/cgi.t | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/cgi.t b/t/cgi.t index 366d6594..96c627c3 100644 --- a/t/cgi.t +++ b/t/cgi.t @@ -158,7 +158,7 @@ sub cgi_run { my ($in, $out, $err) = ("", "", ""); my $rdr = { 0 => \$in, 1 => \$out, 2 => \$err }; run_script(['.cgi'], \%env, $rdr); - die "unexpected error: \$?=$?" if $?; + die "unexpected error: \$?=$? ($err)" if $?; my ($head, $body) = split(/\r\n\r\n/, $out, 2); { head => $head, body => $body, err => $err } }