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:
parent
55254c752a
commit
5b7f130d43
2 changed files with 2 additions and 2 deletions
2
app.pl
2
app.pl
|
@ -72,7 +72,7 @@ post '/paste' => sub {
|
||||||
if (my $type = App::Spamfilter::is_spam($c, $who, $desc, $code)) {
|
if (my $type = App::Spamfilter::is_spam($c, $who, $desc, $code)) {
|
||||||
warn "I thought this was spam! $type";
|
warn "I thought this was spam! $type";
|
||||||
} else {
|
} 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);
|
$c->redirect_to('/pastebin/'.$id);
|
||||||
|
|
|
@ -58,7 +58,7 @@
|
||||||
</div>
|
</div>
|
||||||
<div class="col-md-6">
|
<div class="col-md-6">
|
||||||
<label for="desc">What: </label>
|
<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"/>
|
<input type="button" value="Show supported modules" id="showmodules" style="float:right"/>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
|
|
Loading…
Add table
Reference in a new issue