/[pub]/suikawiki/script/default/config.wp2
Suika

Diff of /suikawiki/script/default/config.wp2

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by wakaba, Fri Dec 26 07:05:09 2003 UTC revision 1.4 by wakaba, Fri Jan 16 08:06:42 2004 UTC
# Line 64  ViewFragment: Line 64  ViewFragment:
64      @@lang:en      @@lang:en
65    @Order: 100    @Order: 100
66    @Formatting:    @Formatting:
67      %section (level=>2,      %section (
68        id       => children,        id       => children,
69        title    => {%res(name=>{Children:Title});}p, heading,        title    => {%res(name=>{Children:Title});}p, heading,
70        content  => {%page-list (        content  => {%page-list (
# Line 73  ViewFragment: Line 73  ViewFragment:
73                       template => {%res(name=>{Children:Item});}p,                       template => {%res(name=>{Children:Item});}p,
74                     );}p,                     );}p,
75      );      );
76          %section (level=>2,          %section (
77            id => see-also,            id => see-also,
78            title => {%res(name=>SeeAlso);}p, heading,            title => {%res(name=>SeeAlso);}p, heading,
79            content => {%search-result;}p,            content => {%search-result;}p,
80          );          );
81          %section (level=>2,          %section (
82            id => referer,            id => referer,
83            title => {%res(name=>Referer);}p, heading,            title => {%res(name=>Referer);}p, heading,
84            content => {%referer-list;}p,            content => {%referer-list;}p,
# Line 94  ViewFragment: Line 94  ViewFragment:
94          description => {%res (name => {Footer:License:SeeLicensePageLong});}p,          description => {%res (name => {Footer:License:SeeLicensePageLong});}p,
95        );},        );},
96      );      );
97        %wpr--remove-button;
98    
99  ViewFragment:  ViewFragment:
100    @Template[list]:wr--read-body    @Template[list]:wr--read-body
# Line 145  ViewFragment: Line 146  ViewFragment:
146    @Formatting:    @Formatting:
147      %line(content=>{      %line(content=>{
148        %submit(accesskey=>S,label=>{%res(name=>{Edit:Save});}p);        %submit(accesskey=>S,label=>{%res(name=>{Edit:Save});}p);
149      }p);        [%wpp--next-anchor-index;]
150        }p);
151    
152  ViewFragment:  ViewFragment:
153    @Name: we--edit    @Name: we--edit
# Line 168  ViewFragment: Line 170  ViewFragment:
170    @Formatting:    @Formatting:
171        %mode-after-edit-selection;        %mode-after-edit-selection;
172            
173          %we--update-lastmodified-datetime;
174    
175      }p);      }p);
176    
177  Resource:  Resource:
# Line 182  Resource: Line 186  Resource:
186  ## WikiPageRename  ## WikiPageRename
187  ViewFragment:  ViewFragment:
188    @Template[list]: we--adminedit-body    @Template[list]: we--adminedit-body
189    @Order:10    @Order:100
190    @Description:    @Description:
191      @@@: Renaming WikiName section      @@@: Renaming WikiName section
192      @@lang:en      @@lang:en
193    @Formatting:    @Formatting:
194                  %section(level=>2,                  %section (
195                    title   => {%res(name=>{Edit:Rename:Title});}p, heading,                    title   => {%res(name=>{Edit:Rename:Title});}p, heading,
196                    content => {                    content => {
197                      %wp-rename-form (                      %wp-rename-form (
# Line 204  ViewFragment: Line 208  ViewFragment:
208                    }p,                    }p,
209                  );                  );
210    
211    PluginConst:
212      @NS_XHTML1:
213        http://www.w3.org/1999/xhtml
214    
215    FormattingRule:
216      @Name: debug-sw09-text-xml-text-diff
217      @Formatting:
218        my $page = $p->{page} ? [split m#//#, $p->{page}]
219                              : $o->{wiki}->{var}->{page};
220        my $sw09 = SuikaWiki::Plugin->module_package ('SuikaWiki09');
221        
222        ## Original Text Format
223        my $text1 = $o->{wiki}->{db}->get (content => $page);
224        
225        ## Text format -> XML format
226        my $xml = new Message::Markup::XML::Node type => '#fragment';
227        $sw09->text_to_xml ($text1, {-parent => $xml});
228        
229        ## XML format -> Text format
230        my $text2 = $sw09->xml_to_text ($xml, {});
231        
232        $p->{-parent}->append_new_node (type => '#element',
233                                        namespace_uri => $NS_XHTML1,
234                                        local_name => 'pre')
235                     ->append_text ($xml->outer_xml);
236        SuikaWiki::Plugin->module_package ('WikiEdit')
237                         ->diff_in_html (\$text1, \$text2 =>
238          $p->{-parent}->append_new_node (type => '#element',
239                                          namespace_uri => $NS_XHTML1,
240                                          local_name => 'pre')
241        );
242    
243    FormattingRule:
244      @Category[list]:view
245      @Name: debug-sw09-text-xml-text-diff
246      @Formatting:
247        my $page = $p->{page} ? [split m#//#, $p->{page}]
248                              : $o->{wiki}->{var}->{page};
249        my $sw09 = SuikaWiki::Plugin->module_package ('SuikaWiki09');
250        
251        ## Original Text Format
252        my $text1 = $o->{wiki}->{db}->get (content => $page);
253        
254        ## Text format -> XML format
255        my $xml = new Message::Markup::XML::Node type => '#fragment';
256        $sw09->text_to_xml ($text1, {-parent => $xml});
257        
258        ## XML format -> Text format
259        my $text2 = $sw09->xml_to_text ($xml, {});
260        
261        $p->{-parent}->append_new_node (type => '#element',
262                                        namespace_uri => $NS_XHTML1,
263                                        local_name => 'pre')
264                     ->append_text ($xml->outer_xml);
265        $p->{-parent}->append_new_node (type => '#element',
266                                        namespace_uri => $NS_XHTML1,
267                                        local_name => 'pre')
268                     ->append_text ($text2);
269        SuikaWiki::Plugin->module_package ('WikiEdit')
270                         ->diff_in_html (\$text1, \$text2 => $p->{-parent});
271    
272    
273    Was ViewFragment:
274      @Template[list]:wr--read-body
275      @Order: 120
276      @Formatting:
277        %section (
278          heading,
279          title => "Diff",
280          content => {
281            %debug-sw09-text-xml-text-diff;
282          }p,
283        );
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24