lei_mirror: retrieve v2 description properly

diff --git a/lib/PublicInbox/LeiMirror.pm b/lib/PublicInbox/LeiMirror.pm
index 44d7a5240781fb338f9b1c7c733cf5b461f47957..9c457fcab054c6a68bdceaea5dce3c803dd05d8b 100644 (file)
--- a/lib/PublicInbox/LeiMirror.pm
+++ b/lib/PublicInbox/LeiMirror.pm
@@ -449,7 +449,7 @@ failed to extract epoch number from $src
        $lei->{opt}->{'inbox-config'} =~ /\A(?:always|v2)\z/s and
                _get_txt_start($task, '_/text/config/raw', $fini);
 
-       _get_txt_start($self, 'description', $fini);
+       _get_txt_start($task, 'description', $fini);
 
        $task->{-locked} = $lk->lock_for_scope($$) if !$self->{dry_run};
        my @cmd = clone_cmd($lei, my $opt = {});

diff --git a/t/www_listing.t b/t/www_listing.t
index 45287c7dfdd5882df6dcc112702e047e6cea2de3..6166b94ed508ab5c642c38d204eb5685d47132de 100644 (file)
--- a/t/www_listing.t
+++ b/t/www_listing.t
@@ -91,6 +91,10 @@ SKIP: {
                is(xsys(@clone, $alt, "$v2/git/$i.git"), 0, "clone epoch $i")
        }
        ok(open(my $fh, '>', "$v2/inbox.lock"), 'mock a v2 inbox');
+       open($fh, '>', "$v2/description") or xbail "open $v2/description: $!";
+       print $fh "a v2 inbox\n" or xbail "print $!";
+       close $fh or xbail "write: $v2/description $!";
+
        open $fh, '>', "$alt/description" or xbail "open $alt/description $!";
        print $fh "we're \xc4\x80ll clones\n" or xbail "print $!";
        close $fh or xbail "write: $alt/description $!";
@@ -143,6 +147,9 @@ EOM
                                        /v2/git/1.git /v2/git/2.git) ],
                'manifest saved');
        for (keys %$mf) { ok(-d "$tmpdir/pfx$_", "pfx/$_ cloned") }
+       open my $desc, '<', "$tmpdir/pfx/v2/description" or xbail "open: $!";
+       $desc = <$desc>;
+       is($desc, "a v2 inbox\n", 'v2 description retrieved');
 
        $clone_err = '';
        ok(run_script(['-clone', '--include=*/alt',