/[pub]/suikawiki/script/misc/plugins/WikiInfo.pm
Suika

Contents of /suikawiki/script/misc/plugins/WikiInfo.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations) (download)
Sun May 16 23:05:49 2010 UTC (14 years, 5 months ago) by wakaba
Branch: MAIN
CVS Tags: suikawiki3-redirect, HEAD
Branch point for: helowiki-2005
added latest .pm files

1 wakaba 1.1 use strict;
2     package SuikaWiki::Plugin::Registry;
3    
4    
5     our %Info;
6     $Info{q#WikiInfo#}->{Name} = q#WikiInfo#;
7     $Info{q#WikiInfo#}->{q#Version#} = q#2004.0831.0328#;
8     $Info{q#WikiInfo#}->{q#InterfaceVersion#} = q#2.9.1#;
9     $Info{q#WikiInfo#}->{q#mkpluginVersion#} = q#2.1.19#;
10     $Info{q#WikiInfo#}->{q#module_name#} = q#SuikaWiki::Plugin::plugin::WikiInfo1040731032806pYj6#;
11     $Info{q#WikiInfo#}->{RequiredPlugin} = [q#WikiLinking#];
12     $Info{q#WikiInfo#}->{Description} = [[q#WikiEngine and/or wiki configuration information#, q#en#, q##]];
13     $Info{q#WikiInfo#}->{License} = [[q#%%GPL%%#, q##, q##]];
14     $Info{q#WikiInfo#}->{Author} = [[[[q#Wakaba#, q#ja#, q#Latn#]], [[q#w@suika.fam.cx#]], [q##]]];
15    
16     push @{$SuikaWiki::View::Implementation::TemplateFragment{q#ws__footer#}}, {
17     Main => q#%link-to-resource (
18     label => {%link-to-it (label => {%wikiengine-driver-name;}p);},
19     uri => {%wikiengine-driver-uri-reference;}p,
20     );/%wikiengine-driver-version;
21     %link-to-resource (
22     label => {%link-to-it (label => {%wikiengine-name;}p);},
23     uri => {%wikiengine-uri-reference;}p,
24     );/%wikiengine-version; #,
25     Order => 0,
26     Description => [[q#WikiEngine version in footer#, q#en#, q##]],
27     };
28    
29     package SuikaWiki::Plugin::plugin::WikiInfo1040731032806pYj6;
30    
31     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine name#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
32    
33     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_name']/Formatting)"
34     $p->{-parent}->append_text ($o->{wiki}->{engine_name});}}
35     #line 1 "(WikiPlugin module WikiInfo, chunk 1)"
36     ;
37     $SuikaWiki::Plugin::Rule{view}->{wikiengine_name} = $def;
38     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_name} = $def;
39     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_name} = $def;
40     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_name} = $def;
41     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_name} = $def;
42     };
43    
44     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine URI reference#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
45    
46     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_uri_reference']/Formatting)"
47     $p->{-parent}->append_text ($o->{wiki}->{engine_uri_reference});}}
48     #line 1 "(WikiPlugin module WikiInfo, chunk 3)"
49     ;
50     $SuikaWiki::Plugin::Rule{view}->{wikiengine_uri_reference} = $def;
51     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_uri_reference} = $def;
52     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_uri_reference} = $def;
53     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_uri_reference} = $def;
54     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_uri_reference} = $def;
55     };
56    
57     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine version#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
58    
59     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_version']/Formatting)"
60     $p->{-parent}->append_text ($o->{wiki}->{engine_version});}}
61     #line 1 "(WikiPlugin module WikiInfo, chunk 5)"
62     ;
63     $SuikaWiki::Plugin::Rule{view}->{wikiengine_version} = $def;
64     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_version} = $def;
65     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_version} = $def;
66     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_version} = $def;
67     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_version} = $def;
68     };
69    
70     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine driver name#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
71    
72     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_driver_name']/Formatting)"
73     $p->{-parent}->append_text ($o->{wiki}->{driver_name});}}
74     #line 1 "(WikiPlugin module WikiInfo, chunk 7)"
75     ;
76     $SuikaWiki::Plugin::Rule{view}->{wikiengine_driver_name} = $def;
77     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_driver_name} = $def;
78     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_driver_name} = $def;
79     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_driver_name} = $def;
80     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_driver_name} = $def;
81     };
82    
83     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine driver URI reference#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
84    
85     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_driver_uri_reference']/Formatting)"
86     $p->{-parent}->append_text ($o->{wiki}->{driver_uri_reference});}}
87     #line 1 "(WikiPlugin module WikiInfo, chunk 9)"
88     ;
89     $SuikaWiki::Plugin::Rule{view}->{wikiengine_driver_uri_reference} = $def;
90     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_driver_uri_reference} = $def;
91     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_driver_uri_reference} = $def;
92     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_driver_uri_reference} = $def;
93     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_driver_uri_reference} = $def;
94     };
95    
96     {my $def = {q#Parameter#, {}, q#Description#, [[q#WikiEngine driver version#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_;
97    
98     #line 1 "(WikiPlugin module source WikiInfo.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#]/wikiengine_driver_version']/Formatting)"
99     $p->{-parent}->append_text ($o->{wiki}->{driver_version});}}
100     #line 1 "(WikiPlugin module WikiInfo, chunk 11)"
101     ;
102     $SuikaWiki::Plugin::Rule{view}->{wikiengine_driver_version} = $def;
103     $SuikaWiki::Plugin::Rule{view_resource}->{wikiengine_driver_version} = $def;
104     $SuikaWiki::Plugin::Rule{page_link}->{wikiengine_driver_version} = $def;
105     $SuikaWiki::Plugin::Rule{link_to_resource}->{wikiengine_driver_version} = $def;
106     $SuikaWiki::Plugin::Rule{form_input}->{wikiengine_driver_version} = $def;
107     };
108     package SuikaWiki::Plugin::Registry;
109    
110     $Info{q#WikiInfo#}->{provide} = {q#rule#, {q#link_to_resource#, [q#wikiengine_name#, q#wikiengine_uri_reference#, q#wikiengine_version#, q#wikiengine_driver_name#, q#wikiengine_driver_uri_reference#, q#wikiengine_driver_version#], q#form_input#, [q#wikiengine_name#, q#wikiengine_uri_reference#, q#wikiengine_version#, q#wikiengine_driver_name#, q#wikiengine_driver_uri_reference#, q#wikiengine_driver_version#], q#view#, [q#wikiengine_name#, q#wikiengine_uri_reference#, q#wikiengine_version#, q#wikiengine_driver_name#, q#wikiengine_driver_uri_reference#, q#wikiengine_driver_version#], q#view_resource#, [q#wikiengine_name#, q#wikiengine_uri_reference#, q#wikiengine_version#, q#wikiengine_driver_name#, q#wikiengine_driver_uri_reference#, q#wikiengine_driver_version#], q#page_link#, [q#wikiengine_name#, q#wikiengine_uri_reference#, q#wikiengine_version#, q#wikiengine_driver_name#, q#wikiengine_driver_uri_reference#, q#wikiengine_driver_version#]}, q#viewfragment#, [{q#Name#, q#ws__footer#}]};
111    
112     1;

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24