simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-12-26 03:42:25 +03:00
Code Issues Projects Releases Wiki Activity

bal: show an error for unsupported --budget --sort-amount

Browse Source
This commit is contained in:
Simon Michael 2018-04-27 11:52:23 -07:00
parent dd3e45ff42
commit 34c3c5dc6c
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger/Hledger/Cli/Commands/Balance.hs
View File

@ -250,6 +250,7 @@ module Hledger.Cli.Commands.Balance (
,tests_Hledger_Cli_Commands_Balance
) where
import Control.Monad (when)
import Data.List
import Data.Maybe
--import qualified Data.Map as Map
@ -313,6 +314,7 @@ balance opts@CliOpts{rawopts_=rawopts,reportopts_=ropts} j = do
case (budget, interval) of
(True, _) -> do
-- single or multicolumn budget report
when (sort_amount_ ropts) $ error' "Sorry, --sort-amount is not yet supported with --budget." -- TODO
reportspan <- reportSpan j ropts
let budgetreport = dbg1 "budgetreport" $ budgetReport ropts assrt showunbudgeted reportspan d j
where