X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=t%2Fqspawn.t;fp=t%2Fqspawn.t;h=745ec4d8134cf6c3662d2596fa6e9abf4bf29e04;hb=b8655db863d42a023a32c4604e10ee2acb619aa9;hp=170e4d7f4e8d4e66276846d1720402df1c562a3b;hpb=a6c9e09129dfc34fbd1b9bc757dc201fb9ff77c3;p=public-inbox.git

diff --git a/t/qspawn.t b/t/qspawn.t
index 170e4d7f..745ec4d8 100644
--- a/t/qspawn.t
+++ b/t/qspawn.t
@@ -1,8 +1,16 @@
-# Copyright (C) 2016-2018 all contributors <meta@public-inbox.org>
+# Copyright (C) 2016-2019 all contributors <meta@public-inbox.org>
 # License: AGPL-3.0+ <https://www.gnu.org/licenses/agpl-3.0.txt>
 use Test::More;
 use_ok 'PublicInbox::Qspawn';
 
+{
+	my $cmd = [qw(sh -c), 'echo >&2 err; echo out'];
+	my $qsp = PublicInbox::Qspawn->new($cmd, {}, { 2 => 1 });
+	my $res;
+	$qsp->psgi_qx({}, undef, sub { $res = ${$_[0]} });
+	is($res, "err\nout\n", 'captured stderr and stdout');
+}
+
 my $limiter = PublicInbox::Qspawn::Limiter->new(1);
 {
 	my $x = PublicInbox::Qspawn->new([qw(true)]);