Changeset 22567 for main/trunk/greenstone2

Timestamp:

2010-08-04T15:56:11+12:00 (14 years ago)

Author:

kjdon

Message:

the last step in mark_docs_for_deletion, only do it in delete mode. Otherwise it will remove the primary that was marked for reindex, and it won't be reindexed.

File:

• main/trunk/greenstone2/perllib/inexport.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/inexport.pm

@@ -142 +142 @@
     my $site       = $self->{'site'};
     my $out        = $self->{'out'};
-
+ 
     if (($collection = &colcfg::use_collection($site, $collection, $collectdir)) eq "") {
     &PrintUsage::print_txt_usage($options, "{import.params}");
@@ -1108 +1108 @@
     
     }
-    # now go through and check that we haven't marked any primary files for reindex (because their associated files have changed/deleted) when they have been deleted themselves.
-    foreach my $file (@$deleted_files) {
-    if (defined $block_hash->{'reindex_files'}->{$file}) {
-        delete $block_hash->{'reindex_files'}->{$file};
+    # now go through and check that we haven't marked any primary files for reindex (because their associated files have changed/deleted) when they have been deleted themselves. only in delete mode.
+    if ($mode eq "delete") {
+    foreach my $file (@$deleted_files) {
+        if (defined $block_hash->{'reindex_files'}->{$file}) {
+        delete $block_hash->{'reindex_files'}->{$file};
+        }
     }
     }