Update error message

This commit is contained in:
Juerd Waalboer 2022-06-12 22:49:33 +02:00
parent 65566349f6
commit c9ef624d82
2 changed files with 2 additions and 2 deletions

View file

@ -28,7 +28,7 @@ sub import {
die "For our sanity, no negative amounts, please :).\n"; die "For our sanity, no negative amounts, please :).\n";
} }
if ($amount->cents > 99900) { if ($amount->cents > 99900) {
die "That's way too much money, or an unknown barcode.\n"; die "That's way too much money.\n";
} }
return $amount; return $amount;
}; };

View file

@ -3,7 +3,7 @@
HELP1 "withdraw <amount>" => "Withdraw from your account"; HELP1 "withdraw <amount>" => "Withdraw from your account";
sub command :Tab(withdraw) ($self, $cart, $command, @) { sub command :Tab(withdraw) ($self, $cart, $command, @) {
if (defined parse_amount($command)) { if (defined eval { parse_amount($command) }) {
warn "Note: raw amounts for withdrawal or unlisted products are no longer supported.\n\n"; warn "Note: raw amounts for withdrawal or unlisted products are no longer supported.\n\n";
warn "Please use the 'withdraw' command to take money out of your revbank account, or\n"; warn "Please use the 'withdraw' command to take money out of your revbank account, or\n";
warn "the 'unlisted' command to pay for an unlisted product.\n\n"; warn "the 'unlisted' command to pay for an unlisted product.\n\n";