From fc6bc7a48e5d5d7eaedb22497b1c6c8b8193850c Mon Sep 17 00:00:00 2001 From: Sebastian Riedel Date: Fri, 17 Sep 2004 16:12:59 +0000 Subject: [PATCH] fixed link makro to do encoding of special characters git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@194 48953598-375a-da11-a14b-00016c27c3ee --- lib/Maypole.pm | 3 ++- templates/factory/macros | 4 +++- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/lib/Maypole.pm b/lib/Maypole.pm index 11fbe52..53e9be5 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -332,7 +332,8 @@ Simon Cozens, C =head1 THANK YOU -Jesse Scheidlower, Jody Belka, Markus Ramberg, Mickael Joanne, Simon Flack and all the others who've helped. +Jesse Scheidlower, Jody Belka, Markus Ramberg, Mickael Joanne, Simon Flack, +Veljko Vidovic and all the others who've helped. =head1 LICENSE diff --git a/templates/factory/macros b/templates/factory/macros index 06f5773..234b8f9 100644 --- a/templates/factory/macros +++ b/templates/factory/macros @@ -13,7 +13,9 @@ catenating the base URL, table, command, and any arguments. #%] [% MACRO link(table, command, additional, label) BLOCK; - ''; + SET lnk = base _ "/" _ table _ "/" _ command _ "/" _ additional; + lnk = lnk | uri | html; + ''; label; ""; END; -- 2.39.2