- msg_iter($_[0], \&add_text_body, $ctx, 1);
-}
-
-sub flush_quote {
- my ($s, $l, $quot) = @_;
-
- # show everything in the full version with anchor from
- # short version (see above)
- my $rv = $l->linkify_1($$quot);
-
- # we use a <span> here to allow users to specify their own
- # color for quoted text
- $rv = $l->linkify_2(ascii_html($rv));
- $$quot = undef;
- $$s .= qq(<span\nclass="q">) . $rv . '</span>'
+ msg_iter($_[0], \&add_text_body, $_[1], 1);