Changeset 21308 for main/trunk/greenstone2/perllib/plugins/BasePlugin.pm

Timestamp:

2009-12-09T13:21:38+13:00 (14 years ago)

Author:

kjdon

Message:

removeold renamed to remove_all, added remove_one for deleting a single doc

File:

• main/trunk/greenstone2/perllib/plugins/BasePlugin.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/plugins/BasePlugin.pm

@@ -314 +314 @@
 }
 
-# In case a plugin (eg PharosImageIndexer) needs to do something extra
-sub removeold {
+# This is called once if removeold is set with import.pl. Most plugins will do
+# nothing but if a plugin does any stuff outside of creating doc obj, then 
+# it may need to clear something.
+sub remove_all {
     my $self = shift (@_);
     my ($pluginfo, $base_dir, $processor, $maxdocs) = @_;
+}
+
+# This is called per document for docs that have been deleted from the 
+# collection. Most plugins will do nothing
+# but if a plugin does any stuff outside of creating doc obj, then it may need
+# to clear something.
+sub remove_one {
+    my $self = shift (@_);
+    
+    my ($file, $oids) = @_;
 }