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

Timestamp:

2007-10-11T10:45:56+13:00 (17 years ago)

Author:

anna

Message:

Updated Perl Module in Marathi. Many thanks to Shubhada Nagarkar.

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);
     }
     
@@ -124 +121 @@
     $classifiers = $self->{'collect_cfg'}->{'classify'};
     }
-
+    
     # load all the classifiers
     $self->{'classifiers'} = &classify::load_classifiers ($classifiers, $build_dir, $outhandle);
@@ -443 +440 @@
     }
     }
-    $build_cfg->{'indexmap'} = \@indexmap if scalar (@indexmap);
+    $build_cfg->{'indexmap'} = \@indexmap;
 
     my @subcollectionmap = ();
@@ -473 +470 @@
     }
     if ($gs_mode eq "gs3") {
-
-      &colcfg::write_build_cfg_xml("$self->{'build_dir'}/buildConfig.xml", $build_cfg, $self->{'collect_cfg_preserve'}, $self->{'disable_OAI'});
+      &colcfg::write_build_cfg_xml("$self->{'build_dir'}/buildConfig.xml", $build_cfg, $self->{'collect_cfg'}, $self->{'disable_OAI'});
     }