From b9eab10485eabbf4ac59a6aeb492ac7370e96ba9 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Thu, 31 Dec 2015 21:16:39 +0000 Subject: git: add support for qx wrapper This lets us one-line git commands easily like ``, but without having to remember --git-dir or escape arguments. --- t/git.t | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 't') diff --git a/t/git.t b/t/git.t index 0f3dbae3..d7b20d0d 100644 --- a/t/git.t +++ b/t/git.t @@ -129,6 +129,14 @@ if (1) { local $/; is($all, <$fh>, 'entire read matches'); }; + + my $ref = $gcf->qx(qw(cat-file blob), $buf); + is($all, $ref, 'qx read giant single string'); + + my @ref = $gcf->qx(qw(cat-file blob), $buf); + is($all, join('', @ref), 'qx returned array when wanted'); + my $nl = scalar @ref; + ok($nl > 1, "qx returned array length of $nl"); } done_testing(); -- cgit v1.2.3-24-ge0c7