file to name it for gitweb.
summaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin/mdwn.pm
blob: 11f3f0137627643fe285e0464b59b2e0086b3f88 (plain) 
    

  1. #!/usr/bin/perl
    2. 

  2. # Markdown markup language
    3. 

  3. package IkiWiki::Plugin::mdwn;
    4. 

  4. 

  5. use warnings;
    6. 

  6. use strict;
    7. 

  7. use IkiWiki 2.00;
    8. 

  8. 

  9. sub import { #{{{
    10. 

  10.     hook(type => "htmlize", id => "mdwn", call => \&htmlize);
    11. 

  11. } # }}}
    12. 

  12. 

  13. my $markdown_sub;
    14. 

  14. sub htmlize (@) { #{{{
    15. 

  15.     my %params=@_;
    16. 

  16.     my $content = $params{content};
    17. 

  17. 

  18.     if (! defined $markdown_sub) {
    19. 

  19.         # Markdown is forked and splintered upstream and can be
    20. 

  20.         # available in a variety of forms. Support them all.
    21. 

  21.         no warnings 'once';
    22. 

  22.         $blosxom::version="is a proper perl module too much to ask?";