X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/ffc9f25e734a8ca5397f2dfd09c1e31725624ee0..6c546c8f3182668c6d21d578b789674894f18c39:/IkiWiki/Plugin/toc.pm diff --git a/IkiWiki/Plugin/toc.pm b/IkiWiki/Plugin/toc.pm index b8537d3eb..4d29e7040 100644 --- a/IkiWiki/Plugin/toc.pm +++ b/IkiWiki/Plugin/toc.pm @@ -18,6 +18,7 @@ sub getsetup () { plugin => { safe => 1, rebuild => undef, + section => "widget", }, } @@ -58,13 +59,16 @@ sub format (@) { my $liststarted=0; my $indent=sub { "\t" x $curlevel }; $p->handler(start => sub { - my $tagname=shift; - my $text=shift; + my ($tagname, $text, $attr) = @_; if ($tagname =~ /^h(\d+)$/i) { my $level=$1; my $anchor="index".++$anchors{$level}."h$level"; $page.="$text"; - + # if the heading already has a unique ID, use that instead in TOC + if ($attr->{id}) { + $anchor = $attr->{id}; + } + # Unless we're given startlevel as a parameter, # take the first header level seen as the topmost level, # even if there are higher levels seen later on. @@ -123,7 +127,7 @@ sub format (@) { else { $page.=$text; } - }, "tagname, text"); + }, "tagname, text, attr"); $p->handler(default => sub { $page.=join("", @_) }, "text"); $p->parse($content); $p->eof;