SyntaxHighlighterでTemplate Toolkitをハイライトする

これは結構大変だった。前回いじったshBrushPerl.jsと同じ場所¹にshBrushTT2.jsを置いても、それだけでは反映されない。次のファイルをいじる。

/mt/plugins/SyntaxHighlighter/lib/SyntaxHighlighter/Plugin.pm

# 149行目あたりに2行を追加
        'html'=>'shBrushXml',
        'xhtml'=>'shBrushXml',
        'tt' => 'shBrushTT2',
        'tt2' => 'shBrushTT2',
    );

これで後はHTMLヘッダーテンプレートに”tt2″を加えるだけだ。

<$mt:SyntaxHighlighterInclude brush="html,perl,jscript,bash,tt2,plain" theme="default"$>

肝心のshBrushTT2.jsの中身は次の通り。

SyntaxHighlighterにハイライトしたい語句を追加する

Perl5.10で登場した語句や、Mooseなキーワードがハイライトされないのでそれを改良。といっても大したことはない。次のファイルをいじる。

/mt-static/plugins/SyntaxHighlighter/2.0/scripts/shBrushPerl.js

// 53行目あたり
'undef unlink unpack ... ' +
'say';

// 59行目あたり
'require return sub ... ' +
'try catch with using otherwise finally given when state BEGIN END ' +
'extends requires has';

後は必要なときに付け足していこう。

技術系（？）のネタはこちらに書くことにする。Perl見習いとしてはやはりMovable Typeだろうと言うことで、一日かけてセットアップした。
とりあえず真っ先にシンタックスハイライトプラグインを導入。ググってみたらこれが一番いいみたい。

SyntaxHighlighter for Movable Type « kwLog
http://blog.makotokw.com/portfolio/movabletype/syntaxhighlighter/

“say”のような新しいwordをハイライトしてくれないみたいだが、それはまた後でいじろう。

#!/usr/bin/perl
use utf8;
use errors -with_using;
use Modern::Perl;

say "Hello, World!";