[Koha-cvs] koha/C4 Biblio.pm

[Joshua Ferraro]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Joshua Ferraro <address@hidden> 06/03/07 22:00:18

Modified files:
        C4             : Biblio.pm 

Log message:
        adding support for 'delete' function

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Biblio.pm.diff?tr1=1.159&tr2=1.160&r1=text&r2=text

Patches:
Index: koha/C4/Biblio.pm
diff -u koha/C4/Biblio.pm:1.159 koha/C4/Biblio.pm:1.160
--- koha/C4/Biblio.pm:1.159     Tue Mar  7 21:54:47 2006
+++ koha/C4/Biblio.pm   Tue Mar  7 22:00:18 2006
@@ -30,7 +30,7 @@
 use vars qw($VERSION @ISA @EXPORT);
 
 # set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.159 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.160 $' =~ /\d+/g;
                 shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
 
 @ISA = qw(Exporter);
@@ -227,11 +227,18 @@
 =cut
 
 sub set_service_options {
-       my ($serviceType) = @_;
+       my ($serviceType,$action,$recordId) = @_;
        my $serviceOptions;
 
        if ($serviceType eq 'update') {
+               if ($action) {
+               $serviceOptions->{ 'action' } = $action;
+               } else {
                $serviceOptions->{ 'action' } = 'specialUpdate';
+               }
+               if ($recordId) {
+               $serviceOptions->{'recordIdNumber'} = $recordId;
+               }
 
        # FIXME: This needs to be an OID ... if we ever need 'syntax' this sub 
will need to change
        #       $serviceOptions->{ 'syntax' } = ''; #zebra doesn't support 
syntaxes other than xml
@@ -247,6 +254,8 @@
        if ($serviceType eq 'drop') {
                die "ERROR: 'drop' not currently supported (by Zebra)";
        }
+
+       #check action
        return $serviceOptions;
 }
 
@@ -3037,8 +3046,11 @@
 
 =cut
 
-# $Id: Biblio.pm,v 1.159 2006/03/07 21:54:47 rangi Exp $
+# $Id: Biblio.pm,v 1.160 2006/03/07 22:00:18 kados Exp $
 # $Log: Biblio.pm,v $
+# Revision 1.160  2006/03/07 22:00:18  kados
+# adding support for 'delete' function
+#
 # Revision 1.159  2006/03/07 21:54:47  rangi
 # Starting work on deletes
 #