change what Git::Annex:BatchCommand::say does in scalar context

I believe this is more useful.

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>

1 files changed, 4 insertions, 2 deletions

diff --git a/t/13_batchcommand.t b/t/13_batchcommand.t
index e2e5cce..3d72e8f 100755
--- a/t/13_batchcommand.t
+++ b/t/13_batchcommand.t
@@ -46,11 +46,13 @@ with_temp_annexes {
       "it passes --batch to git-annex";
     my ($response1, $response2) = $batch->say("foo/foo2/baz", "foo/foo2/baz");
     is $response1, $response2, "it returns a list in list context";
-    is scalar $batch->say("foo/foo2/baz", "foo/foo2/baz"), 2,
-      "it returns a scalar in scalar context";
     my ($response3, $response4) = $batch->say("foo/foo2/baz", "foo/bar");
     is_deeply [$response3, $response4], ["foo/foo2/baz", ""],
       "it returns results in the correct order";
+    my $response5 = $batch->say("foo/foo2/baz");
+    is $response5, "foo/foo2/baz", "it returns a single result into a scalar";
+    my ($response6) = $batch->say("foo/foo2/baz");
+    is $response6, "foo/foo2/baz", "it still returns a list in list context";
 
     undef $batch;
     ok !kill(0, $second_pid),