diff --git a/revbank b/revbank index c0a4ea1..5e9f584 100755 --- a/revbank +++ b/revbank @@ -123,6 +123,11 @@ sub now { return strftime '%Y-%m-%d_%H:%M:%S', localtime; } +sub git_commit { + system qw(git commit -q revbank.accounts .revbank.undo), + -m => "Transaction by $user"; +} + sub parse_product { my ($id) = @_; my @products; @@ -380,6 +385,7 @@ sub undo { } else { print "Transaction ID '$tid' not found in undo log.\n"; } + git_commit(); return ['noop']; } @@ -520,6 +526,7 @@ LINE: for (;;) { my ($old, $new) = update_account($_, $delta); } close $ufh; + git_commit(); my $deposit = sum map $_->[1], grep { $_->[0] eq 'deposit' } @todo; if ($deposit) { diff --git a/revbank.products b/revbank.products index f024165..40492a2 100644 --- a/revbank.products +++ b/revbank.products @@ -1,4 +1,5 @@ -649241869825 0.00 Free disgusting stuff +# Free stuff +649241869825 0.00 Free disgusting stuff (LS) # Water 5400151013112 0.50 Carbonated mineral water