swaggboi/guestbook-ng
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Some style tweaks, this was buggin me

Browse Source
This commit is contained in:
swag 2022-04-03 17:11:02 -04:00
parent 7c951baaa6
commit 6fe9a59b6d
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guestbook-ng.pl
View File

@ -108,10 +108,10 @@ any [qw{GET POST}], '/sign' => sub ($c) {
# attempt to confuse a (hypothetical) bot that would try to # attempt to confuse a (hypothetical) bot that would try to
# select what it thinks is the right answer # select what it thinks is the right answer
my @answers = shuffle(0, 'false', undef); my @answers = shuffle(0, 'false', undef);
my $right_answer_label = 'I\'m ready to sign (choose this one)'; my $right_answer_label = "I'm ready to sign (choose this one)";
my @wrong_answer_labels = shuffle( my @wrong_answer_labels = shuffle(
'I don\'t want to sign (wrong answer)', "I don't want to sign (wrong answer)",
'This is spam/I\'m a bot, do not sign' "This is spam/I'm a bot, do not sign"
); );
$c->stash( $c->stash(