Changeset 10538

Timestamp:

2005-08-19T12:15:51+12:00 (19 years ago)

Author:

kjdon

Message:

add assocfilepath metadata always, even if no associated files. with lucene, all doc types have their doc.xml as a kind of assocfile.

File:

• trunk/gsdl/perllib/docsave.pm (modified) (2 diffs)

trunk/gsdl/perllib/docsave.pm

@@ -493 +493 @@
     &util::hard_link ($source_filename, $filename);
     }
-           
+         
+    # set the assocfile path (even if we have no assoc files - need this for lucene)
+    $doc_obj->set_utf8_metadata_element ($doc_obj->get_top_section(),
+                     "assocfilepath",
+                     "$doc_dir");
     foreach my $assoc_file_rec (@{$doc_obj->get_assoc_files()}) {
     my ($dir, $afile) = $assoc_file_rec->[1] =~ /^(.*?)([^\/\\]+)$/;
@@ -529 +533 @@
                      "gsdlassocfile",
                      "$afile:$assoc_file_rec->[2]:$dir");
-        $doc_obj->set_utf8_metadata_element ($doc_obj->get_top_section(),
-                         "assocfilepath",
-                         "$doc_dir");
     } elsif ($self->{'verbosity'} > 2) {
         print $outhandle "docsave::process couldn't copy the associated file " .