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

ui: txn: show current query affecting txn list

Browse Source
This commit is contained in:
Simon Michael 2016-06-07 09:20:20 -07:00
parent 7a951a8dd7
commit 4b68675ce5
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
hledger-ui/Hledger/UI/TransactionScreen.hs
View File

@ -64,6 +64,7 @@ drawTransactionScreen AppState{aopts=UIOpts{cliopts_=CliOpts{reportopts_=ropts}}
<+> withAttr ("border" <> "bold") (str $ show i) <+> withAttr ("border" <> "bold") (str $ show i)
<+> str (" of "++show (length nts)) <+> str (" of "++show (length nts))
<+> togglefilters <+> togglefilters
<+> borderQueryStr (query_ ropts)
<+> str (" in "++T.unpack acct++")") <+> str (" in "++T.unpack acct++")")
togglefilters = togglefilters =
case concat [ case concat [