Changeset 20862


Ignore:
Timestamp:
2009-10-29T18:59:34+13:00 (13 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:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/perllib/plugins/EmbeddedMetadataPlugin.pm

    r20860 r20862  
    11###########################################################################
    22#
    3 # MetadataEXIFPlugin.pm -- A plugin for EXIF
     3# EmbeddedMetadataPlugin.pm -- A plugin for EXIF
    44#
    55# A component of the Greenstone digital library software
     
    2626
    2727
    28 package MetadataEXIFPlugin;
     28package EmbeddedMetadataPlugin;
    2929
    3030use BasePlugin;
     
    3838sub BEGIN
    3939{
    40   @MetadataEXIFPlugin::ISA = ('BasePlugin');
     40  @EmbeddedMetadataPlugin::ISA = ('BasePlugin');
    4141}
    4242
     
    4747
    4848
    49 my $options = { 'name'     => "MetadataEXIFPlugin",
    50         'desc'     => "{MetadataEXIFPlugin.desc}",
     49my $options = { 'name'     => "EmbeddedMetadataPlugin",
     50        'desc'     => "{EmbeddedMetadataPlugin.desc}",
    5151        'abstract' => "no",
    5252        'inherits' => "yes",
     
    7979
    8080# Need to think some more about this
    81 sub get_default_process_exp()
    82 {
    83     return q^(?i)\.(wma|wmv|jpe?g|gif)$^;
    84 }
     81#sub get_default_process_exp()
     82#{
     83#    return q^(?i)\.(wma|wmv|jpe?g|gif)$^;
     84#}
    8585
    8686
    8787# This plugin doesn't block any files
    88 sub get_default_block_exp()
    89 {
    90     return '';
    91 }
     88#sub get_default_block_exp()
     89#{
     90#    return '';
     91#}
    9292
    9393
     
    184184#    }
    185185
    186   print STDERR "\n<Processing n='$file' p='MetadataEXIFPlugin'>\n" if ($gli);
    187   print STDERR "MetadataEXIFPlugin: processing $file\n" if ($self->{'verbosity'}) > 1;
     186  print STDERR "\n<Processing n='$file' p='EmbeddedMetadataPlugin'>\n" if ($gli);
     187  print STDERR "EmbeddedMetadataPlugin: processing $file\n" if ($self->{'verbosity'}) > 1;
    188188
    189189
Note: See TracChangeset for help on using the changeset viewer.