aboutsummaryrefslogtreecommitdiff
path: root/doc/plugins/contrib/headinganchors.mdwn
diff options
context:
space:
mode:
Diffstat (limited to 'doc/plugins/contrib/headinganchors.mdwn')
-rw-r--r--doc/plugins/contrib/headinganchors.mdwn36
1 files changed, 0 insertions, 36 deletions
diff --git a/doc/plugins/contrib/headinganchors.mdwn b/doc/plugins/contrib/headinganchors.mdwn
deleted file mode 100644
index becbf89a5..000000000
--- a/doc/plugins/contrib/headinganchors.mdwn
+++ /dev/null
@@ -1,36 +0,0 @@
-[[!template id=plugin name=headinganchors author="[[PaulWise]]"]]
-
-This is a simple plugin to add ids (which will serve as [[anchor]]s) to all headings, based on their text. It
-works as a postprocessing filter, allowing it to work on mdwn, wiki, html,
-rst and any other format that produces html. The code is available here:
-
- #!/usr/bin/perl
- # quick HTML heading id adder by Paul Wise
- package IkiWiki::Plugin::headinganchors;
-
- use warnings;
- use strict;
- use IkiWiki 2.00;
-
- sub import {
- hook(type => "sanitize", id => "headinganchors", call => \&headinganchors);
- }
-
- sub text_to_anchor {
- my $str = shift;
- $str =~ s/^\s+//;
- $str =~ s/\s+$//;
- $str = lc($str);
- $str =~ s/[&\?"\'\.,\(\)!]//mig;
- $str =~ s/[^a-z]/_/mig;
- return $str;
- }
-
- sub headinganchors (@) {
- my %params=@_;
- my $content=$params{content};
- $content=~s{<h([0-9])>([^>]*)</h([0-9])>}{'<h'.$1.' id="'.text_to_anchor($2).'">'.$2.'</h'.$3.'>'}gie;
- return $content;
- }
-
- 1