Changeset 14668 for gsdl/trunk/perllib/basebuilder.pm

Timestamp:

2007-10-11T12:37:15+13:00 (17 years ago)

Author:

anna

Message:

Undoing commit of r14657.

File:

• gsdl/trunk/perllib/basebuilder.pm (modified) (4 diffs)

gsdl/trunk/perllib/basebuilder.pm

@@ -94 +94 @@
     } elsif ($gs_mode eq "gs3") {
     $self->{'collect_cfg'} = &colcfg::read_collection_cfg_xml ($colcfgname);
+
+    #this $self->{'collect_cfg_preserve'} is used for gs3 only and to be passed to &colcfg::write_build_cfg_xml in sub make_auxilary_files later in this basebuilder.pm, we use this preserve object because $self->{'collect_cfg'}->{'classify'} somewhat gets modified during the calling of &classify::load_classifiers.
+    $self->{'collect_cfg_preserve'} = &colcfg::read_collection_cfg_xml ($colcfgname);
     }
     
@@ -121 +124 @@
     $classifiers = $self->{'collect_cfg'}->{'classify'};
     }
-    
+
     # load all the classifiers
     $self->{'classifiers'} = &classify::load_classifiers ($classifiers, $build_dir, $outhandle);
@@ -440 +443 @@
     }
     }
-    $build_cfg->{'indexmap'} = \@indexmap;
+    $build_cfg->{'indexmap'} = \@indexmap if scalar (@indexmap);
 
     my @subcollectionmap = ();
@@ -470 +473 @@
     }
     if ($gs_mode eq "gs3") {
-      &colcfg::write_build_cfg_xml("$self->{'build_dir'}/buildConfig.xml", $build_cfg, $self->{'collect_cfg'}, $self->{'disable_OAI'});
+
+      &colcfg::write_build_cfg_xml("$self->{'build_dir'}/buildConfig.xml", $build_cfg, $self->{'collect_cfg_preserve'}, $self->{'disable_OAI'});
     }