--- db/prgsrc/updateRS.pl 2001/11/01 01:45:00 1.3 +++ db/prgsrc/updateRS.pl 2002/06/15 02:55:01 1.4 @@ -91,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) #перебираем поля {