From 21b2ad68b400a902e81805b777cf6ea5acca3e66 Mon Sep 17 00:00:00 2001 From: Alex Schroeder Date: Fri, 6 Aug 2004 20:37:57 +0000 Subject: [PATCH] (AnchorsRule): Added invisible anchor definition. --- modules/anchors.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/modules/anchors.pl b/modules/anchors.pl index da4e07ea..a0299b41 100644 --- a/modules/anchors.pl +++ b/modules/anchors.pl @@ -16,13 +16,15 @@ # 59 Temple Place, Suite 330 # Boston, MA 02111-1307 USA -$ModulesDescription .= '

$Id: anchors.pl,v 1.8 2004/06/17 01:13:18 as Exp $

'; +$ModulesDescription .= '

$Id: anchors.pl,v 1.9 2004/08/06 20:37:57 as Exp $

'; push(@MyRules, \&AnchorsRule); sub AnchorsRule { if (m/\G\[\[\#([-a-zA-Z0-9_]+)\]\]/gc) { return $q->a({-href=>"#$1", -class=>'anchor'}, $1); + } elsif (m/\G\[\[\:([-a-zA-Z0-9_]+)\]\]/gc) { + return $q->a({-name=>"#$1", -class=>'anchor definition'}, $1); } return undef; }