--- db/prgsrc/updateRS3.pl	2001/12/13 00:01:58	1.1
+++ db/prgsrc/updateRS3.pl	2003/02/13 16:27:32	1.4
@@ -27,7 +27,7 @@ cicles_number=1.
 
 Создание в рабочем каталоге файла RS_pause прерывает работу с сохранением 
 хэшей, это означает, что при следующем запуске скрипт продолжит работу с места
-остановки (обнулится только счётчик счётчик обработанных вопросов). 
+остановки (обнулится только счётчик обработанных вопросов). 
 Продолжить крайне желательно, потому что у обработанные вопросах 
 уже установлен флаг ProcessedBySearch, но реально информация о них в базу
 ещё не занесена.
@@ -53,15 +53,22 @@ use POSIX qw (locale_h);
 use lib "../lib";
 use chgkfiles;
 use dbchgk;
-open (STDERR,">errors");
+my $DUMPDIR = $ENV{DUMPDIR} || "../dump";
+open (STDERR,">$DUMPDIR/errors");
 my $initime=time;
-open TIME, ">time"; 
+open TIME, ">$DUMPDIR/time"; 
 do "common.pl";
 do "chgk.cnf";
 
 use DB_File;
 
 
+$stopslovo{'В'}=1;
+$stopslovo{'С'}=1;
+$stopslovo{'ИЗ'}=1;
+$stopslovo{'НА'}=1;
+$stopslovo{'И'}=1;
+$stopslovo{'К'}=1;
 
 
 $qlimit=shift||500;
@@ -174,6 +181,7 @@ foreach $wordnumber(0..$#list)
       {
            $word=uc $list[$wordnumber];
            next if length $word>$maxwsize;
+           next if $stopslovo{$word};
            if (my $n=$nf{$word}||$newnf{$word}) 
            {
                 @n= split ' ',$n;