From f1221801172f208a94ead46ef87207acd21b6ac5 Mon Sep 17 00:00:00 2001
From: doxulting <doxulting>
Date: Fri, 30 Jul 2004 13:54:27 +0000
Subject: [PATCH] Beginning of serial commit

---
 C4/Biblio.pm              | 5 ++++-
 C4/Search.pm              | 2 +-
 admin/biblio_framework.pl | 4 ++++
 plugin_launcher.pl        | 2 +-
 4 files changed, 10 insertions(+), 3 deletions(-)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index 6dba31e90a..96ec9e5151 100644
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1455,7 +1455,7 @@ sub OLDnewbiblio {
     $sth->execute(
         $bibnum,             $biblio->{'title'},
         $biblio->{'author'}, $biblio->{'copyrightdate'},
-        $series,             $biblio->{'seriestitle'},
+        $biblio->{'serial'},             $biblio->{'seriestitle'},
         $biblio->{'notes'},  $biblio->{'abstract'}
     );
 
@@ -2531,6 +2531,9 @@ Paul POULAIN paul.poulain@free.fr
 
 # $Id$
 # $Log$
+# Revision 1.99  2004/07/30 13:54:50  doxulting
+# Beginning of serial commit
+#
 # Revision 1.98  2004/07/15 09:48:10  tipaul
 # * removing useless sub
 # * minor bugfix in moditem (managing homebranch & holdingbranch)
diff --git a/C4/Search.pm b/C4/Search.pm
index 1cf0103694..03c150ddc5 100755
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -283,7 +283,6 @@ sub catalogsearch {
 	#    $search->{$key}=$dbh->quote($search->{$key});
 	#  }
 	my ($count,@results);
-	#  print STDERR "Doing a search \n";
 	if ($search->{'itemnumber'} ne '' || $search->{'isbn'} ne ''){
 		print STDERR "Doing a precise search\n";
 		($count,@results)=CatSearch($env,'precise',$search,$num,$offset);
@@ -992,6 +991,7 @@ sub CatSearch  {
 	my @results;
 
 	my $title = lc($search->{'title'});
+
 	if ($type eq 'loose') {
 		if ($search->{'author'} ne ''){
 			my @key=split(' ',$search->{'author'});
diff --git a/admin/biblio_framework.pl b/admin/biblio_framework.pl
index b4acf18be1..c81c698a1f 100755
--- a/admin/biblio_framework.pl
+++ b/admin/biblio_framework.pl
@@ -71,6 +71,10 @@ $template->param(script_name => $script_name,
 $template->param(script_name => $script_name,
 						else              => 1); # we show only the TMPL_VAR names $op
 }
+
+
+
+
 ################## ADD_FORM ##################################
 # called by default. Used to create form to add or  modify a record
 if ($op eq 'add_form') {
diff --git a/plugin_launcher.pl b/plugin_launcher.pl
index a071ccfe5b..e9269c02bc 100755
--- a/plugin_launcher.pl
+++ b/plugin_launcher.pl
@@ -30,4 +30,4 @@ my $input = new CGI;
 my $plugin_name=$input->param("plugin_name");
 my $plugin_name="value_builder/".$input->param("plugin_name");
 require $plugin_name;
-&plugin($input);
\ No newline at end of file
+&plugin($input);
-- 
2.39.2