From: djfiander Date: Wed, 12 Nov 2008 02:02:10 +0000 (+0000) Subject: Minor cleanups. X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=554e4c07a7461118627f5aacd8476499133a6b8c;p=Evergreen.git Minor cleanups. git-svn-id: svn://svn.open-ils.org/ILS/trunk@11148 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Caption.pm b/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Caption.pm index 345ab52fca..ccc9fc79ac 100755 --- a/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Caption.pm +++ b/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Caption.pm @@ -97,7 +97,13 @@ sub caption { if (@_) { $key = shift; - return $self->{ENUMS}->{$key}->{CAPTION}; + if (exists $self->{ENUMS}->{$key}) { + return $self->{ENUMS}->{$key}->{CAPTION}; + } elsif (exists $self->{CHRONS}->{$key}) { + return $self->{CHRONS}->{$key}; + } else { + return undef; + } } else { return $self->{CAPTION}; }