From 49520d1658f9dcf0940f2f5cd08eb8f78850c493 Mon Sep 17 00:00:00 2001 From: djfiander Date: Fri, 14 Apr 2006 23:33:11 +0000 Subject: [PATCH] Add stub to handle Status Update message --- ILS/Item.pm | 16 ++++++++++++---- 1 file changed, 12 insertions(+), 4 deletions(-) diff --git a/ILS/Item.pm b/ILS/Item.pm index d4f321c..57d91af 100644 --- a/ILS/Item.pm +++ b/ILS/Item.pm @@ -9,13 +9,10 @@ package ILS::Item; use strict; use warnings; -use Exporter; use Sys::Syslog qw(syslog); -our (@ISA, @EXPORT_OK); - -@ISA = qw(Exporter); +use ILS::Transaction; our %item_db = ( 1565921879 => { @@ -65,6 +62,17 @@ sub sip_item_properties { return $self->{sip_item_properties}; } +sub status_update { + my ($self, $props) = @_; + my $status = new ILS::Transaction; + + $self->{sip_item_properties} = $props; + $status->{ok} = 1; + + return $status; +} + + sub id { my $self = shift; -- 2.11.0