Changeset 14023

Timestamp:

2007-04-24T17:17:15+12:00 (17 years ago)

Author:

xiao

Message:

Changes made to use cfgread4gs3.pm in gs3 mode and cfgread.pm in gs2 mode.

File:

• trunk/gsdl/perllib/colcfg.pm (modified) (3 diffs)

trunk/gsdl/perllib/colcfg.pm

@@ -29 +29 @@
 
 use cfgread;
+use cfgread4gs3;
 use strict;
 
@@ -80 +81 @@
                     q/groupsize|maxdocs|debug|mode|saveas|/ .
                     q/sortmeta|removesuffix|removeprefix|create_images|/ .
-                    q/maxnumeric|separate_cjk|language_metadata|/ .
+                    q/maxnumeric|separate_cjk|languagemetadata|/ .
                     q/no_strip_html|index|sections_index_document_metadata)$/,
                     q/(maintainer|languages|indexsubcollections|/ .
@@ -88 +89 @@
                     q/^(acquire|plugin|classify)$/,
                     q/^(collectionmeta)$/);
+}
+sub read_collection_cfg_xml {
+    my ($filename) = @_;
+
+    return &cfgread4gs3::read_cfg_file ($filename);
+}
+sub write_collection_cfg_xml {
+ 
+}
+sub write_build_cfg_xml {
+    my ($buildoutfile, $buildcfg, $collectcfg) = @_;
+
+    return &cfgread4gs3::write_cfg_file ($buildoutfile, $buildcfg, $collectcfg);
 }