Changeset 13372
- Timestamp:
- 2006-11-29T14:35:04+13:00 (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cic-hcap/perllib/plugins/CICPlug.pm
r13201 r13372 1042 1042 $metadata_name =~ s/ /_/g; 1043 1043 1044 # Anything from the database is ISO 8859-1encoded, so convert to UTF-81045 $metadata_value = &unicode:: ascii2utf8(\$metadata_value);1044 # Anything from the database is Windows-1252 encoded, so convert to UTF-8 1045 $metadata_value = &unicode::unicode2utf8(&unicode::convert2unicode("windows_1252", \$metadata_value)); 1046 1046 1047 1047 # Escape any '[' and ']' characters so Greenstone doesn't try to treat the text as metadata... … … 1292 1292 $anchor_name = $letter; 1293 1293 } 1294 print BROWSER_MACROFILE &get_static_browser_macro_chunk($letter, $anchor_name, \@letter_ids, $id_to_name_mapping, $id_to_extra_mapping); 1294 my $static_browser_macro_chunk = &get_static_browser_macro_chunk($letter, $anchor_name, \@letter_ids, $id_to_name_mapping, $id_to_extra_mapping); 1295 print BROWSER_MACROFILE &unicode::unicode2utf8(&unicode::convert2unicode("windows_1252", \$static_browser_macro_chunk)); 1295 1296 } 1296 1297 print BROWSER_MACROFILE "</table>\n";
Note:
See TracChangeset
for help on using the changeset viewer.