diff options
Diffstat (limited to 'IkiWiki')
| -rw-r--r-- | IkiWiki/Plugin/sidebar.pm | 48 |
1 files changed, 48 insertions, 0 deletions
diff --git a/IkiWiki/Plugin/sidebar.pm b/IkiWiki/Plugin/sidebar.pm new file mode 100644 index 000000000..a6efc6b8e --- /dev/null +++ b/IkiWiki/Plugin/sidebar.pm @@ -0,0 +1,48 @@ +#!/usr/bin/perl +# Sidebar plugin. +# by Tuomo Valkonen <tuomov at iki dot fi> + +package IkiWiki::Plugin::sidebar; + +use warnings; +use strict; +use IkiWiki; + +sub import { #{{{ + IkiWiki::hook(type => "pagetemplate", id => "sidebar", + call => \&pagetemplate); +} # }}} + +sub sidebar_content ($) { #{{{ + my $page=shift; + + my $sidebar_page=IkiWiki::bestlink($page, "sidebar") || return; + my $sidebar_file=$IkiWiki::pagesources{$sidebar_page} || return; + my $sidebar_type=IkiWiki::pagetype($sidebar_file); + + if (defined $sidebar_type) { + IkiWiki::add_depends($page, $sidebar_page); + my $content=IkiWiki::readfile(IkiWiki::srcfile($sidebar_file)); + return unless length $content; + return IkiWiki::htmlize($sidebar_type, + IkiWiki::preprocess($sidebar_page, $page, + IkiWiki::linkify($sidebar_page, $page, $content))); + } + +} # }}} + +sub pagetemplate (@) { #{{{ + my %params=@_; + + my $page=$params{page}; + my $template=$params{template}; + + if ($template->query(name => "sidebar")) { + my $content=sidebar_content($page); + if (defined $content && length $content) { + $template->param(sidebar => $content); + } + } +} # }}} + +1 |