Yes, that was valid Perl syntax :x
---
 t/cindex-join.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/cindex-join.t b/t/cindex-join.t
index 0972afa4..2836eb6c 100644
--- a/t/cindex-join.t
+++ b/t/cindex-join.t
@@ -41,7 +41,7 @@ EOM
 
 while (my ($url, $v, $ng) = splice(@inboxes, 0, 3)) {
        my ($key) = ($url =~ m!/([^/]+)\z!);
-       my @opt = (version => $v, tmpdir => "$tmpdir/$key" -no_gc => 1);
+       my @opt = (version => $v, tmpdir => "$tmpdir/$key", -no_gc => 1);
        $inboxes{$key} = create_inbox $key, @opt, sub {
                my ($im, $ibx) = @_;
                $im->done;

Reply via email to