Escaping angle brackets is too pervasive a change in entityize(). Revert this part...

git-svn-id: svn://svn.open-ils.org/ILS/trunk@14293 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
index c6ace2f..557143d 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/AppUtils.pm
@@ -1381,10 +1381,8 @@ sub entityize {
                $string = NFC($string);
        }
 
-       # Convert raw ampersands and angle brackets to entities
+       # Convert raw ampersands to entities
        $string =~ s/&(?!\S+;)/&/gso;
-       $string =~ s/</&lt;/gso;
-       $string =~ s/>/&gt;/gso;
 
        # Convert Unicode characters to entities
        $string =~ s/([\x{0080}-\x{fffd}])/sprintf('&#x%X;',ord($1))/sgoe;