IkiWiki/Plugin/wikitext.pm

   1 #!/usr/bin/perl
   2 # WikiText markup
   3 package IkiWiki::Plugin::wikitext;
   4
   5 use warnings;
   6 use strict;
   7 use IkiWiki;
   8
   9 sub import { #{{{
  10         hook(type => "htmlize", id => "wiki", call => \&htmlize);
  11 } # }}}
  12
  13 sub htmlize (@) { #{{{
  14         my %params=@_;
  15         my $content = $params{content};
  16
  17         eval q{use Text::WikiFormat};
  18         return $content if $@;
  19         return Text::WikiFormat::format($content, undef, { implicit_links => 0 });
  20 } # }}}
  21
  22 1