Changeset 15911 for gsdl/trunk/perllib/plugins/MP3Plugin.pm

Timestamp:

2008-06-09T13:12:28+12:00 (16 years ago)

Author:

kjdon

Message:

tidy up a couple of places using dummy text and NoText metadata

File:

• gsdl/trunk/perllib/plugins/MP3Plugin.pm (modified) (3 diffs)

gsdl/trunk/perllib/plugins/MP3Plugin.pm

@@ -105 +105 @@
     }
    
-    #whats this crap?
-   my $text = &gsprintf::lookup_string("{BasePlugin.dummy_text}",1);
+    my $text = &gsprintf::lookup_string("{BasePlugin.dummy_text}",1);
     if ($self->{'assoc_images'}) {
     $text .= "[img1]<br>";
@@ -112 +111 @@
     }
     $doc_obj->add_utf8_text($doc_obj->get_top_section(), $text);
+    $doc_obj->add_metadata ($doc_obj->get_top_section(), "NoText",    "1");
 
 }
@@ -188 +188 @@
     $doc_obj->add_metadata ($section, $assoc_field, $assoc_name);
     $doc_obj->add_metadata ($section, "srcurl", $assoc_url);
-    $doc_obj->add_metadata ($section, "NoText",    "1");
 
     my $mp3_info = get_mp3info($filename);