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 | wakaba | 1.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 | wakaba | 1.2 | {type => 'text/x-suikawiki', module => 'SWE::Object::Document::SWML', |
11 | wakaba | 1.1 | label => 'SWML'}, |
12 | wakaba | 1.2 | {type => 'text/x.suikawiki.image', module => 'SWE::Object::Document::SWML'}, |
13 | wakaba | 1.1 | {type => 'application/x.suikawiki.config'}, |
14 | {type => 'text/plain', label => 'Plain text'}, | ||
15 | {type => 'image/x-canvas-instructions+text', | ||
16 | wakaba | 1.2 | module => 'SWE::Object::Document::CanvasInstructions', |
17 | wakaba | 1.1 | 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 |