CSSファイルへのリンクを記述すると、そのリンクを辿る事で指定したCSSに変更する事が出来ます。
[use cookie]
例えば下記のような感じで指定。(ただしここのWikiでは適用していないので利用できませんと思ったんですけど適用してみました)
[[sbox擬態 http://jm.vis.ne.jp/sbox/WalWiki/theme/wiki.css]] [[元に戻す wiki.css]]
sboxさんがこの改造を適用して下さっています。
resource.txtへの追加
changecss | CSS変更 |
@cookie_listへの追加
my @cookie_list = ('mypassword','myname','myindexlooks','mycss'); # yakty add [use cookie]
print_header()内の変更
print_header()内ならどこでも良いんだけど適当なところに追加
# yakty add [change CSS] start $form{mycss} = $url_stylesheet if(length($form{mycss}) == 0); # yakty add [change CSS] end my $cookedpage = &encode($page); my $escapedpage = &escape($page); # Walrus add [robot exclusion] start my $meta_robot;
<!--link rel="stylesheet" type="text/css" href="$url_stylesheet"--><!-- yakty del [change CSS] --> <link rel="stylesheet" type="text/css" href="$form{mycss}"><!-- yakty add [change CSS] -->
make_link()内の変更
- 2004-01-16 (Fri) 11:52:37 aタグのhref属性がダブルクォーテーションで括られていなかったので修正。
# Walrus add [alias link] start # yakty add [change CSS] start if ($chunk =~ /\.css$/) { if($chunk =~ /\//){ $form{mycss} = $chunk; } else { $form{mycss} = "$modifier_url_data/$chunk"; } if($page_command{$form{mypage}}){ $form{mycmd} = $page_command{$form{mypage}}; } else { $form{mycmd} = 'read'; } $cookedchunk = &encode($form{mypage}); my $cookedcss = &encode($form{mycss}); return qq(<a title="$resource{changecss}" href="$url_cgi?mycmd=$form{mycmd}&mypage=$cookedchunk&mycss=$cookedcss">$escapedname</a>); } elsif ($chunk =~ /^(http|https|ftp|mailto):/) { # yakty add [change CSS] end # if ($chunk =~ /^(http|https|ftp|mailto):/) { # yakty del [change CSS]