Changeset 11793
- Timestamp:
- 2006-05-10T10:27:20+12:00 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/basebuildproc.pm
r10469 r11793 293 293 my $doctype = $doc_obj->get_doc_type(); 294 294 295 # only output this document if it is one to be indexed296 return if ($doctype ne "indexed_doc" );295 # only output this document if it is a "indexed_doc" or "info_doc" (GDBM database only) document 296 return if ($doctype ne "indexed_doc" && $doctype ne "info_doc"); 297 297 298 298 my ($archivedir) = $filename =~ /^(.*?)(?:\/|\\)[^\/\\]*$/;
Note:
See TracChangeset
for help on using the changeset viewer.