Changeset 8764 for trunk/gsdl/perllib/plugins
- Timestamp:
- 2004-12-09T11:31:23+13:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/plugins/BNContentePlug.pm
r8739 r8764 1 1 ########################################################################### 2 2 # 3 # BNContentePlug.pm -- plugin for import the collection from BN-Portugal 4 # Collection 3 # BNContentePlug.pm -- plugin for import the BN-Portugal Collection 5 4 # A component of the Greenstone digital library software 6 5 # from the New Zealand Digital Library Project at the … … 33 32 package BNContentePlug; 34 33 35 #use METSPlug;34 use BasPlug; 36 35 use plugin; 37 36 #use ghtml; … … 40 39 41 40 sub BEGIN { 42 # @ISA = ('METSPlug');43 41 @ISA = ('BasPlug'); 44 42 unshift (@INC, "$ENV{'GSDLHOME'}/perllib/cpan"); … … 254 252 } else { 255 253 my $link = &util::filename_cat($self->{'dir'}, $assocfiles); 256 #print STDERR "####Associate files = $link\n";257 254 #$self->{'file_blocks'}->{$link} = 1; 258 255 }
Note:
See TracChangeset
for help on using the changeset viewer.