--- db/prgsrc/updateRS.pl 2001/10/31 03:07:29 1.2 +++ db/prgsrc/updateRS.pl 2002/06/15 02:55:01 1.4 @@ -33,13 +33,14 @@ ProcessedBySearch устанавливается в 1. О use locale; use DBI; use POSIX qw (locale_h); +use lib "../lib"; use chgkfiles; use dbchgk; do "common.pl"; do "chgk.cnf"; - require "check.pl"; +require "check.pl"; open (STDERR,">$stderr") if $stderr; @@ -90,7 +91,7 @@ print "Getting words...\n"; $sch=0; while ((++$sch<=$qlimit) && (($id, @ss) = getrow, $id)) { - if ($forbidden{$id}) {next}; +# if ($forbidden{$id}) {next}; print "\n$id "; foreach $fieldnumber (0..$#ss) #перебираем поля {