sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

The cleared or pending flag of a transaction overrides the flag for the entire

Browse source 
entry only if it is "more" cleared.
This commit is contained in:
John Wiegley 2009-01-14 00:32:02 -04:00
parent dc9782e0de
commit 93f884b5f2
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/item.cc
View file

@ -41,6 +41,9 @@ namespace {
value_t get_status(item_t& item) {
return long(item.state());
}
value_t get_uncleared(item_t& item) {
return item.state() == item_t::CLEARED;
}
value_t get_cleared(item_t& item) {
return item.state() == item_t::CLEARED;
}
@ -111,7 +114,7 @@ expr_t::ptr_op_t item_t::lookup(const string& name)
case 'u':
if (name == "uncleared")
return expr_t::op_t::wrap_value(1L);
return WRAP_FUNCTOR(get_wrapper<&get_uncleared>);
break;
case 'X':

4
src/textual.cc
View file

@ -552,7 +552,9 @@ entry_t * parse_entry(std::istream& in, char * line, account_t * master,
}
if (xact_t * xact = parse_xact(line, master, curr.get())) {
xact->set_state(state);
if ((state == item_t::CLEARED && xact->state() != item_t::CLEARED) ||
(state == item_t::PENDING && xact->state() == item_t::UNCLEARED))
xact->set_state(state);
xact->beg_pos = beg_pos;
xact->beg_line = beg_line;