]> Sergey Matveev's repositories - public-inbox.git/commitdiff
repo_atom: translate: account for multiple args
authorEric Wong <e@80x24.org>
Sat, 28 Jan 2023 11:02:53 +0000 (11:02 +0000)
committerEric Wong <e@80x24.org>
Sat, 28 Jan 2023 18:52:33 +0000 (18:52 +0000)
->translate should handle unlimited args, even if we don't
currently use it that way...

lib/PublicInbox/RepoAtom.pm

index 4a013147e7ba4eb427068048412633f73b5c13ca..44883ab468e81c15636aa215731a1a31db5ebad4 100644 (file)
@@ -46,7 +46,7 @@ sub translate {
        my $rec = $_[0] // return $self->zflush; # getline
        my @out;
        my $lbuf = delete($self->{lbuf}) // shift;
-       $lbuf .= shift if @_;
+       $lbuf .= shift while @_;
        my $is_tag = $self->{-is_tag};
        my ($H, $ct, $an, $ae, $at, $s, $bdy);
        while ($lbuf =~ s/\A([^\0]+)\0\n//s) {