]> sipb.mit.edu Git - ikiwiki.git/commitdiff
code's in git
authorhttps://www.google.com/accounts/o8/id?id=AItOawnxp2XU8gIribhhGhGuYtU6eMMwHv5gUGI <Amitai@web>
Thu, 9 Jun 2011 08:06:24 +0000 (08:06 +0000)
committeradmin <admin@branchable.com>
Thu, 9 Jun 2011 08:06:24 +0000 (08:06 +0000)
doc/plugins/contrib/mandoc.mdwn

index e4ff96d08d525ec51efd67b98a571bd151fbb418..1db3e4da6737c3ae1af033a65eff15e8623185fd 100644 (file)
@@ -1,4 +1,5 @@
 [[!template id=plugin name=mandoc author="[[schmonz]]"]]
+[[!template id=gitbranch branch=schmonz/master author="[[schmonz]]"]]
 [[!tag type/format]]
 
 This plugin lets ikiwiki convert Unix man pages to HTML. It uses
@@ -6,55 +7,3 @@ This plugin lets ikiwiki convert Unix man pages to HTML. It uses
 xrefs into hyperlinks.
 
 Sample output: <http://wiki.netbsd.org/users/schmonz/tunefs.8/>
-
------
-
-
-    #!/usr/bin/perl
-    package IkiWiki::Plugin::mandoc;
-    
-    use warnings;
-    use strict;
-    use IkiWiki 3.00;
-    use Encode;
-    use IPC::Open2;
-    
-    sub import {
-       hook(type => "getsetup", id => "mandoc", call => \&getsetup);
-       hook(type => "htmlize", id => $_, call => \&htmlize, keepextension => 1)
-               foreach ('man', 1..9);
-    }
-    
-    sub getsetup () {
-       return
-               plugin => {
-                       safe => 1,
-                       rebuild => 1, # format plugin
-                       section => "format",
-               },
-    }
-    
-    sub htmlize (@) {
-       my %params=@_;
-       my $content = decode_utf8(encode_utf8($params{content}));
-    
-       return $content if $@;
-    
-       my $pid = open2(*MANDOCOUT, *MANDOCIN, 'mandoc', '-Thtml');
-       binmode($_, ':utf8') foreach (*MANDOCOUT, *MANDOCIN);
-    
-       print MANDOCIN $content;
-       close MANDOCIN;
-       my @html_output = <MANDOCOUT>;
-       close MANDOCOUT;
-       waitpid $pid, 0;
-    
-       my $html = join('', @html_output);
-       my $link_prefix = $config{usedirs} ? '../' : '';
-       my $link_suffix = $config{usedirs} ? '/' : '';
-       $html =~ s|<a class="link-man">(.+?)\((.)\)</a>|<a class="link-man" href="$link_prefix$1.$2$link_suffix">$1($2)</a>|g;
-    
-       return $html;
-    }
-    
-    1