/[pub]/suikawiki/wikidata/suikawiki-config.ph
Suika

Diff of /suikawiki/wikidata/suikawiki-config.ph

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

revision 1.21 by wakaba, Fri Aug 6 08:57:15 2004 UTC revision 1.22 by wakaba, Tue Sep 21 03:18:49 2004 UTC
# Line 28  use strict; Line 28  use strict;
28    use Message::Util::Error;    use Message::Util::Error;
29    
30  use Message::Util::QName::General [q<ExpandedURI>], {  use Message::Util::QName::General [q<ExpandedURI>], {
31      'bt' => q<http://suika.fam.cx/~wakaba/archive/2004/8/11/sw-bt#>,
32    'log' => q<http://suika.fam.cx/~wakaba/-temp/2004/05/01/reqlog#>,    'log' => q<http://suika.fam.cx/~wakaba/-temp/2004/05/01/reqlog#>,
33    'media-type' => q<http://suika.fam.cx/~wakaba/-temp/2004/04/24/mt#>,    'media-type' => q<http://suika.fam.cx/~wakaba/-temp/2004/04/24/mt#>,
34    'pe' => q<http://suika.fam.cx/~wakaba/archive/2004/7/20/sw-propedit#>,    'pe' => q<http://suika.fam.cx/~wakaba/archive/2004/7/20/sw-propedit#>,
# Line 192  push our @Config, sub ($) { Line 193  push our @Config, sub ($) {
193          my $page = join '.ns/',          my $page = join '.ns/',
194                     map {s/([^0-9A-Za-z_-])/sprintf '+%02X', ord $1/ge;$_}                     map {s/([^0-9A-Za-z_-])/sprintf '+%02X', ord $1/ge;$_}
195                     @{$opt{wikiname}};                     @{$opt{wikiname}};
196          return URI->new ('wikidata/static/' . $page . '.css');          return URI->new ('wikidata/static/' . $page . '.css' .
197                             ($opt{lm} ? '?x-lm=' . $opt{lm} : ''));
198        };        };
199        ## Reverse mapping of generate-uri        ## Reverse mapping of generate-uri
200        $wiki->{config}->{ExpandedURI q<ss:uri-to-wikiname>} = sub {        $wiki->{config}->{ExpandedURI q<ss:uri-to-wikiname>} = sub {
# Line 346  push our @Config, sub ($) { Line 348  push our @Config, sub ($) {
348      q<IMT:text/css##> => 1,      q<IMT:text/css##> => 1,
349      q<IMT:text/plain##> => 1,      q<IMT:text/plain##> => 1,
350      q<IMT:text/x-suikawiki;version="0.9"##> => 1,      q<IMT:text/x-suikawiki;version="0.9"##> => 1,
351        q<IMT:text/x-suikawiki;version="0.10"##> => 1,
352        q<IMT:text/x.suikawiki.image;version="0.9"##> => 1,
353      q<IMT:application/x.suikawiki.config;version="2.0"##> => 1,      q<IMT:application/x.suikawiki.config;version="2.0"##> => 1,
354    };    };
355        
# Line 375  push our @Config, sub ($) { Line 379  push our @Config, sub ($) {
379      'license--type' => {uri => ExpandedURI q<sw:license--type>,      'license--type' => {uri => ExpandedURI q<sw:license--type>,
380                           type => ExpandedURI q<media-type:media-type>,                           type => ExpandedURI q<media-type:media-type>,
381                           depend => [qw/license/]},                           depend => [qw/license/]},
382      'obsoleted' => {uri => ExpandedURI q<sw09:obsoleted>},      'obsolete' => {uri => ExpandedURI q<sw:obsolete>, is_list => 1},
383      'rel-contents' => {uri => ExpandedURI q<relrev:contents>, is_list => 1},      'rel-contents' => {uri => ExpandedURI q<relrev:contents>, is_list => 1},
384      'rel-index' => {uri => ExpandedURI q<relrev:index>, is_list => 1},      'rel-index' => {uri => ExpandedURI q<relrev:index>, is_list => 1},
385      'rel-next' => {uri => ExpandedURI q<relrev:next>, is_list => 1},      'rel-next' => {uri => ExpandedURI q<relrev:next>, is_list => 1},
386      'rel-prev' => {uri => ExpandedURI q<relrev:prev>, is_list => 1},      'rel-prev' => {uri => ExpandedURI q<relrev:prev>, is_list => 1},
387      'rel-up' => {uri => ExpandedURI q<relrev:up>, is_list => 1},      'rel-up' => {uri => ExpandedURI q<relrev:up>, is_list => 1},
388    
389      ## For BugTrack plugin
390        'bt--status' => {uri => ExpandedURI q<bt:status>},
391        'bt--priority' => {uri => ExpandedURI q<bt:priority>},
392        'bt--category' => {uri => ExpandedURI q<bt:category>, is_list => 1},
393        'bt--subject' => {uri => ExpandedURI q<bt:subject>},
394    };    };
395    
396    ## -- Debug mode    ## -- Debug mode
Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22
admin@suikawiki.org
 ViewVC Help
Powered by ViewVC 1.1.24