Changeset 2479
- Timestamp:
- 2001-05-29T10:50:25+12:00 (23 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/colcfg.pm
r2355 r2479 100 100 # {'numbytes'}->string 101 101 # {'indexfields'}->array of strings 102 102 # {'indexfieldmap'}->array of strings in the form "field->FI" 103 # {'indexmap'} -> array of strings 104 103 105 sub read_build_cfg { 104 106 my ($filename) = @_; … … 106 108 return &cfgread::read_cfg_file ($filename, 107 109 q/^(builddate|buildtype|numdocs|numwords|numbytes)$/, 108 q/^(metadata|languages|indexfields )$/);110 q/^(metadata|languages|indexfields|indexfieldmap|indexmap)$/); 109 111 } 110 112 … … 113 115 114 116 &cfgread::write_cfg_file($filename, $data, 115 116 q/^(metadata|languages|indexfields)$/);117 q/^(builddate|buildtype|numdocs|numwords|numbytes)$/, 118 q/^(metadata|languages|indexfieldsindexfieldmap|indexmap)$/); 117 119 } 118 120
Note:
See TracChangeset
for help on using the changeset viewer.