more fixes

C4/Acquisitions.pm

@@ -302,7 +302,7 @@ sub modbibitem {
 }
 
 sub newbiblioitem {
-  my ($bibnum,$itemtype,$isbn,$volinf)=@_;
+  my ($bibnum,$itemtype,$isbn,$volinf,$class)=@_;
   my $dbh=C4Connect;
   my $query="Select max(biblioitemnumber) from biblioitems";
   my $sth=$dbh->prepare($query);
@@ -312,9 +312,9 @@ sub newbiblioitem {
   $bibitemnum++;
   $sth->finish;
   $query="insert into biblioitems (biblionumber,biblioitemnumber,
-  itemtype,isbn,volumeddesc) 
+  itemtype,isbn,volumeddesc,classification) 
   values
-  ($bibnum,$bibitemnum,'$itemtype','$isbn','$volinf')";
+  ($bibnum,$bibitemnum,'$itemtype','$isbn','$volinf','$class')";
   $sth=$dbh->prepare($query);
 #  print $query;
   $sth->execute;

acqui/finishreceive.pl

@@ -39,7 +39,8 @@ my $freight=$input->param('freight');
 my $volinf=$input->param('volinf');
 if ($volinf ne ''){
 #  print "$bibitemno";
-  $bibitemno=newbiblioitem($biblio,$itemtype,$isbn,$volinf);
+  $class="Periodical";
+  $bibitemno=newbiblioitem($biblio,$itemtype,$isbn,$volinf,$class);
 #  print "here $bibitemno";
 }
 receiveorder($biblio,$ordnum,$quantrec,$user,$cost,$invoiceno,$bibitemno,$freight);

acqui/newbasket2.pl

@@ -195,7 +195,7 @@ $offset=$num+$offset;
 print mktableft();
 if ($offset < $count){
     my $search="num=$num&offset=$offset&type=$type&id=$id&basket=$basket&search=$keyword";
-    my $stuff=mklink("/cgi-bin/koha/newbasket2.pl?$search",'Next');
+    my $stuff=mklink("/cgi-bin/koha/acqui/newbasket2.pl?$search",'Next');
     print $stuff;
 }