--- db/prgsrc/mkRS.pl 2001/10/31 04:38:03 1.3 +++ db/prgsrc/mkRS.pl 2005/07/05 20:24:17 1.6 @@ -32,6 +32,7 @@ cicles_number=1. =cut + use locale; use DBI; use POSIX qw (locale_h); @@ -39,9 +40,13 @@ use lib "../lib"; use chgkfiles; use dbchgk; my $minstop=2000; -open (STDERR,">errors"); -do "../bin/common.pl"; -do "../bin/chgk.cnf"; + +my $DUMPDIR = $ENV{DUMPDIR} || "../dump"; + +open (STDERR,">$DUMPDIR/errors"); +do "common.pl"; +do "chgk.cnf"; + die "Undefined \$maxwsize! check your chgk.cnf" unless $maxwsize; @@ -59,7 +64,8 @@ print "Creating word2question table...\n KEY idkey (id), word INT UNSIGNED NOT NULL, KEY wordkey (word), - questions MEDIUMBLOB + questions MEDIUMBLOB, + INDEX(word) )" )