[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Biblio.pm
From: |
Chris Cormack |
Subject: |
[Koha-cvs] koha/C4 Biblio.pm |
Date: |
Wed, 29 Mar 2006 01:56:25 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch:
Changes by: Chris Cormack <address@hidden> 06/03/29 01:56:25
Modified files:
C4 : Biblio.pm
Log message:
Delete isnt working using the extended services method
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/C4/Biblio.pm.diff?tr1=1.163&tr2=1.164&r1=text&r2=text
Patches:
Index: koha/C4/Biblio.pm
diff -u koha/C4/Biblio.pm:1.163 koha/C4/Biblio.pm:1.164
--- koha/C4/Biblio.pm:1.163 Tue Mar 28 23:05:08 2006
+++ koha/C4/Biblio.pm Wed Mar 29 01:56:25 2006
@@ -30,7 +30,7 @@
use vars qw($VERSION @ISA @EXPORT);
# set the version for version checking
-$VERSION = do { my @v = '$Revision: 1.163 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.164 $' =~ /\d+/g;
shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
@ISA = qw(Exporter);
@@ -999,13 +999,13 @@
my $record = C4::Search::get_xml_record($bibid);
# z3950_extended_services('update',set_service_options('update'),$record);
warn "heres the record to delete $bibid";
-# my $Zconn = C4::Context->Zconn;
-# my $p = $Zconn->package();
-# $p->option(action => "recordDelete");
-# $p->option(record => $record);
-# $p->send("update");
-# $p->destroy();
-
z3950_extended_services('update',set_service_options('update','recordDelete',$record));
+ my $Zconn = C4::Context->Zconn;
+ my $p = $Zconn->package();
+ $p->option(action => "recordDelete");
+ $p->option(record => $record);
+ $p->send("update");
+ $p->destroy();
+#
z3950_extended_services('update',set_service_options('update','recordDelete',$record));
z3950_extended_services('commit');
}
@@ -3002,8 +3002,11 @@
=cut
-# $Id: Biblio.pm,v 1.163 2006/03/28 23:05:08 rangi Exp $
+# $Id: Biblio.pm,v 1.164 2006/03/29 01:56:25 rangi Exp $
# $Log: Biblio.pm,v $
+# Revision 1.164 2006/03/29 01:56:25 rangi
+# Delete isnt working using the extended services method
+#
# Revision 1.163 2006/03/28 23:05:08 rangi
# Delete working now
#