/[suikacvs]/webroot/swe/lib/SWE/Lang.pm
Suika

Contents of /webroot/swe/lib/SWE/Lang.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (hide annotations) (download)
Mon Sep 14 02:41:01 2009 UTC (15 years, 7 months ago) by wakaba
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +3 -3 lines
++ 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