Changeset 23116 for main/trunk/greenstone2/perllib/classify/SectionList.pm

Timestamp:

2010-10-12T13:55:07+13:00 (14 years ago)

Author:

kjdon

Message:

for incremental build, classifiers are not really done incrementally. Previously, we reconstructed all the docs from the database, and classified them, then processed any new/edited/deleted docs, updating the classifier as necessary. Now, we process all new/updated docs, then reconstruct the docs from the database, but only classify those not changed/deleted. This means that we are only ever adding docs to a classifier, never updating or deleting. I have removed edit_mode and all code handling deleting stuff from the classifier.

File:

• main/trunk/greenstone2/perllib/classify/SectionList.pm (modified) (3 diffs)

main/trunk/greenstone2/perllib/classify/SectionList.pm

@@ -63 +63 @@
 sub classify {
     my $self = shift (@_);
-    my ($doc_obj, $edit_mode, @options) = @_;
+    my ($doc_obj, @options) = @_;
     
     # @options used by AZCompactList when is uses SectionList internally
@@ -97 +97 @@
     if (defined $thissection) {
     # just classify the one section
-    $self->classify_section($thissection, $doc_obj, $edit_mode, $sortmeta, $nosort);
+    $self->classify_section($thissection, $doc_obj, $sortmeta, $nosort);
     } else    
     {
     $thissection = $doc_obj->get_next_section ($doc_obj->get_top_section());
     while (defined $thissection) {
-        $self->classify_section($thissection, $doc_obj, $edit_mode, $sortmeta, $nosort);
+        $self->classify_section($thissection, $doc_obj, $sortmeta, $nosort);
         $thissection = $doc_obj->get_next_section ($thissection);
     }
@@ -110 +110 @@
 sub classify_section {
     my $self = shift (@_);
-    my ($section, $doc_obj, $edit_mode, $sortmeta, $nosort) = @_;
+    my ($section, $doc_obj, $sortmeta, $nosort) = @_;
 
     my $doc_OID = $doc_obj->get_OID();