| 1 |
use strict; |
| 2 |
package SuikaWiki::Plugin::Registry; |
| 3 |
|
| 4 |
|
| 5 |
our %Info; |
| 6 |
$Info{q#Devel#}->{Name} = q#Devel#; |
| 7 |
$Info{q#Devel#}->{q#Version#} = q#2004.0831.0328#; |
| 8 |
$Info{q#Devel#}->{q#InterfaceVersion#} = q#2.9.1#; |
| 9 |
$Info{q#Devel#}->{q#mkpluginVersion#} = q#2.1.19#; |
| 10 |
$Info{q#Devel#}->{q#module_name#} = q#SuikaWiki::Plugin::plugin::Devel1040731032805T19r#; |
| 11 |
$Info{q#Devel#}->{RequiredPlugin} = [q#Error#]; |
| 12 |
$Info{q#Devel#}->{RequiredModule} = []; |
| 13 |
$Info{q#Devel#}->{Description} = [[q#SuikaWiki Develping Tools#, q#en#, q##]]; |
| 14 |
$Info{q#Devel#}->{License} = [[q#%%GPL%%#, q##, q##]]; |
| 15 |
$Info{q#Devel#}->{Author} = [[[[q#Wakaba#, q#ja#, q#Latn#]], [[q#w@suika.fam.cx#]], [q##]]]; |
| 16 |
|
| 17 |
package SuikaWiki::Plugin::plugin::Devel1040731032805T19r; |
| 18 |
|
| 19 |
{my $def = {q#Parameter#, {}, q#Description#, [[q#Shows call function stack trace table#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_; |
| 20 |
|
| 21 |
#line 1 "(WikiPlugin module source Devel.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#page-link#, q#link-to-resource#, q#form-input#, q#form-template#]/call_trace_table']/Formatting)" |
| 22 |
SuikaWiki::Plugin->module_package ('Error') |
| 23 |
->make_caller_trace_table ($p->{-parent});}} |
| 24 |
#line 1 "(WikiPlugin module Devel, chunk 1)" |
| 25 |
; |
| 26 |
$SuikaWiki::Plugin::Rule{view}->{call_trace_table} = $def; |
| 27 |
$SuikaWiki::Plugin::Rule{view_resource}->{call_trace_table} = $def; |
| 28 |
$SuikaWiki::Plugin::Rule{page_link}->{call_trace_table} = $def; |
| 29 |
$SuikaWiki::Plugin::Rule{link_to_resource}->{call_trace_table} = $def; |
| 30 |
$SuikaWiki::Plugin::Rule{form_input}->{call_trace_table} = $def; |
| 31 |
$SuikaWiki::Plugin::Rule{form_template}->{call_trace_table} = $def; |
| 32 |
}; |
| 33 |
|
| 34 |
{my $def = {q#Parameter#, {}, q#Description#, [[q#Output formatting rule context name#, q#en#, q##]], q#main#, sub {my ($f, $rule_name, $p, $o, %opt) = @_; |
| 35 |
|
| 36 |
#line 1 "(WikiPlugin module source Devel.wp2, block FormattingRule[name()='[q#view#, q#view-resource#, q#form-input#, q#form-template#, q#page-link#, q#link-to-resource#]/context']/Formatting)" |
| 37 |
$p->{-parent}->append_text ($f->{-category_name});}} |
| 38 |
#line 1 "(WikiPlugin module Devel, chunk 3)" |
| 39 |
; |
| 40 |
$SuikaWiki::Plugin::Rule{view}->{context} = $def; |
| 41 |
$SuikaWiki::Plugin::Rule{view_resource}->{context} = $def; |
| 42 |
$SuikaWiki::Plugin::Rule{form_input}->{context} = $def; |
| 43 |
$SuikaWiki::Plugin::Rule{form_template}->{context} = $def; |
| 44 |
$SuikaWiki::Plugin::Rule{page_link}->{context} = $def; |
| 45 |
$SuikaWiki::Plugin::Rule{link_to_resource}->{context} = $def; |
| 46 |
}; |
| 47 |
package SuikaWiki::Plugin::Registry; |
| 48 |
|
| 49 |
$Info{q#Devel#}->{provide} = {q#rule#, {q#link_to_resource#, [q#call_trace_table#, q#context#], q#form_input#, [q#call_trace_table#, q#context#], q#form_template#, [q#call_trace_table#, q#context#], q#view#, [q#call_trace_table#, q#context#], q#view_resource#, [q#call_trace_table#, q#context#], q#page_link#, [q#call_trace_table#, q#context#]}}; |
| 50 |
|
| 51 |
1; |
Parent Directory
| 
Revision Log