Update error message
This commit is contained in:
parent
65566349f6
commit
c9ef624d82
2 changed files with 2 additions and 2 deletions
|
@ -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;
|
||||||
};
|
};
|
||||||
|
|
|
@ -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";
|
||||||
|
|
Loading…
Add table
Reference in a new issue