Changeset 17028

Show
Ignore:
Timestamp:
28.08.2008 09:41:08 (11 years ago)
Author:
kjdon
Message:

changed METS to GreenstoneMETS in the code

Files:
1 modified

Legend:

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

    r17027 r17028  
    11########################################################################### 
    22# 
    3 # METSPlugin.pm 
     3# GreenstoneMETSPlugin.pm 
    44# A component of the Greenstone digital library software 
    55# from the New Zealand Digital Library Project at the  
     
    3030 
    3131 
    32 package METSPlugin; 
     32package GreenstoneMETSPlugin; 
    3333 
    3434use ghtml; 
     
    4242 
    4343sub BEGIN { 
    44     @METSPlugin::ISA = ('ReadXMLFile'); 
     44    @GreenstoneMETSPlugin::ISA = ('ReadXMLFile'); 
    4545} 
    4646 
    4747my $arguments = [ 
    4848         ]; 
    49 my $options = { 'name'     => "METSPlugin", 
    50         'desc'     => "{METSPlugin.desc}", 
     49my $options = { 'name'     => "GreenstoneMETSPlugin", 
     50        'desc'     => "{GreenstoneMETSPlugin.desc}", 
    5151        'abstract' => "no", 
    5252        'inherits' => "yes" }; 
     
    118118    } 
    119119    my $outhandle = $self->{'outhandle'}; 
    120     print $outhandle "METSPlugin: processing $self->{'file'}\n" if $self->{'verbosity'} > 1; 
    121     print STDERR "<Processing n='$self->{'file'}' p='METSPlugin'>\n" if ($self->{'gli'}); 
     120    print $outhandle "GreenstoneMETSPlugin: processing $self->{'file'}\n" if $self->{'verbosity'} > 1; 
     121    print STDERR "<Processing n='$self->{'file'}' p='GreenstoneMETSPlugin'>\n" if ($self->{'gli'}); 
    122122 
    123123}