Alexander Ipp
BANNED | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Пишется оно туда, пишется, но некоторые здесь эту запись вырубали. Кто не вырубил - вот вам заготовка, правда, есть один маленький недостаток - она не пашет. Разбираться особо не стал, т.к. мне эта фича не очень-то нужна. Имхо, дело в той части, где читается и разбирается файл темы. Я её где-то в posting.cgi выдернул и вставил, как есть. В post.cgi: Ищем код: Код: sub unlockthread { &getmember("$inmembername"); &moderator; | После него добавлянм: Код: my $file = "$ikondir" . "forum$inforum/$intopic.pl"; open (ENT, $file); flock ENT, 1; $in = <ENT>; close (ENT); ($topicid, $topictitle, $topicdescription, $threadstate, $threadposts ,$threadviews, $startedby, $startedpostdate, $lastposter, $lastpostdate) = split(/\|/,$in); | Ниже ищем: Код: if (($membercode eq "ad") && ($inpassword eq $password)) { $cleartoedit = "yes"; } if (($inmembmod eq "yes") && ($inpassword eq $password)) { $cleartoedit = "yes"; } | Под ним мутим: Код: &getmember("$lastposter"); $lastposterstate = $membercode; &getmember("$inmembername"); if (($inmembmod eq "yes") && ($lastposterstate eq "ad") && ($membercode ne "ad")) { $cleartoedit = "no"; &error("Вы не администратор&Вы не можете открыть тему, закрытую администратором"); } | Всё бы ничего, но это не пашет, разбирайтесь сами, какого это, спрашивается. Мне эта фича не нужна, это так, наброски. PS У вас код может отличаться, у меня борда довольно-таки здорово модифицирована. |