Source

wml-extended-apis / xhtml / 1.x / std / toc / toc.wml.tt2

Diff from to

xhtml/1.x/std/toc/toc.wml.tt2

 sub myfunc
 {
 my $elem = shift;
-return ("<li>", "<a href=\"#" . $elem->{id} . "\">", $elem->{body}, "</a>",
+return ("<li>", "<a href=\"#" . $elem->{id} . "\">" . $elem->{body} . "</a>",
         (@{$_->{subs}} ? 
             ("<br />", "<ul>", 
                 (map { myfunc($_)