X-Git-Url: http://www.wagner.pp.ru/gitweb/?p=oss%2Fstilllife.git;a=blobdiff_plain;f=forum%2Fforum;fp=forum%2Fforum;h=bc685450577ae4cfd35d1e81175f1304172b3af6;hp=7cb882b48c9c9234da43ab5d6d0ec89cd5dadeb5;hb=d0acd3927cbe4e0f7e4faccca7ef6dd68911ecd5;hpb=f66c0d31896664d40c4e78e21d14621c463f7ef6 diff --git a/forum/forum b/forum/forum index 7cb882b..bc68545 100755 --- a/forum/forum +++ b/forum/forum @@ -262,7 +262,7 @@ sub show_error { print $cgi->header(-type=>'text/html',-charset=>'utf-8'); print "
", - $cgi->escapeHTML($msg),"
", + escapeHTML($msg),"", "ÐÑи обÑабоÑке ÑÑой оÑибки не обнаÑÑжен Ñаблон ÑообÑÐµÐ½Ð¸Ñ Ð¾Ð± оÑибке
"; } exit; @@ -1479,7 +1479,7 @@ sub delete_comment { my ($cgi,$forum,$topic,$id) = @_; my ($tree,$lockfd) = gettree($topic); my ($msg) = $tree->look_down(id => $id); - show_error("Рданной Ñеме Ð½ÐµÑ Ñеплики Ñ id=$id") if (!$msg); + show_error($forum,"Рданной Ñеме Ð½ÐµÑ Ñеплики Ñ id=$id") if (!$msg); if (getrights($cgi,$forum) ne "moderator" && getrights($cgi,$forum) ne "admin") { my $author= $msg->look_down(_tag=>"input",name=>"author"); @@ -1910,7 +1910,7 @@ sub input2tree { } elsif ($format eq "text") { $text=~s/\r?\n\r?\n/<\/p>/;
$text=~s/\r?\n/
/;
- $text = "
".$text."
".escapeHTML($text)."