Changeset 28268 for main/trunk/greenstone2/perllib/cgiactions/docextractaction.pm

Timestamp:

2013-09-12T13:04:59+12:00 (11 years ago)

Author:

davidb

Message:

Existing doc.xml maked with R for reindex, new file I to index

File:

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

main/trunk/greenstone2/perllib/cgiactions/docextractaction.pm

@@ -421 +421 @@
 
         # Existing doc record needs to be reindexed
-        $doc_rec->{'index-status'} = ["I"];
+        $doc_rec->{'index-status'} = ["R"];
         &dbutil::set_infodb_entry($infodbtype, $arcinfo_doc_filename, $docid, $doc_rec);
 
@@ -427 +427 @@
 
         my $new_doc_rec = $doc_rec;
+        $new_doc_rec->{'index-status'} = ["I"];
         #### Need to cut this down to just the assoc files the new document references