[open-ils-commits] r14761 - trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD (djfiander)

[svn at svn.open-ils.org]

Author: djfiander
Date: 2009-11-03 20:25:28 -0500 (Tue, 03 Nov 2009)
New Revision: 14761

Modified:
   trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Holding.pm
Log:
Initial support for displaying the type of unit (eg, 'playing
cards'); deleted some vestigal code.


Modified: trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Holding.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Holding.pm	2009-11-04 01:25:26 UTC (rev 14760)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Utils/MFHD/Holding.pm	2009-11-04 01:25:28 UTC (rev 14761)
@@ -36,7 +36,6 @@
 	    $self->{_mfhdh_SUBFIELDS}->{$key} = {HOLDINGS => $val,
 						 UNIT     => undef,};
 	    $last_enum = $key;
-	} elsif ($key =~ /[i-m]/) {
 	} elsif ($key eq 'o') {
 	    warn '$o specified prior to first enumeration'
 	      unless defined($last_enum);
@@ -119,6 +118,10 @@
     my $caption = $self->{_mfhdh_CAPTION};
     my $str = '';
 
+    if ($caption->type_of_unit) {
+	$str = $caption->type_of_unit . ' ';
+    }
+
     if ($caption->enumeration_is_chronology) {
 	# if issues are identified by chronology only, then the
 	# chronology data is stored in the enumeration subfields,