#?SuikaWikiConfig/2.0 Plugin: @Name: WikiNamespace @Description: @@@: Namespaced WikiName properties @@lang:en @License: %%Perl%% @Author: @@Name: @@@@: Wakaba @@@lang:ja @@@script:Latn @@Mail[list]: w@suika.fam.cx @Date.RCS: $Date: 2004/04/01 04:39:58 $ @RequiredPlugin[list]: HTML FormattingRule: @Category[list]: form-input view view-resource @Name: ns-short-page-name @Description: @@@: Last component of WikiName @@lang: en @Parameter: @@Name: page @@Type: WikiName @@Default: (auto) @@Description: @@@@: WikiName @@@lang: en @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{wiki}->{var}->{page}); $p->{-parent}->append_text ($name->[-1]); FormattingRule: @Category[list]: page-link @Name: ns-short-page-name @Description: @@@: Last component of WikiName @@lang: en @Parameter: @@Name: page @@Type: WikiName @@Default: (auto) @@Description: @@@@: WikiName @@@lang: en @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{link}->{dest}->{page_name}); $p->{-parent}->append_text ($name->[-1]); FormattingRule: @Category[list]: form-input view view-resource @Name: ns-page-path-name @Description: @@@: WikiName without last component @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{wiki}->{var}->{page}); $p->{-parent}->append_text ($o->{wiki}->name ([@$name[0..$#$name-1]]) ->stringify (wiki => $o->{wiki})); FormattingRule: @Category[list]: page-link @Name: ns-page-path-name @Description: @@@: WikiName without last component @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{link}->{dest}->{page_name}); $p->{-parent}->append_text ($o->{wiki}->name ([@$name[0..$#$name-1]]) ->stringify (wiki => $o->{wiki})); FormattingRule: @Category[list]: form-input view view-resource link-to-wikipage @Name: is-child-of-root-ns @Description: @@@: Conditional content, whether "parent" page exists or not @@lang: en @Parameter: @@Name: false @@Type: CDATA @@Default: (none) @@Description: @@@@: Evaluated if "parent" page does not exist @@@lang: en @Parameter: @@Name: page @@Type: WikiName @@Default: (auto) @@Description: @@@@: WikiPage name @@@lang: en @Parameter: @@Name: true @@Type: CDATA @@Default: (none) @@Description: @@@@: Evaluated if "parent" page exists @@@lang: en @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{wiki}->{var}->{page}); if (@$name == 1) { __ATTRNODE:%true->{$p->{-parent}}__; } else { __ATTRNODE:%false->{$p->{-parent}}__; } FormattingRule: @Category[list]: page-link @Name: is-child-of-root-ns @Description: @@@: Conditional content, whether "parent" page exists or not @@lang: en @Parameter: @@Name: false @@Type: CDATA @@Default: (none) @@Description: @@@@: Evaluated if "parent" page does not exist @@@lang: en @Parameter: @@Name: page @@Type: WikiName @@Default: (auto) @@Description: @@@@: WikiPage name @@@lang: en @Parameter: @@Name: true @@Type: CDATA @@Default: (none) @@Description: @@@@: Evaluated if "parent" page exists @@@lang: en @Formatting: my $name = $o->{wiki}->name ($p->{name} || $o->{link}->{dest}->{page_name}); if (@$name == 1) { __ATTRNODE:%true->{$p->{-parent}}__; } else { __ATTRNODE:%false->{$p->{-parent}}__; } FormattingRule: @Category[list]: view view-resource form-input page-link link-to-resource @Name: ns--root-wikiname @Description: @@@: Text representation of "root" WikiPage name @@lang: en @Formatting: $p->{-parent}->append_text ($o->{wiki}->{config}->{name}->{space}->{root}); ViewFragment: @Name: links @Formatting: %link-wiki ( page => {%ns-page-path-name;}p, rel => {up}, description => {%res (name => {WikiNS:GoToParent:Description});}p, ); Resource: @WikiNS:GoToParent:Description: @@@: Parent WikiPage, "%ns-page-path-name;" @@lang: en