1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut-pastebin synced 2025-06-07 14:17:26 -04:00

Setup some limits on summary/desc

This commit is contained in:
Ryan Voots 2017-01-06 15:41:24 -05:00
parent 55254c752a
commit 5b7f130d43
2 changed files with 2 additions and 2 deletions

2
app.pl
View file

@ -72,7 +72,7 @@ post '/paste' => sub {
if (my $type = App::Spamfilter::is_spam($c, $who, $desc, $code)) {
warn "I thought this was spam! $type";
} else {
IRC::Perlbot::announce($c->param('chan'), $c->param('name'), $c->param('desc'), "https://perlbot.pl/pastebin/$id");
IRC::Perlbot::announce($c->param('chan'), $c->param('name'), substr($c->param('desc'), 0, 40), "https://perlbot.pl/pastebin/$id");
}
$c->redirect_to('/pastebin/'.$id);

View file

@ -58,7 +58,7 @@
</div>
<div class="col-md-6">
<label for="desc">What: </label>
<input size="40" name="desc" placeholder="I broke this" />
<input size="40" name="desc" placeholder="I broke this" maxlength="40"/>
<input type="button" value="Show supported modules" id="showmodules" style="float:right"/>
</div>
</div>