From 313a810100c5089a47acfb98306106dc492322d8 Mon Sep 17 00:00:00 2001 From: djfiander Date: Wed, 5 Apr 2006 01:36:07 +0000 Subject: [PATCH] Add support necessary for Checkin operation --- ILS/Item.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/ILS/Item.pm b/ILS/Item.pm index a772856..7ca0288 100644 --- a/ILS/Item.pm +++ b/ILS/Item.pm @@ -70,4 +70,10 @@ sub title_id { return $self->{title}; } +sub permanent_location { + my $self = shift; + + return $self->{permanent_location} || ''; +} + 1; -- 2.11.0