From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Fri, 3 Sep 2010 20:00:22 +0000 (+0000)
Subject: event code may be 0 (SUCCESS) == false in SIP checkin, check defined instead
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=fdf828fc66cb67cecdd5b36a6b7ed71050204893;p=evergreen%2Ftadl.git

event code may be 0 (SUCCESS) == false in SIP checkin, check defined instead

git-svn-id: svn://svn.open-ils.org/ILS/trunk@17488 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/perlmods/OpenILS/SIP/Transaction/Checkin.pm b/Open-ILS/src/perlmods/OpenILS/SIP/Transaction/Checkin.pm
index 20fe8cf989..7a97b2f9aa 100644
--- a/Open-ILS/src/perlmods/OpenILS/SIP/Transaction/Checkin.pm
+++ b/Open-ILS/src/perlmods/OpenILS/SIP/Transaction/Checkin.pm
@@ -87,7 +87,7 @@ sub do_checkin {
     }
 
     my $code = $U->event_code($resp);
-    my $txt  = $code ? $resp->{textcode} : '';
+    my $txt  = (defined $code) ? $resp->{textcode} : '';
 
     $resp->{org} &&= OpenILS::SIP::shortname_from_id($resp->{org}); # Convert id to shortname