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 345ab52..ccc9fc7 100755 (executable)
--- 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};
     }