]> Sergey Matveev's repositories - public-inbox.git/blobdiff - t/git.t
git: qx: avoid extra "local" for scalar context case
[public-inbox.git] / t / git.t
diff --git a/t/git.t b/t/git.t
index dfd7173a432c78dd9072a9530be7e1695b4ee20d..dcd053c569429efc5a91a86857ee932ee938da82 100644 (file)
--- a/t/git.t
+++ b/t/git.t
@@ -79,6 +79,7 @@ if (1) {
        my @ref = $gcf->qx(qw(cat-file blob), $buf);
        my $nl = scalar @ref;
        ok($nl > 1, "qx returned array length of $nl");
+       is(join('', @ref), $ref, 'qx array and scalar context both work');
 
        $gcf->qx(qw(repack -adq));
        ok($gcf->packed_bytes > 0, 'packed size is positive');