From e01520eaa816090dda31fefb404f4f80b68a3aa9 Mon Sep 17 00:00:00 2001 From: Jonas Smedegaard Date: Fri, 27 Aug 2010 10:40:08 +0200 Subject: Sync plugins farbar and topbar with Ikiwiki 3.20100722 sidebar. --- perl/IkiWiki/Plugin/topbar.pm | 81 ++++++++++++++++++++++++++++++++++++------- 1 file changed, 69 insertions(+), 12 deletions(-) (limited to 'perl/IkiWiki/Plugin/topbar.pm') diff --git a/perl/IkiWiki/Plugin/topbar.pm b/perl/IkiWiki/Plugin/topbar.pm index aa62a11..2705161 100644 --- a/perl/IkiWiki/Plugin/topbar.pm +++ b/perl/IkiWiki/Plugin/topbar.pm @@ -7,15 +7,64 @@ package IkiWiki::Plugin::topbar; use warnings; use strict; -use IkiWiki 2.00; +use IkiWiki 3.00; -sub import { #{{{ +sub import { + hook(type => "getsetup", id => "topbar", call => \&getsetup); + hook(type => "preprocess", id => "topbar", call => \&preprocess); hook(type => "pagetemplate", id => "topbar", call => \&pagetemplate); -} # }}} +} -sub topbar_content ($) { #{{{ +sub getsetup () { + return + plugin => { + safe => 1, + rebuild => 1, + }, + global_topbars => { + type => "boolean", + example => 1, + description => "show topbar page on all pages?", + safe => 1, + rebuild => 1, + }, +} + +my %pagetopbar; + +sub preprocess (@) { + my %params=@_; + + my $page=$params{page}; + return "" unless $page eq $params{destpage}; + + if (! defined $params{content}) { + $pagetopbar{$page}=undef; + } + else { + my $file = $pagesources{$page}; + my $type = pagetype($file); + + $pagetopbar{$page}= + IkiWiki::htmlize($page, $page, $type, + IkiWiki::linkify($page, $page, + IkiWiki::preprocess($page, $page, $params{content}))); + } + + return ""; +} + +my $oldfile; +my $oldcontent; + +sub topbar_content ($) { my $page=shift; + return delete $pagetopbar{$page} if defined $pagetopbar{$page}; + + return if ! exists $pagetopbar{$page} && + defined $config{global_topbars} && ! $config{global_topbars}; + my $topbar_page=bestlink($page, "topbar") || return; my $topbar_file=$pagesources{$topbar_page} || return; my $topbar_type=pagetype($topbar_file); @@ -26,7 +75,16 @@ sub topbar_content ($) { #{{{ # currently requires a wiki rebuild. add_depends($page, $topbar_page); - my $content=readfile(srcfile($topbar_file)); + my $content; + if (defined $oldfile && $topbar_file eq $oldfile) { + $content=$oldcontent; + } + else { + $content=readfile(srcfile($topbar_file)); + $oldcontent=$content; + $oldfile=$topbar_file; + } + return unless length $content; return IkiWiki::htmlize($topbar_page, $page, $topbar_type, IkiWiki::linkify($topbar_page, $page, @@ -34,20 +92,19 @@ sub topbar_content ($) { #{{{ IkiWiki::filter($topbar_page, $page, $content)))); } -} # }}} +} -sub pagetemplate (@) { #{{{ +sub pagetemplate (@) { my %params=@_; - my $page=$params{page}; my $template=$params{template}; - - if ($template->query(name => "topbar")) { - my $content=topbar_content($page); + if ($params{destpage} eq $params{page} && + $template->query(name => "topbar")) { + my $content=topbar_content($params{destpage}); if (defined $content && length $content) { $template->param(topbar => $content); } } -} # }}} +} 1 -- cgit v1.2.3