[Koha-cvs] koha/C4 Biblio.pm [dev_week]

[Joshua Ferraro]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		dev_week
Changes by:	Joshua Ferraro <kados>	06/10/03 12:51:37

Modified files:
	C4             : Biblio.pm 

Log message:
	minor cleanup

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Biblio.pm?cvsroot=koha&only_with_tag=dev_week&r1=1.115.2.51.2.31&r2=1.115.2.51.2.32

Patches:
Index: Biblio.pm
===================================================================
RCS file: /sources/koha/koha/C4/Biblio.pm,v
retrieving revision 1.115.2.51.2.31
retrieving revision 1.115.2.51.2.32
diff -u -b -r1.115.2.51.2.31 -r1.115.2.51.2.32
--- Biblio.pm	2 Oct 2006 20:00:29 -0000	1.115.2.51.2.31
+++ Biblio.pm	3 Oct 2006 12:51:37 -0000	1.115.2.51.2.32
@@ -2086,8 +2086,8 @@
     my ( $dbh, $item ) = @_;
     $item->{'itemnum'} = $item->{'itemnumber'} unless $item->{'itemnum'};
 
-## Now calculate lccalnumber
-my ($cutterextra)=itemcalculator($dbh,$item->{'bibitemnum'},$item->{'itemcallnumber'});
+	## Now calculate lccalnumber
+	my ($cutterextra)=itemcalculator($dbh,$item->{'bibitemnum'},$item->{'itemcallnumber'});
     my $query = "update items set  barcode=?,itemnotes=?,itemcallnumber=?,notforloan=?,location=?,multivolumepart=?,multivolume=?,stack=?,wthdrawn=?,holdingbranch=?,homebranch=?,cutterextra=?, onloan=?";
     my @bind = (
         $item->{'barcode'},			$item->{'notes'},
@@ -2126,8 +2126,6 @@
     my $sth = $dbh->prepare($query);
     $sth->execute(@bind);
     $sth->finish;
-
-    #  $dbh->disconnect;
 }
 
 =head2 _koha_delete_item
@@ -3142,8 +3140,11 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.115.2.51.2.31 2006/10/02 20:00:29 kados Exp $
+# $Id: Biblio.pm,v 1.115.2.51.2.32 2006/10/03 12:51:37 kados Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.115.2.51.2.32  2006/10/03 12:51:37  kados
+# minor cleanup
+#
 # Revision 1.115.2.51.2.31  2006/10/02 20:00:29  kados
 # checking it's committing to the right place
 #