[Koha-cvs] koha/C4 AuthoritiesMarc.pm [rel_2_2]

[paul poulain]

CVSROOT:	/cvsroot/koha
Module name:	koha
Branch: 	rel_2_2
Changes by:	paul poulain <tipaul at savannah.gnu.org>	06/03/30 14:20:03

Modified files:
	C4             : AuthoritiesMarc.pm 

Log message:
	don't use + on a numeric value when you want to do a concat !!!

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/AuthoritiesMarc.pm.diff?only_with_tag=rel_2_2&tr1=1.9.2.14&tr2=1.9.2.15&r1=text&r2=text

Patches:
Index: koha/C4/AuthoritiesMarc.pm
diff -u koha/C4/AuthoritiesMarc.pm:1.9.2.14 koha/C4/AuthoritiesMarc.pm:1.9.2.15
--- koha/C4/AuthoritiesMarc.pm:1.9.2.14	Wed Mar 15 15:10:29 2006
+++ koha/C4/AuthoritiesMarc.pm	Thu Mar 30 14:20:03 2006
@@ -268,7 +268,7 @@
 					$sql_tables .= "auth_subfield_table as m$nb_table,";
 					$sql_where1 .= "(m1.subfieldvalue like ".$dbh->quote("@$value[$i]%");
 					if (@$tags[$i]) {
-						$sql_where1 .=" and m1.tag+m1.subfieldcode in (@$tags[$i])";
+						$sql_where1 .=" and concat(m1.tag,m1.subfieldcode) in (@$tags[$i])";
 					}
 					$sql_where1.=")";
 				} elsif (@$operator[$i] eq "contains") {	
@@ -283,7 +283,7 @@
 					$sql_tables .= "auth_subfield_table as m$nb_table,";
 					$sql_where1 .= "(m1.subfieldvalue @$operator[$i] ".$dbh->quote("@$value[$i]");
 					if (@$tags[$i]) {
-						 $sql_where1 .=" and m1.tag+m1.subfieldcode in (@$tags[$i])";
+						 $sql_where1 .=" and concat(m1.tag,m1.subfieldcode) in (@$tags[$i])";
 					}
 					$sql_where1.=")";
 				}
@@ -293,7 +293,7 @@
 					$sql_tables .= "auth_subfield_table as m$nb_table,";
 					$sql_where1 .= "@$and_or[$i] (m$nb_table.subfieldvalue like ".$dbh->quote("@$value[$i]%");
 					if (@$tags[$i]) {
-					 	$sql_where1 .=" and m$nb_table.tag+m$nb_table.subfieldcode in (@$tags[$i])";
+					 	$sql_where1 .=" and concat(m$nb_table.tag,m$nb_table.subfieldcode) in (@$tags[$i])";
 					}
 					$sql_where1.=")";
 					$sql_where2 .= "m1.authid=m$nb_table.authid and ";
@@ -310,7 +310,7 @@
 					} else {
 						$sql_where1 .= "@$and_or[$i] (m$nb_table.word like ".$dbh->quote("@$value[$i]%");
 						if (@$tags[$i]) {
-							$sql_where1 .="  and m$nb_table.tag+m$nb_table.subfieldid in (@$tags[$i])";
+							$sql_where1 .="  and concat(m$nb_table.tag,m$nb_table.subfieldid) in (@$tags[$i])";
 						}
 						$sql_where1.=")";
 						$sql_where2 .= "m1.authid=m$nb_table.authid and ";
@@ -320,7 +320,7 @@
 					$sql_tables .= "auth_subfield_table as m$nb_table,";
 					$sql_where1 .= "@$and_or[$i] (m$nb_table.subfieldvalue @$operator[$i] ".$dbh->quote(@$value[$i]);
 					if (@$tags[$i]) {
-					 	$sql_where1 .="  and m$nb_table.tag+m$nb_table.subfieldcode in (@$tags[$i])";
+					 	$sql_where1 .="  and concat(m$nb_table.tag,m$nb_table.subfieldcode) in (@$tags[$i])";
 					}
 					$sql_where2 .= "m1.authid=m$nb_table.authid and ";
 					$sql_where1.=")";
@@ -1043,8 +1043,11 @@
 
 =cut
 
-# $Id: AuthoritiesMarc.pm,v 1.9.2.14 2006/03/15 15:10:29 tipaul Exp $
+# $Id: AuthoritiesMarc.pm,v 1.9.2.15 2006/03/30 14:20:03 tipaul Exp $
 # $Log: AuthoritiesMarc.pm,v $
+# Revision 1.9.2.15  2006/03/30 14:20:03  tipaul
+# don't use + on a numeric value when you want to do a concat !!!
+#
 # Revision 1.9.2.14  2006/03/15 15:10:29  tipaul
 # added a new feature in summary building (for an authority)
 # If you enter [XXX*] ([250*] for example), the whole field will be displayed as it's saved. This will solve the problem with reordered subfields.