Changeset 9935
- Timestamp:
- 2005-05-24T12:52:41+12:00 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/colcfg.pm
r9667 r9935 124 124 # {'indexlevels'} -> array of strings 125 125 # {'textlevel'}->string 126 # {'levelmap'} -> array of strings in the form "level->shortname" 126 127 sub read_build_cfg { 127 128 my ($filename) = @_; … … 129 130 return &cfgread::read_cfg_file ($filename, 130 131 q/^(builddate|buildtype|numdocs|numwords|numbytes|maxnumeric|textlevel)$/, 131 q/^(metadata|languages|indexfields|indexfieldmap|indexmap|indexlevels )$/);132 q/^(metadata|languages|indexfields|indexfieldmap|indexmap|indexlevels|levelmap)$/); 132 133 } 133 134 … … 137 138 &cfgread::write_cfg_file($filename, $data, 138 139 q/^(builddate|buildtype|numdocs|numwords|numbytes|maxnumeric|textlevel)$/, 139 q/^(metadata|languages|indexfieldsindexfieldmap|indexmap|indexlevels )$/);140 q/^(metadata|languages|indexfieldsindexfieldmap|indexmap|indexlevels|levelmap)$/); 140 141 } 141 142
Note:
See TracChangeset
for help on using the changeset viewer.