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

;cli: option help tweaks

Browse Source
This commit is contained in:
Simon Michael 2019-05-04 12:01:38 -07:00
parent cca0b7aec6
commit dd8c403c81
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hledger-lib/Hledger/Reports/ReportOptions.hs
View File

@ -78,9 +78,9 @@ instance Default AccountListMode where def = ALDefault
-- ("today" would have been preferable, but clashes with -- ("today" would have been preferable, but clashes with
-- "transaction" for abbreviating.) -- "transaction" for abbreviating.)
data ValueDate = data ValueDate =
AtTransaction -- ^ Calculate values as of each posting's date AtTransaction -- ^ Calculate values as of each posting's date (called "transaction" for UI reasons)
| AtPeriod -- ^ Calculate values as of each report period's last day | AtPeriod -- ^ Calculate values as of each report period's last day
| AtNow -- ^ Calculate values as of today (report generation date) | AtNow -- ^ Calculate values as of today (report generation date) (called "now" not today for UI reasons)
| AtDate Day -- ^ Calculate values as of some other date | AtDate Day -- ^ Calculate values as of some other date
deriving (Show,Data,Eq) -- Typeable deriving (Show,Data,Eq) -- Typeable

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

@ -149,7 +149,7 @@ reportflags = [
,flagNone ["empty","E"] (setboolopt "empty") "show items with zero amount, normally hidden (and vice-versa in hledger-ui/hledger-web)" ,flagNone ["empty","E"] (setboolopt "empty") "show items with zero amount, normally hidden (and vice-versa in hledger-ui/hledger-web)"
,flagNone ["cost","B"] (setboolopt "cost") "convert amounts to their cost at transaction time (using the transaction price, if any)" ,flagNone ["cost","B"] (setboolopt "cost") "convert amounts to their cost at transaction time (using the transaction price, if any)"
,flagNone ["value","V"] (setboolopt "value") "convert amounts to their market value" ,flagNone ["value","V"] (setboolopt "value") "convert amounts to their market value"
,flagReq ["value-at"] (\s opts -> Right $ setopt "value-at" s opts) "VALUEDATE" "as of which date should market values be calculated ? transaction|period|now|YYYY-MM-DD (default: now)" ,flagReq ["value-at"] (\s opts -> Right $ setopt "value-at" s opts) "VALUEDATE" "as of which date should market values be calculated ? transaction|period|now|YYYY-MM-DD (implies -V, default: now)"
,flagNone ["auto"] (setboolopt "auto") "apply automated posting rules to modify transactions" ,flagNone ["auto"] (setboolopt "auto") "apply automated posting rules to modify transactions"
,flagNone ["forecast"] (setboolopt "forecast") "apply periodic transaction rules to generate future transactions, to 6 months from now or report end date" ,flagNone ["forecast"] (setboolopt "forecast") "apply periodic transaction rules to generate future transactions, to 6 months from now or report end date"
] ]