my ($text) = @_;
$text =~ s{\n}{\n<br/>}g;
- $text =~ s{\[B\](.*?)\[/B\]}{<b>$1</b>};
+ $text =~ s{\[B\](.*?)\[/B\]}{<b>$1</b>}gi;
return $text;
}
if ($rows == 0){
$ND::DBH->do(q{INSERT INTO forum_thread_visits (uid,ftid) VALUES ($1,$2)}
,undef,$ND::UID,$thread) or $ND::ERROR .= p($ND::DBH->errstr);
- }else{
+ }elsif(not defined $rows){
$ND::ERROR .= p($ND::DBH->errstr);
}
}