Changeset 22327

Show
Ignore:
Timestamp:
30.06.2010 12:53:11 (9 years ago)
Author:
kjdon
Message:

if a file and all its associated files is deleted from import, then each assocaited file triggers the primary to be reindexed. Need to check whether primary has also been deleted, if so, don't need to reindex

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/perllib/inexport.pm

    r22010 r22327  
    347347        } 
    348348    } 
     349     
     350    } 
     351    # 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. 
     352    foreach my $file (@$deleted_files) { 
     353    if (defined $block_hash->{'reindex_files'}->{$file}) { 
     354        delete $block_hash->{'reindex_files'}->{$file}; 
     355    } 
    349356    } 
    350357