Janosh
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Поставил этот хак в соответсвии с инструкцией ([url] http://www.ibhackers.com/iB_html/uploads/post-6-14180-lastpost.txt [url]) -
но никаких изминений после закачки измененного файла (в ASCII) не произошло...Как был линк на начало темы, так и остался...
Подскажите пожалуйста, что делать...
P.s.
действуя по инструкции в Sources/Forum.pm после
Цитата: sub _do_row {
my $obj = shift;
my $IN = { DB => "", DATA => "", PIN => "", @_,};
my $db = $IN->{'DB'};
my $topic = $IN->{'DATA'};
|
вставил
Цитата:
my $last_post = $db->query( TABLE => 'forum_posts',
ID => $obj->{'.topic_id'},
WHERE => "FORUM_ID == $iB::IN{'f'} and TOPIC_ID == $topic->{'TOPIC_ID'}",
SORT_KEY => 'POST_DATE',
SORT_BY => 'Z-A',
);
|
а
Цитата: $topic->{'LASTPOST_LINK'} = qq[<a href='$obj->{baseURL};act=ST;f=$iB::IN{'f'};t=$topic->{'TOPIC_ID'};st=$maxpages'>] . $obj->lastpost_icon($topic) . "</a>";
|
заменил на
Цитата:| $topic->{'LASTPOST_LINK'} = qq[<a href='$obj->{baseURL};act=ST;f=$iB::IN{'f'};t=$topic->{'TOPIC_ID'};st=$maxpages#entry@{$last_post}[0]->{'POST_ID'}'>] . $obj->lastpost_icon($topic) . "</a>"; |
|
