Parent Directory
| 
Revision Log
++ swe/lib/SWE/ChangeLog 14 Sep 2009 02:38:21 -0000 * Lang.pm: Changed module names. 2009-09-14 Wakaba <wakaba@suika.fam.cx> ++ swe/lib/SWE/Object/Document/ChangeLog 14 Sep 2009 02:40:50 -0000 * SWML.pm: New module. 2009-09-14 Wakaba <wakaba@suika.fam.cx> ++ swe/lib/SWE/Object/ChangeLog 14 Sep 2009 02:40:09 -0000 * Document.pm: Added |rebless| method family. Moved SWML-to-HTML/XML/text convertion methods to another module. * Document/: New directory. 2009-09-14 Wakaba <wakaba@suika.fam.cx> ++ swe/lib/suikawiki/ChangeLog 14 Sep 2009 02:39:42 -0000 * main.pl: Call the |rebless| method on the SWE::Object::Document module such that format-dependent methods can be invoked. 2009-09-14 Wakaba <wakaba@suika.fam.cx>
| 1 | package SWE::Lang; |
| 2 | use strict; |
| 3 | use warnings; |
| 4 | use Exporter::Lite; |
| 5 | |
| 6 | our @EXPORT_OK = qw(@ContentMediaType %ContentMediaType); |
| 7 | |
| 8 | our @ContentMediaType = |
| 9 | ( |
| 10 | {type => 'text/x-suikawiki', module => 'SWE::Object::Document::SWML', |
| 11 | label => 'SWML'}, |
| 12 | {type => 'text/x.suikawiki.image', module => 'SWE::Object::Document::SWML'}, |
| 13 | {type => 'application/x.suikawiki.config'}, |
| 14 | {type => 'text/plain', label => 'Plain text'}, |
| 15 | {type => 'image/x-canvas-instructions+text', |
| 16 | module => 'SWE::Object::Document::CanvasInstructions', |
| 17 | label => 'Drawing'}, |
| 18 | {type => 'text/css', label => 'CSS'}, |
| 19 | ); |
| 20 | our %ContentMediaType = map { $_->{type} => $_ } @ContentMediaType; |
| 21 | |
| 22 | 1; |
| admin@suikawiki.org | ViewVC Help |
| Powered by ViewVC 1.1.24 |