[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Search.pm [dev_week]
From: |
Joshua Ferraro |
Subject: |
[Koha-cvs] koha/C4 Search.pm [dev_week] |
Date: |
Fri, 06 Oct 2006 02:31:27 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: dev_week
Changes by: Joshua Ferraro <kados> 06/10/06 02:31:27
Modified files:
C4 : Search.pm
Log message:
fix for bug 1179: Parentheses in subject headings break subject search
from opac-detail
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.99.2.11.2.28&r2=1.99.2.11.2.29
Patches:
Index: Search.pm
===================================================================
RCS file: /sources/koha/koha/C4/Search.pm,v
retrieving revision 1.99.2.11.2.28
retrieving revision 1.99.2.11.2.29
diff -u -b -r1.99.2.11.2.28 -r1.99.2.11.2.29
--- Search.pm 6 Oct 2006 02:22:05 -0000 1.99.2.11.2.28
+++ Search.pm 6 Oct 2006 02:31:27 -0000 1.99.2.11.2.29
@@ -39,7 +39,7 @@
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.99.2.11.2.28 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.99.2.11.2.29 $' =~ /\d+/g;
shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
=head1 NAME
@@ -2587,6 +2587,7 @@
my $code = $subject_subfield->[0];
my $value = $subject_subfield->[1];
my $linkvalue = $value;
+ $linkvalue =~ s/(\(|\))//g;
my $operator = " and " unless $counter==0;
push @link_loop, {link => $linkvalue, operator =>
$operator };
my $separator = C4::Context->preference("authoritysep")
unless $counter==0;