Changeset 15906

Timestamp:

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

Author:

kjdon

Message:

inherits from AutoExtractMetadata now, not BasePlugin

File:

• gsdl/trunk/perllib/plugins/ConvertBinaryFile.pm (modified) (5 diffs)

gsdl/trunk/perllib/plugins/ConvertBinaryFile.pm

@@ -1 +1 @@
 ###########################################################################
 #
-# ConvertBinaryFile.pm -- plugin that inherits from BasPlug
+# ConvertBinaryFile.pm -- plugin that facilitates conversion of binary files
+# through gsConvert.pl 
 #
 # A component of the Greenstone digital library software
@@ -33 +34 @@
 package ConvertBinaryFile;
 
-use BasePlugin;
+use AutoExtractMetadata;
 use ghtml;
 use HTMLPlugin;
@@ -44 +45 @@
 
 sub BEGIN {
-    @ConvertBinaryFile::ISA = ('BasePlugin');
+    @ConvertBinaryFile::ISA = ('AutoExtractMetadata');
 }
 
@@ -79 +80 @@
     'type' => "flag",
     'reqd' => "no" },
-#      { 'name' => "extract_keyphrases",
-#   'desc' => "{BasPlug.extract_keyphrases}",
-#   'type' => "flag",
-#   'reqd' => "no",
-#   'hiddengli' => "yes" },
-#      { 'name' => "extract_keyphrase_options",
-#   'desc' => "{BasPlug.extract_keyphrase_options}",
-#   'type' => "string",
-#   'reqd' => "no",
-#   'hiddengli' => "yes" } 
       ];
 
@@ -150 +141 @@
     push(@{$hashArgOptLists->{"OptList"}},$options);
 
-    my $self = new BasePlugin($pluginlist, $inputargs, $hashArgOptLists);
+    my $self = new AutoExtractMetadata($pluginlist, $inputargs, $hashArgOptLists);
     
     if ($self->{'info_only'}) {