bitlair/revbank
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Annoy user when they type 'y' instead of 'yes' :)

Browse source
This commit is contained in:
Juerd Waalboer 2023-02-13 02:28:58 +01:00
parent 1ecb2286df
commit 8e9a037d1c
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
plugins/statiegeld_tokens
View file

@ -281,6 +281,9 @@ sub command($self, $cart, $command, @) {
}
sub void :Tab(yes,no) ($self, $cart, $input, @) {
if ($input eq 'y') {
return REJECT, "y is not yes...";
}
if ($input ne 'yes') {
print "Destruction cancelled.\n";
return ACCEPT;