Changeset 8764

Timestamp:

2004-12-09T11:31:23+13:00 (19 years ago)

Author:

chi

Message:

Modifications of the use of BasPlug

File:

• trunk/gsdl/perllib/plugins/BNContentePlug.pm (modified) (4 diffs)

trunk/gsdl/perllib/plugins/BNContentePlug.pm

@@ -1 +1 @@
 ###########################################################################
 #
-# BNContentePlug.pm -- plugin for import the collection from BN-Portugal 
-#                      Collection
+# BNContentePlug.pm -- plugin for import the BN-Portugal Collection
 # A component of the Greenstone digital library software
 # from the New Zealand Digital Library Project at the 
@@ -33 +32 @@
 package BNContentePlug;
 
-#use METSPlug;
+use BasPlug;
 use plugin;
 #use ghtml;
@@ -40 +39 @@
 
 sub BEGIN {
-   # @ISA = ('METSPlug');
     @ISA = ('BasPlug');
     unshift (@INC, "$ENV{'GSDLHOME'}/perllib/cpan");
@@ -254 +252 @@
     } else {
         my $link = &util::filename_cat($self->{'dir'}, $assocfiles);
-        #print STDERR "####Associate files = $link\n";
         #$self->{'file_blocks'}->{$link} = 1;
     }