-Enables _Read more_ links for use in blog posts. Adds a config option for customising the anchor text. (The [[/patchqueue/htmllink-anchors]] patch is a dependency).
-
- Index: IkiWiki/Plugin/morelink.pm
- ===================================================================
- --- IkiWiki/Plugin/morelink.pm (revision 0)
- +++ IkiWiki/Plugin/morelink.pm (revision 0)
- @@ -0,0 +1,30 @@
- +#!/usr/bin/perl
- +package IkiWiki::Plugin::morelink;
- +
- +use warnings;
- +use strict;
- +use IkiWiki;
- +
- +my $linktext = 'Read more';
- +
- +sub import { #{{{
- + hook(type => "checkconfig", id => "more", call => \&checkconfig);
- + hook(type => "preprocess", id => "more", call => \&preprocess);
- +} # }}}
- +
- +sub checkconfig () { #{{{
- + $linktext = $config{morelink_text} || $linktext;
- +} #}}}
- +
- +sub preprocess (@) { #{{{
- + my %args = @_;
- +
- + if ($args{page} ne $args{destpage}) {
- + return "\n".htmllink($args{page}, $args{destpage}, $args{page}.'#more', 0, 0, $linktext);
- + }
- + else {
- + return "<a name='more'></a>".$args{text};
- + }
- +}
- +
- +1
-
---Ben
\ No newline at end of file