From 0d8818ec43a443f0c850434a3643587647d0fa74 Mon Sep 17 00:00:00 2001 From: miker Date: Thu, 9 Mar 2006 20:26:29 +0000 Subject: [PATCH] arg! with the quoting! git-svn-id: svn://svn.open-ils.org/ILS/trunk@3301 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm index 73ed6db2e4..2318bf494c 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm @@ -625,7 +625,7 @@ sub create_record_feed { sub entityize { my $stuff = NFC(shift()); - #$stuff =~ s/&(?!#.{2,4};|amp;)/&/gso; + $stuff =~ s/&(?!\S+;)/&/gso; $stuff =~ s/([\x{0080}-\x{fffd}])/sprintf('&#x%X;',ord($1))/sgoe; return $stuff; } -- 2.43.2