WalWiki/カスタマイズ/ヘッダー文字列変更

差分表示

• 最後の更新で追加された行はこのように表示します。
• 最後の更新で削除された行はこのように表示します。

<h1>のヘッダー文字列を変更します。

* [modify header(h1)]

ヘッダー文字列を/で分割して上層のページが存在する場合にはそのページへのリンクにします。
** 関連するカスタマイズ

- [[WalWiki/カスタマイズ/汎用サブルーチン]]

** print_header()内の変更

 </div>
 <h1 class="header">@{[&make_headline($page)]}</h1><!-- yakty mod [modify header(h1)] -->
 EOD
 }

上の方式では、YukiWiki とは異なり、ページ名のところから、１行目の紹介が消えてしまいます。
無意味ながらも、元のように表示させたい場合は、

 </div>
 <h1 class="header">@{[&make_headline($page)]}@{[&escape(&get_subjectline($page))]}</h1><!-- yakty mod [modify header(h1)] -->
 EOD
 }

とします。どちらの方法をとられても、ページ一覧などでは変化はありません。
** make_headline()追加

 # yakty add [modify header(h1)] start
 sub make_headline {
     my ($page) = @_;
     my @header;
     my @category;
     foreach ($page =~ /([^\/]+)\//) {
     foreach ($page =~ /([^\/]+)\//g) {
         push(@category, $_);
         my $parent = join('/', @category);
         if($database{$parent}){
             my $link = &make_cachedlink($parent);
             $link =~ s|(<a.*?>)(.+)(</a>)|$1@category[-1]$3|;
             push(@header, $link);
         } else {
             push(@header, @category[-1]);
         }
     }
     my $thispage = $page;
     $thispage =~ s|^.+/||;
     push(@header, qq(<a title="$resource{searchthispage}" href="$url_cgi?mycmd=search&amp;mymsg=@{[&encode($page)]}">@{[&escape($thispage)]}</a>));
     return join("/", @header);
 }
 # yakty add [modify header(h1)] end