Changeset 20862 for gsdl/trunk/perllib/plugins/EmbeddedMetadataPlugin.pm

Timestamp:

2009-10-29T18:59:34+13:00 (14 years ago)

Author:

kjdon

Message:

plugin name change in file contents. Also, commented out process and block expressions, as this plugin doesn't block or process any files itself, just extracts metadata for the next plugin to use.

File:

• gsdl/trunk/perllib/plugins/EmbeddedMetadataPlugin.pm (modified) (6 diffs)

gsdl/trunk/perllib/plugins/EmbeddedMetadataPlugin.pm

@@ -1 +1 @@
 ###########################################################################
 #
-# MetadataEXIFPlugin.pm -- A plugin for EXIF
+# EmbeddedMetadataPlugin.pm -- A plugin for EXIF
 #
 # A component of the Greenstone digital library software
@@ -26 +26 @@
 
 
-package MetadataEXIFPlugin;
+package EmbeddedMetadataPlugin;
 
 use BasePlugin;
@@ -38 +38 @@
 sub BEGIN
 {
-  @MetadataEXIFPlugin::ISA = ('BasePlugin');
+  @EmbeddedMetadataPlugin::ISA = ('BasePlugin');
 }
 
@@ -47 +47 @@
 
 
-my $options = { 'name'     => "MetadataEXIFPlugin",
-        'desc'     => "{MetadataEXIFPlugin.desc}",
+my $options = { 'name'     => "EmbeddedMetadataPlugin",
+        'desc'     => "{EmbeddedMetadataPlugin.desc}",
         'abstract' => "no",
         'inherits' => "yes",
@@ -79 +79 @@
 
 # Need to think some more about this
-sub get_default_process_exp()
-{
-    return q^(?i)\.(wma|wmv|jpe?g|gif)$^;
-}
+#sub get_default_process_exp()
+#{
+#    return q^(?i)\.(wma|wmv|jpe?g|gif)$^;
+#}
 
 
 # This plugin doesn't block any files 
-sub get_default_block_exp()
-{
-    return '';
-}
+#sub get_default_block_exp()
+#{
+#    return '';
+#}
 
 
@@ -184 +184 @@
 #    }
 
-  print STDERR "\n<Processing n='$file' p='MetadataEXIFPlugin'>\n" if ($gli);
-  print STDERR "MetadataEXIFPlugin: processing $file\n" if ($self->{'verbosity'}) > 1;
+  print STDERR "\n<Processing n='$file' p='EmbeddedMetadataPlugin'>\n" if ($gli);
+  print STDERR "EmbeddedMetadataPlugin: processing $file\n" if ($self->{'verbosity'}) > 1;