WalWiki/カスタマイズ/カスタムツールバー

差分表示

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

編集可能なツールバー、およびユーザー毎のツールバーを定義します。

- 2004-04-23 (Fri) 18:41:40 名前にエイリアス(別名)を使用した場合でも自分のツールバーが表示されるように変更。例えば[[yakty@りなざう yakty]]と言う名前を使用した場合でもyaktyのツールバーが表示されます。
* [[custom toolbar]

CustomToolbarページでツールバーの定義を行います。
クッキーに保存されいるユーザー名のセクションがあればそのセクションの内容を追加ツールバーとして表示します。
ユーザー毎の定義がない場合には #default のツールバーを追加で表示します。
** グローバル変数追加

 my $CustomToolbar = 'CustomToolbar';                        # yakty add [custom toolbar]

** print_header()内の変更

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

** make_customtoolbar()追加

- 2004-04-23 (Fri) 18:40:20 名前にエイリアス(別名)を使用した場合でも自分のツールバーが表示されるように変更。

 # yakty add [custom toolbar] start
 sub make_cusotmtoolbar {
 sub make_customtoolbar {
     my $barname;
     my %toolbar;
     my ($name) = ($form{myname} =~ /(\S+)$/);
     foreach (split /\n/, $database{$CustomToolbar}){
         if(/^(\*{1,$header_level})(?:\s*)(.*)/){
             $barname = ((length($1) == 2) ? $2 : "");
             $toolbar{$barname} = "";
             last if($form{myname} and $toolbar{$form{myname}});
             last if($name and $toolbar{$name});
         } elsif($barname) {
             $toolbar{$barname} .= &inline($_);
         }
     }
     my $bar;
     if($form{myname} and defined $toolbar{$form{myname}}){
         $bar = $toolbar{$form{myname}};
     if($name and defined $toolbar{$name}){
         $bar = $toolbar{$name};
     } elsif(defined $toolbar{'#default'}){
         $bar = $toolbar{'#default'};
     } else {
         return "";
     }
     return ($bar) ? "<br>$bar" : "";
 }
 # yakty add [custom toolbar] end