Changeset 12210

Timestamp:

2006-07-13T13:45:40+12:00 (18 years ago)

Author:

mdewsnip

Message:

Now uses the tidied version of the place functions for indexing.

File:

• trunk/cic-hcap/perllib/plugins/CICPlug.pm (modified) (2 diffs)

trunk/cic-hcap/perllib/plugins/CICPlug.pm

@@ -664 +664 @@
         }
         my $place_year_prefix = $place_functions_match_hashref->{"Prefix"} || "";
-        $place_functions .= "$place_function ";
         $place_functions_table_html .= "<tr><td valign=\"top\"><nobr>$place_year_prefix $place_year</nobr>&nbsp;</td><td valign=\"top\">$place_function</td></tr>";
 
@@ -695 +694 @@
         }
         push(@{$place_function_to_ids_mapping{$place_function_to_index}}, $place_doc_obj->get_OID());
+        $place_functions .= "$place_function_to_index ";
     }
     &new_metadata_entry($place_doc_obj, "Functions", $place_functions);