[ 新規 ] [ 検索 | 一覧 | 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]


02289