slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

imp: cli: move --today to reportflags (#1674)

Browse Source
This commit is contained in:
Simon Michael 2021-09-18 11:16:47 -10:00
parent 02a79fb230
commit 633af61b2e
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
doc/common.m4
View File

@ -69,9 +69,6 @@ m4_define({{_helpoptions_}}, {{
`--debug[=N]`
: show debug output (levels 1-9, default: 1)
`--today=DATE`
: generate reports treating DATE as the current day (for testing purposes)
}} )m4_dnl
m4_dnl
m4_define({{_inputoptions_}}, {{
@ -133,6 +130,9 @@ m4_define({{_reportingoptions_}}, {{
`--date2`
: match the secondary date instead (see command help for other effects)
`--today=DATE`
: override today's date (affects relative smart dates, for tests/examples)
`-U --unmarked`
: include only unmarked postings/txns (can combine with -P or -C)

4
hledger/Hledger/Cli/CliOptions.hs
View File

@ -119,7 +119,6 @@ helpflags = [
,flagNone ["info"] (setboolopt "info") "Show info manual with info"
-- ,flagNone ["browse-args"] (setboolopt "browse-args") "use a web UI to select options and build up a command line"
,flagReq ["debug"] (\s opts -> Right $ setopt "debug" s opts) "[N]" "show debug output (levels 1-9, default: 1)"
,flagReq ["today"] (\s opts -> Right $ setopt "today" s opts) "DATE" "generate reports treating DATE as the current day (for testing purposes)"
,flagNone ["version"] (setboolopt "version") "show version information"
]
@ -153,7 +152,8 @@ reportflags = [
,flagNone ["yearly","Y"] (setboolopt "yearly") "multiperiod/multicolumn report by year"
,flagReq ["period","p"] (\s opts -> Right $ setopt "period" s opts) "PERIODEXP" "set start date, end date, and/or report interval all at once"
,flagNone ["date2"] (setboolopt "date2") "match the secondary date instead. See command help for other effects. (--effective, --aux-date also accepted)" -- see also hiddenflags
,flagReq ["today"] (\s opts -> Right $ setopt "today" s opts) "DATE" "override today's date (affects relative smart dates, for tests/examples)"
-- status/realness/depth/zero filters
,flagNone ["unmarked","U"] (setboolopt "unmarked") "include only unmarked postings/txns (can combine with -P or -C)"
,flagNone ["pending","P"] (setboolopt "pending") "include only pending postings/txns"