Changeset 1780
- Timestamp:
- 2000-12-11T13:58:13+13:00 (23 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/bin/script/mkcol.pl
r1698 r1780 47 47 print STDERR " -optionfile file Get options from file, useful on systems where\n"; 48 48 print STDERR " long command lines may cause problems\n"; 49 print STDERR " -collectdir Collection directory where new collectionill be created.\n";49 print STDERR " -collectdir Directory where new collection will be created.\n"; 50 50 print STDERR " Default is " . 51 51 &util::filename_cat($ENV{'GSDLHOME'}, "collect") . "\n"; 52 52 print STDERR " -creator email Your email address\n"; 53 print STDERR " -maintainer email The current maintainer's email address\n"; 53 print STDERR " -maintainer email The collection maintainer's email address (if\n"; 54 print STDERR " different from the creator)\n"; 54 55 print STDERR " -public true|false If this collection has anonymous access\n"; 55 56 print STDERR " -beta true|false If this collection is still under development\n"; 56 # print STDERR " -index type The indexes which should be made\n";57 # print STDERR " -indextext name The index description\n";58 # print STDERR " -defaultindex type The index to use if no others are supplied\n";59 60 57 print STDERR " -title text The title for the collection\n"; 61 58 print STDERR " -about text The about text for the collection\n"; 62 59 print STDERR " -plugin text perl plugin module to use (there may be multiple\n"; 63 print STDERR " plugin entries\n"; 64 print STDERR " -refine list Space separated list of perl plugin modules to use\n"; 65 66 60 print STDERR " plugin entries)\n"; 61 print STDERR " Note that -creator is the only option to mkcol.pl that is mandatory.\n"; 62 print STDERR " You can make changes to all options later by editing the collect.cfg\n"; 63 print STDERR " configuration file for your new collection (it'll be in the \"etc\"\n"; 64 print STDERR " directory).\n\n"; 67 65 } 68 66 … … 114 112 $line =~ s/\*\*public\*\*/$public/g; 115 113 $line =~ s/\*\*beta\*\*/$beta/g; 116 $line =~ s/\*\*indexes\*\*/$indexesstr/g;117 $line =~ s/\*\*indexestext\*\*/$indexestextstr/g;118 $line =~ s/\*\*defaultindex\*\*/$defaultindex/g;119 114 $line =~ s/\*\*title\*\*/$title/g; 120 115 $line =~ s/\*\*about\*\*/$about/g; 121 116 $line =~ s/\*\*plugins\*\*/$pluginstring/g; 122 $line =~ s/\*\*refine\*\*/$refine/g;123 117 124 118 print OUTFILE $line; … … 141 135 'public/true|false/true', \$public, 142 136 'beta/true|false/true', \$beta, 143 'index/.*/document:all', \@indexes,144 'indextext/\.*/Terms must appear within the same document', \@indexestext,145 'defaultindex/.*/document:all', \$defaultindex,146 137 'title/.+/', \$title, 147 138 'about/.+/', \$about, 148 'plugin/.+', \@plugin, 149 'refine/.+/', \$refine 139 'plugin/.+', \@plugin 150 140 )) { 151 141 &print_usage(); … … 223 213 224 214 # get the strings to include. 225 $indexesstr = join ("\t", @indexes);226 $indexestextstr = "";227 for ($i=0; $i<scalar(@indexestext); $i++) {228 $indexestextstr .= "_$indexes[$i]_[] {$indexestext[$i]}\n";229 }230 231 215 $pluginstring = ""; 232 216 foreach $plugin (@plugin) {
Note:
See TracChangeset
for help on using the changeset viewer.