From: Bill Erickson <berick@esilibrary.com>
Date: Thu, 6 Oct 2011 15:42:54 +0000 (-0400)
Subject: TPac: My List add/remove page anchor fix
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=0db5e112ffda7099c3209d33d12bc2a42153a4f0;p=evergreen%2Fequinox.git

TPac: My List add/remove page anchor fix

Removed /g modifier from URL anchor regex to prevent URLs with multiple
page #-anchors.  This change primarily affects IE which includes #-anchors
in the referer header.

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
index a80549fab2..b1ebf4a807 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Container.pm
@@ -128,7 +128,7 @@ sub mylist_action_redirect {
         # on the results page, we want to redirect 
         # back to record that was affected
         $url = $self->ctx->{referer};
-        $url =~ s/#.*|$/#$anchor/g;
+        $url =~ s/#.*|$/#$anchor/;
     } 
 
     return $self->generic_redirect(