Changeset 15003 for gsdl/trunk/perllib/lucenebuilder.pm

Timestamp:

2008-02-22T11:29:52+13:00 (16 years ago)

Author:

davidb

Message:

With the new ability to group collections within a top-level collection, import.pl and buildcol.pl commands can now be given collection names such as "mygroup/demo". Some of the building code -- mostly involved with generating the index files and GDBM files -- had to be updated to correctly handle such compound collection names

File:

• gsdl/trunk/perllib/lucenebuilder.pm (modified) (1 diff)

gsdl/trunk/perllib/lucenebuilder.pm

@@ -367 +367 @@
     my $dbext = ".bdb";
     $dbext = ".ldb" if &util::is_little_endian();
-    my $infodb_file = &util::filename_cat($self->{'build_dir'}, "text", $self->{'collection'} . $dbext);
+
+    my $collect_tail = &util::get_dirsep_tail($self->{'collection'});
+    my $infodb_file = &util::filename_cat($self->{'build_dir'}, "text", $collect_tail . $dbext);
 
     # If we aren't doing an incremental addition, then we just call the super-