[Koha-cvs] koha/acqui.simple isbnsearch.pl [dev_week]

[Ryan Higgins]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Ryan Higgins <rych>	06/12/16 00:10:37

Modified files:
	acqui.simple   : isbnsearch.pl 

Log message:
	fixing isbn resevior search. ! this may only be for npl-based templates

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui.simple/isbnsearch.pl?cvsroot=koha&only_with_tag=dev_week&r1=1.14.2.5.2.1&r2=1.14.2.5.2.2

Patches:
Index: isbnsearch.pl
===================================================================
RCS file: /sources/koha/koha/acqui.simple/Attic/isbnsearch.pl,v
retrieving revision 1.14.2.5.2.1
retrieving revision 1.14.2.5.2.2
diff -u -b -r1.14.2.5.2.1 -r1.14.2.5.2.2
--- isbnsearch.pl	21 Jul 2006 17:46:48 -0000	1.14.2.5.2.1
+++ isbnsearch.pl	16 Dec 2006 00:10:37 -0000	1.14.2.5.2.2
@@ -22,6 +22,7 @@
 use C4::Auth;
 use C4::Biblio;
 use C4::Search;
+#use C4::SearchMarc;
 use C4::Breeding;
 use C4::Output;
 use C4::Interface::CGI::Output;
@@ -58,8 +59,8 @@
 	my @excluding = $input->param('excluding');
 	my @operator = $input->param('operator');
 	my @value = $input->param('value');
-	my $title= @value[0];
-	my $isbn = @value[1];
+	my $title= $value[1];
+	my $isbn = $value[0];
 	my $resultsperpage= $input->param('resultsperpage');
 	$resultsperpage = 10 if(!defined $resultsperpage);
 	my $startfrom=$input->param('startfrom');
@@ -84,9 +85,7 @@
 	}
 	findseealso($dbh,\@tags);
 	my $from = $startfrom*$resultsperpage+1;
-	
-	my ($results,$total) = catalogsearch($dbh, \@tags,\@and_or,
-										\@excluding, \@operator, \@value,
+	my ($results,$total) = &catalogsearch($dbh, \@tags,\@and_or, \@excluding, \@operator, \@value,
 										$startfrom*$resultsperpage, $resultsperpage,'biblio.title','ASC');
 # 	@results = @$resultsref;
 
@@ -150,7 +149,7 @@
 
     # fill with books in breeding farm
 	my $toggle=0;
-    my ( $countbr, @resultsbr ) = BreedingSearch( @value[0], @value[1] );
+    my ( $countbr, @resultsbr ) = BreedingSearch( $title, $isbn );
     my @breeding_loop = ();
     for ( my $i = 0 ; $i <= $#resultsbr ; $i++ ) {
         my %row_data;