[ 新規 | 編集 | 差分 ] [ 検索 | 一覧 | FrontPage ] [ 履歴 (RSS) | 差分履歴 (RSS) ] [ ログイン ]
【PR】Amazon | SL-C3000 | SL-C1000(3/18発売!) | SL-C860 | SL-6000W | SL-6000L | SL-6000N

WalWiki/カスタマイズ/目次項目自動リンク

編集

目次となっている項目名に自動的にリンクを張ります。

[toc auto link]

編集

そのページの見出しと同じ文字列があった場合、自動的にリンクを貼ります。
(例:[toc auto link]text_to_html()内の変更)

text_to_html()内の変更

編集
        push(@tocresult, splice(@tocsaved));
        # yakty add [toc auto link] start
        my $result = join("\n", @result);
        my $ignoretag = "<\/((a)|(pre)|(form)|(h[1234])|(span))>";
        foreach my $toclink (@toc){
            $toclink =~ s/[\r\n]//g;
            $toclink =~ s/-+(<a.+?>(.+?)<\/a>.*)$/$1/;
            next if(length($2) < 5);
            $result =~ s+(\Q$2\E)(((.*?)($ignoretag))|(?!.*$ignoretag))+
                (length($_ = $2) > 0 and ($4 !~ /<$6/)) ? $& :
                $toclink . $_
                +ges;
        }
        # yakty add [toc auto link] end
        #return join("\n", @tocresult, @result);          # yakty del [toc auto link]
        return join("\n", @tocresult, $result);           # yakty add [toc auto link]

02284