Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - enjoy

Страницы: [1] 2
1
Sanitarium WebLoG / Новости
« : 20 Ноября 2002, 18:22:51 »
да у меня два санитариума, на каждый раздел сайта.
поэтому и надо чтоб в другую директорию писали, в одну оба, вот

2
Sanitarium WebLoG / Новости
« : 19 Ноября 2002, 22:05:49 »
Как и где изменить путь для вывода новостей, чтоб в другую директорию их выводить?

З.Ы. А где вообще Green Kakadu ???

3
Perl / Как код подправить?
« : 18 Ноября 2002, 13:59:27 »
NeoNox

Ок.
Это касается Санитариума, я там тоже написал на всякий случай :)
тут

Скрипт имеет возможность показа всех новых статей за последнии дни, он их пишет в текстовый файл, или в JavaScript, на выбор.
Так вот, у меня 2 скрипта этих, каждый отвечает за свой раздел сайта.
Получается, что и все новые статьи они пишет в два разных, своих файла, а хотелось бы в один чтобы оба писали.
А  /\\/\\/\\ это я привел кусок кода, который по-моему отвечает как раз за это.

4
Perl / Как код подправить?
« : 17 Ноября 2002, 12:29:18 »
В общем надо в коде поменять место вывода статей. Задать свой путь.

Где менять пути и как чтоб не глючило?

Код: [Выделить]

sub print_news {
#--------------------------------------------------
my ($cat, $how_news, $news_js, $html, $news_txt, $use_txt, %news);
my $self=shift;
$cat=shift;
$how_news=shift;
$use_txt=$self->{\'txt_news\'};
$self->{DB_File}="$self->{\'data\'}/$cat";
$self->{DB_Field}=\'index\';
unless($self->{\'tmp_news\'}){$self->{\'tmp_news\'}=$self->load_tempfile("$self->{\'tmpl_dir\'}/tmp-main/news.txt");}
%news=$self->get_nn_recs($how_news);
foreach my $key(sort {$b <=> $a} keys %news){
$self->unpack_rec($news{$key});
$self->get_author_info();
if ($self->{\'static_pages\'}){$self->{\'article_url\'}="$self->{\'public_url\'}/$self->{\'cat_id\'}/$key"."_1.$self->{\'ext\'}";}
else {$self->{\'article_url\'}=$self->{\'view_cgi_url\'}."?id=$key&cat_id=$self->{\'cat_id\'}&page=1";}
$html=$self->small_parsing($self->{\'tmp_news\'});
$news_txt .= "$html\\n" if  $use_txt;
$html=~ s/"/\\\\"/g;
$html=~ s/[\\n\\r]//g;
$html=~ s/\'/\\\'/g;
$news_js .= qq~document.write("$html");\\n~;
}
#CHECK DIRS:
if (!(-e "$self->{\'public_dir\'}/news")){
mkdir("$self->{\'public_dir\'}/news", 0777) or croak("Can\'t mkdir $self->{\'public_dir\'}/news, reason: $!");
chmod(0777, "$self->{\'public_dir\'}/news") or croak("Can\'t chmod $self->{\'public_dir\'}/news, reason: $!");
}
#PRINT in *.js
if ($news_js){
open (NEWS, ">$self->{\'public_dir\'}/news/$cat.js") or croak("Can\'t open NEWS, reason: $!");
if ($USE_FLOCK){flock(NEWS, 2);}
print NEWS $news_js;
close NEWS;
}
#Print in *.txt
if ($news_txt){
open (NEWSTXT, ">$self->{\'public_dir\'}/news/$cat.txt") or croak("Can\'t open NEWSTXT, reason: $!");
print NEWSTXT $news_txt;
close NEWSTXT;
}
}

5
Sanitarium WebLoG / как код немного подправить для новостей?
« : 17 Ноября 2002, 12:28:14 »
В общем надо в коде поменять место вывода статей. Задать свой путь.

Где менять пути и как чтоб не глючило?

Код: [Выделить]

sub print_news {
#--------------------------------------------------
my ($cat, $how_news, $news_js, $html, $news_txt, $use_txt, %news);
my $self=shift;
$cat=shift;
$how_news=shift;
$use_txt=$self->{\'txt_news\'};
$self->{DB_File}="$self->{\'data\'}/$cat";
$self->{DB_Field}=\'index\';
unless($self->{\'tmp_news\'}){$self->{\'tmp_news\'}=$self->load_tempfile("$self->{\'tmpl_dir\'}/tmp-main/news.txt");}
%news=$self->get_nn_recs($how_news);
foreach my $key(sort {$b <=> $a} keys %news){
$self->unpack_rec($news{$key});
$self->get_author_info();
if ($self->{\'static_pages\'}){$self->{\'article_url\'}="$self->{\'public_url\'}/$self->{\'cat_id\'}/$key"."_1.$self->{\'ext\'}";}
else {$self->{\'article_url\'}=$self->{\'view_cgi_url\'}."?id=$key&cat_id=$self->{\'cat_id\'}&page=1";}
$html=$self->small_parsing($self->{\'tmp_news\'});
$news_txt .= "$html\\n" if  $use_txt;
$html=~ s/"/\\\\"/g;
$html=~ s/[\\n\\r]//g;
$html=~ s/\'/\\\'/g;
$news_js .= qq~document.write("$html");\\n~;
}
#CHECK DIRS:
if (!(-e "$self->{\'public_dir\'}/news")){
mkdir("$self->{\'public_dir\'}/news", 0777) or croak("Can\'t mkdir $self->{\'public_dir\'}/news, reason: $!");
chmod(0777, "$self->{\'public_dir\'}/news") or croak("Can\'t chmod $self->{\'public_dir\'}/news, reason: $!");
}
#PRINT in *.js
if ($news_js){
open (NEWS, ">$self->{\'public_dir\'}/news/$cat.js") or croak("Can\'t open NEWS, reason: $!");
if ($USE_FLOCK){flock(NEWS, 2);}
print NEWS $news_js;
close NEWS;
}
#Print in *.txt
if ($news_txt){
open (NEWSTXT, ">$self->{\'public_dir\'}/news/$cat.txt") or croak("Can\'t open NEWSTXT, reason: $!");
print NEWSTXT $news_txt;
close NEWSTXT;
}
}

6
Sanitarium WebLoG / Регенерация новостей
« : 11 Ноября 2002, 19:50:04 »
Ptiza
Они у меня вставляются через SSI, на главную страницу...

7
Sanitarium WebLoG / Регенерация новостей
« : 09 Ноября 2002, 18:06:57 »
Почему новости не стираются? Например была статья, потом я ее стер, а в новостях она осталась... Как быть?

8
Sanitarium WebLoG / Как менять местами категории в меню?
« : 09 Ноября 2002, 16:32:55 »
Да по-моему никак нельзя, или сразу все как хочешь по порядку делаешь, или вручную делаешь меню, а потом инклюдишь его.

9
Sanitarium WebLoG / Коды
« : 09 Ноября 2002, 12:41:50 »
Как должно работать <--MY CODE--> ...  <--END CODE--> правильно? У меня выводиться так:  <--MY CODE--> код <--END CODE--> . То есть <--MY CODE--> ...  <--END CODE--> видно, как то некрасиво :confused:

И вообще мне кажеться это не работает, хтмл код он по крайней мере игнорирует...:mad: :confused:

------
у него вообще башню сносит как только в тексте встречается <--MY CODE-->. В одной статье у меня после <--...--> все теги выводиться стали, напр., вместо таблицы ее код, в другой, вообче после my code тишина, пусто...хотя дальше текст был

вот такие вот дела. :(

10
Sanitarium WebLoG / FAQ по Санитариуму и недокументированные возможности
« : 12 Октября 2002, 14:54:38 »
Ты прав, разумнее твоя идея. От своей я отказался, слишком много проблем :) Так просто инклюдить новости не получиться, 2 скрипта ведь, генерят в разные файлы... а заранее заготовки новостей писать - двойная работа.
Есть еще недокументированные возможности у Санитариума?

11
Sanitarium WebLoG / Помогите с настройкой скрипта
« : 11 Октября 2002, 21:41:49 »
Поищи в форуме, уже были такие темы.

12
Sanitarium WebLoG / Sanitarium локально
« : 11 Октября 2002, 21:41:18 »
flock() под Виндой не работает, отключи его.

13
Sanitarium WebLoG / Помогите с главной новостью
« : 11 Октября 2002, 21:39:15 »
Сходи опять в топик про недокументированные возможности. Там Ptiza ошибся и кстати вовремя исправился :) Почитай в конце.

14
Sanitarium WebLoG / Вывод новостей
« : 11 Октября 2002, 16:39:50 »
Объясню проблему:
У меня за 2-е разные части сайта отвечают 2-а отдельных Санитариума.
У каждого из них соответственно есть своя индексная страница, получается как 2 больщих раздела сайта со своими подкатегориями. Новые статьи там выводит <%content%>. Так вот еще есть index.html в корне не зависимый от скриптов, и мне хотелось бы чтоб там тоже выводились превью новых статей, но просто инклюдить их из news.txt понятное дело не получиться, т.к 2-а разных скрипта. Может быть в этом коде поставить одну директорию для того, чтобы оба скрипта писали данные о новых статьях в один news.txt?

sub print_news {
#--------------------------------------------------
my ($cat, $how_news, $news_js, $html, $news_txt, $use_txt, %news);
my $self=shift;
$cat=shift;
$how_news=shift;
$use_txt=$self->{\'txt_news\'};
$self->{DB_File}="$self->{\'data\'}/$cat";
$self->{DB_Field}=\'index\';
unless($self->{\'tmp_news\'}){$self->{\'tmp_news\'}=$self->load_tempfile("$self->{\'tmpl_dir\'}/tmp-main/news.txt");}
%news=$self->get_nn_recs($how_news);
foreach my $key(sort {$b <=> $a} keys %news){
   $self->unpack_rec($news{$key});
   $self->get_author_info();
      if ($self->{\'static_pages\'}){$self->{\'article_url\'}="$self->{\'public_url\'}/$self->{\'cat_id\'}/$key"."_1.$self->{\'ext\'}";}
      else {$self->{\'article_url\'}=$self->{\'view_cgi_url\'}."?id=$key&cat_id=$self->{\'cat_id\'}&page=1";}
   $html=$self->small_parsing($self->{\'tmp_news\'});
   $news_txt .= "$html\\n" if  $use_txt;
   $html=~ s/"/\\\\"/g;
   $html=~ s/[\\n\\r]//g;
   $html=~ s/\'/\\\'/g;
   $news_js .= qq~document.write("$html");\\n~;
}
#CHECK DIRS:
if (!(-e "$self->{\'public_dir\'}/news")){
   mkdir("$self->{\'public_dir\'}/news", 0777) or croak("Can\'t mkdir $self->{\'public_dir\'}/news, reason: $!");
   chmod(0777, "$self->{\'public_dir\'}/news") or croak("Can\'t chmod $self->{\'public_dir\'}/news, reason: $!");
}
#PRINT in *.js
if ($news_js){
   open (NEWS, ">$self->{\'public_dir\'}/news/$cat.js") or croak("Can\'t open NEWS, reason: $!");
   if ($USE_FLOCK){flock(NEWS, 2);}
   print NEWS $news_js;
   close NEWS;
}   
#Print in *.txt
if ($news_txt){
   open (NEWSTXT, ">$self->{\'public_dir\'}/news/$cat.txt") or croak("Can\'t open NEWSTXT, reason: $!");
   print NEWSTXT $news_txt;
   close NEWSTXT;
}
}   

Или я уже совсем загнался? :)

15
Sanitarium WebLoG / FAQ по Санитариуму и недокументированные возможности
« : 11 Октября 2002, 14:39:50 »
Что-то я не соображу. У меня на 2 разные части сайта стоит 2 отдельных Санитариума. Как бы мне новости с обоих скриптов на отдельный index вынести? Или есть у кого более разумные идеи?

Страницы: [1] 2