Minor fixes

This commit is contained in:
Yorhel 2014-04-23 13:31:06 +02:00
parent 06a9cdfd80
commit e29717279e
5 changed files with 15 additions and 6 deletions

1
Bug.pm
View file

@ -259,6 +259,7 @@ sub handleForm {
{ post => 'bug_message', maxlength => 256*1024, minlength => 1 },
);
return($f, undef) if $f->{_err};
return({ _err => [['bug_summary']], %$f}, undef) if $f->{bug_summary} =~ qr{http://}; # SPAM
$f->{bug_code} = '' if $f->{bug_code} eq 'code';
my $admin = grep($_ eq $f->{bug_code}, @{$s->{admins}}) ? 1 : 0;