From 16767be1028e381a35fe100e949ccc75acb9a8b9 Mon Sep 17 00:00:00 2001 From: Axel Beckert Date: Sun, 19 Jul 2009 12:21:09 +0000 Subject: [PATCH] Made the variable containing the characters to escape in URI ($url_escape_re) a configurable variable --- blosxom.cgi | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/blosxom.cgi b/blosxom.cgi index 160d4ed..86166f4 100755 --- a/blosxom.cgi +++ b/blosxom.cgi @@ -2,7 +2,7 @@ # Blosxom # Author: Rael Dornfest (2002-2003), The Blosxom Development Team (2005-2009) -# Version: 2.1.2 ($Id: blosxom.cgi,v 1.95 2009/03/08 01:28:06 xtaran Exp $) +# Version: 2.1.2 ($Id: blosxom.cgi,v 1.96 2009/07/19 12:21:09 xtaran Exp $) # Home/Docs/Licensing: http://blosxom.sourceforge.net/ # Development/Downloads: http://sourceforge.net/projects/blosxom @@ -142,6 +142,11 @@ $encode_xml_entities = 1; # can change this, too) $encode_8bit_chars = 0; +# RegExp matching all characters which should be URL encoded in links. +# Defaults to anything but numbers, letters, slash, colon, dash, +# underscore and dot. +$url_escape_re = qr([^-/a-zA-Z0-9:._]); + # -------------------------------- =head1 ENVIRONMENT @@ -237,6 +242,7 @@ use vars qw! %others $encode_xml_entities $encode_8bit_chars + $url_escape_re $content_type !; @@ -857,10 +863,6 @@ sub generate { $content_type !~ m{\bxhtml\b} ) { # Escape special characters inside the container - # The following line should be moved more towards to top for - # performance reasons -- Axel Beckert, 2008-07-22 - my $url_escape_re = qr([^-/a-zA-Z0-9:._]); - $url =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))eg; $path =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))eg; $fn =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))eg; -- 2.39.2