]> git.vanrenterghem.biz Git - git.ikiwiki.info.git/blobdiff - doc/todo/color_plugin.mdwn
Added a comment
[git.ikiwiki.info.git] / doc / todo / color_plugin.mdwn
index 69afe837d1f66ef8b5721c9357fc44487dd316b3..19fba3b3506e82f7e3e5746e68706703cd379fbc 100644 (file)
@@ -132,12 +132,12 @@ Of course, I'm open for discussion or exchange of ideas :) --[[Paweł|ptecza]]
        +use strict;
        +use IkiWiki 2.00;
        +
-       +sub import { #{{{
+       +sub import {
        +       hook(type => "preprocess", id => "color", call => \&preprocess);
        +       hook(type => "format",     id => "color", call => \&format);
-       +} #}}}
+       +}
        +
-       +sub preserve_style ($$$) { #{{{
+       +sub preserve_style ($$$) {
        +       my $foreground = shift;
        +       my $background = shift;
        +       my $text       = shift;
@@ -162,18 +162,18 @@ Of course, I'm open for discussion or exchange of ideas :) --[[Paweł|ptecza]]
        +       
        +       return $preserved;
        +
-       +} #}}}
+       +}
        +
-       +sub replace_preserved_style ($) { #{{{
+       +sub replace_preserved_style ($) {
        +       my $content = shift;
        +
        +       $content =~ s!<span class="color">((color: ([a-z]+|\#[0-9a-f]{3,6})?)?((; )?(background-color: ([a-z]+|\#[0-9a-f]{3,6})?)?)?)</span>!<span class="color" style="$1">!g;
        +       $content =~ s!<span class="colorend">!!g;
        +
        +       return $content;
-       +} #}}}
+       +}
        +
-       +sub preprocess (@) { #{{{
+       +sub preprocess (@) {
        +       my %params = @_;
        +
        +       # Preprocess the text to expand any preprocessor directives
@@ -182,14 +182,14 @@ Of course, I'm open for discussion or exchange of ideas :) --[[Paweł|ptecza]]
        +                               IkiWiki::filter($params{page}, $params{destpage}, $params{text}));
        +
        +       return preserve_style($params{foreground}, $params{background}, $params{text});
-       +} #}}}
+       +}
        +
-       +sub format (@) { #{{{
+       +sub format (@) {
        +       my %params = @_;
        +
        +       $params{content} = replace_preserved_style($params{content});
        +       return $params{content};        
-       +} #}}}
+       +}
        +
        +1
        --- /dev/null   2008-06-21 02:02:15.000000000 +0200