MojoMojoをSEOフレンドリーにするBK

wikiアプリケーション、MojoMojoはなかなかSEOのことを考えて作られている。
しかし、肝心の title タグの中身があまりいけていないので、ちょっと無理やり対応した。

[/lib/MojoMojo/Controllar/Page.pm: L108-]

    my ($title) = ($content->body =~ m![\r\n]?(.+)[\r\n]={8}!m);
    ($title) = ($content->body =~ m!#([^#]+)#[^#]!) unless $title;
    if ($title) {
        $title =~ s/(:?^\s+|\s$)//g;
        $stash->{title} = $title;
    }