Changeset 21315
- Timestamp:
- 2009-12-09T15:33:35+13:00 (14 years ago)
- Location:
- main/trunk/greenstone2/perllib/plugins
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/perllib/plugins/ArchivesInfPlugin.pm
r21308 r21315 155 155 sub remove_one { 156 156 my $self = shift (@_); 157 my ($file, $oids) = @_; 158 157 my ($file, $oids, $archivedir) = @_; 158 return undef; # only called during import at this stage, this will never be processing a file 159 159 160 } 160 161 -
main/trunk/greenstone2/perllib/plugins/BasePlugin.pm
r21308 r21315 329 329 my $self = shift (@_); 330 330 331 my ($file, $oids) = @_; 331 my ($file, $oids, $archivedir) = @_; 332 return 0 if $self->can_process_this_file($file); 333 return undef; 332 334 } 333 335 -
main/trunk/greenstone2/perllib/plugins/DirectoryPlugin.pm
r21308 r21315 147 147 } 148 148 149 149 150 sub remove_one { 150 151 my $self = shift (@_); 151 my ($file, $oids) = @_; 152 152 my ($file, $oids, $archivedir) = @_; 153 return undef; # this will never be called for directories (will it??) 154 153 155 } 154 156
Note:
See TracChangeset
for help on using the changeset viewer.