[Koha-patches] [PATCH] [SIGNED-OFF] bug 5693 - mc-ccode parens fix

[Nicole C. Engard]

From: Reed Wade <reed at catalyst.net.nz>


Signed-off-by: Nicole C. Engard <nengard at bywatersolutions.com>
---
 C4/Search.pm |    9 ++++++++-
 1 files changed, 8 insertions(+), 1 deletions(-)

diff --git a/C4/Search.pm b/C4/Search.pm
index 45ebb24..26dc67f 100644
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -1276,7 +1276,14 @@ sub buildQuery {
         # group_OR_limits, prefixed by mc-
         # OR every member of the group
         elsif ( $this_limit =~ /mc/ ) {
-#        if ( $this_limit =~ /mc/ ) {
+        
+            if ( $this_limit =~ /mc-ccode:/ ) {
+                # in case the mc-ccode value has complicating chars like ()'s inside it we wrap in quotes
+                $this_limit =~ tr/"//d;
+                my ($k,$v) = split(/:/, $this_limit,2);
+                $this_limit = $k.":\"".$v."\"";
+            }
+
             $group_OR_limits .= " or " if $group_OR_limits;
             $limit_desc      .= " or " if $group_OR_limits;
             $group_OR_limits .= "$this_limit";
-- 
1.7.2.3