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 20fe8cf..7a97b2f 100644 (file)
--- 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