Changeset 22329 for main/trunk/greenstone2
- Timestamp:
- 2010-06-30T13:29:33+12:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/MP3Plugin.pm
r21760 r22329 216 216 217 217 if ($mp3_metavalue !~ m/^\s*$/s) { 218 my $mp3_metaname = " mp3:".lc($ki);218 my $mp3_metaname = "ex.id3.".lc($ki); 219 219 $doc_obj->add_metadata ($section, $mp3_metaname, $mp3_metavalue); 220 220 } … … 227 227 my $kt_len = length($kt); 228 228 my $kt_initial_cap = uc(substr($kt,0,1)).lc(substr($kt,1,$kt_len-1)); 229 my $mp3_metaname = " mp3:".$kt_initial_cap;229 my $mp3_metaname = "ex.id3.".$kt_initial_cap; 230 230 231 231 $doc_obj->add_metadata ($section, $mp3_metaname, $mp3_metavalue); … … 244 244 245 245 if ($mp3i_metavalue !~ m/^\s*$/s) { 246 my $mp3i_metaname = " mp3:".lc($field);246 my $mp3i_metaname = "ex.id3.".lc($field); 247 247 $doc_obj->add_metadata ($section, $mp3i_metaname, $mp3i_metavalue); 248 248 } … … 255 255 256 256 if ($mp3t_metavalue !~ m/^\s*$/s) { 257 my $mp3t_metaname = " mp3:".$field;257 my $mp3t_metaname = "ex.id3.".$field; 258 258 259 259 $doc_obj->add_metadata ($section, $mp3t_metaname, $mp3t_metavalue); … … 339 339 340 340 341 # we want to use mp3:Title if its there, otherwise we'll use BasePlugin method341 # we want to use ex.id3.Title if its there, otherwise we'll use BasePlugin method 342 342 sub title_fallback 343 343 { … … 346 346 347 347 if (!defined $doc_obj->get_metadata_element ($section, "Title")) { 348 my $mp3_title = $doc_obj->get_metadata_element ($section, " mp3:Title");348 my $mp3_title = $doc_obj->get_metadata_element ($section, "ex.id3.Title"); 349 349 if (defined $mp3_title) { 350 350 $doc_obj->add_metadata ($section, "Title", $mp3_title);
Note:
See TracChangeset
for help on using the changeset viewer.