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

Further update to new ledger-like internals

Browse source
This commit is contained in:
Juerd Waalboer 2019-11-05 00:57:39 +01:00
parent 5a7a7184dd
commit 1cbc906f1e
22 changed files with 153 additions and 149 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/RevBank/Messages.pm
View file

@ -24,8 +24,12 @@ sub hook_plugin_fail {
sub hook_cart_changed {
my ($class, $cart) = @_;
$cart->size or return;
say "Pending:";
$cart->display;
say "Enter username to pay/finish or 'abort' to abort.\n";
my $sum = $cart->sum;
my $what = $sum > 0 ? "add %.2f" : "pay %.2f";
say sprintf "Enter username to $what; type 'abort' to abort.\n", abs $sum;
}
sub hook_abort {