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

Added --actual-dates, for overriding --effective

Browse source 
This is so that if someone has --effective in their .ledgerrc, they can
force the use of actual dates.
This commit is contained in:
John Wiegley 2009-10-27 21:34:08 -04:00
parent 07cca71893
commit 828a1e8bf9
3 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/global.cc
View file

@ -419,7 +419,9 @@ void global_scope_t::normalize_report_options(const string& verb)
report_t& rep(report());
// jww (2009-02-09): These globals are a hack, but hard to avoid.
item_t::use_effective_date = rep.HANDLED(effective);
item_t::use_effective_date = (rep.HANDLED(effective) &&
! rep.HANDLED(actual_dates));
rep.session.commodity_pool->keep_base = rep.HANDLED(base);
rep.session.commodity_pool->get_quotes = rep.session.HANDLED(download);

1
src/report.cc
View file

@ -506,6 +506,7 @@ option_t<report_t> * report_t::lookup_option(const char * p)
OPT(abbrev_len_);
else OPT(account_);
else OPT(actual);
else OPT(actual_dates);
else OPT(add_budget);
else OPT(amount_);
else OPT(amount_data);

3
src/report.h
View file

@ -196,6 +196,7 @@ public:
HANDLER(abbrev_len_).report(out);
HANDLER(account_).report(out);
HANDLER(actual).report(out);
HANDLER(actual_dates).report(out);
HANDLER(add_budget).report(out);
HANDLER(amount_).report(out);
HANDLER(amount_data).report(out);
@ -317,6 +318,8 @@ public:
parent->HANDLER(limit_).on(string("--actual"), "actual");
});
OPTION(report_t, actual_dates);
OPTION_(report_t, add_budget, DO() {
parent->budget_flags |= BUDGET_BUDGETED | BUDGET_UNBUDGETED;
});