[Koha-cvs] koha/C4 Search.pm

Henri-Damien LAURENT laurenthdl at alinto.com
Tue May 22 10:54:21 CEST 2007


CVSROOT:	/cvsroot/koha
Module name:	koha
Changes by:	Henri-Damien LAURENT <hdl>	07/05/22 08:54:21

Modified files:
	C4             : Search.pm 

Log message:
	Changing GetMarcStructure signature.
	Deleting first parameter $dbh

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Search.pm?cvsroot=koha&r1=1.142&r2=1.143

Patches:
Index: Search.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Search.pm,v
retrieving revision 1.142
retrieving revision 1.143
diff -u -b -r1.142 -r1.143
--- Search.pm	10 May 2007 14:45:15 -0000	1.142
+++ Search.pm	22 May 2007 08:54:21 -0000	1.143
@@ -25,7 +25,7 @@
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.142 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.143 $' =~ /\d+/g;
     shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v );
 };
 
@@ -74,7 +74,7 @@
 
 sub findseealso {
     my ( $dbh, $fields ) = @_;
-    my $tagslib = GetMarcStructure( $dbh, 1 );
+    my $tagslib = GetMarcStructure( 1 );
     for ( my $i = 0 ; $i <= $#{$fields} ; $i++ ) {
         my ($tag)      = substr( @$fields[$i], 1, 3 );
         my ($subfield) = substr( @$fields[$i], 4, 1 );





More information about the Koha-cvs mailing list