mirror of
https://github.com/simonmichael/hledger.git
synced 2024-09-19 10:17:35 +03:00
web: fix options breakage, add test code to tags
This commit is contained in:
parent
9e9aec957f
commit
92038b7d72
@ -150,7 +150,7 @@ rawOptsToReportOpts rawopts = checkReportOpts <$> do
|
||||
,monthly_ = boolopt "monthly" rawopts
|
||||
,quarterly_ = boolopt "quarterly" rawopts
|
||||
,yearly_ = boolopt "yearly" rawopts
|
||||
,format_ = maybestringopt "format" rawopts -- XXX move to CliOpts or move validation from Cli.Options to here
|
||||
,format_ = maybestringopt "format" rawopts -- XXX move to CliOpts or move validation from Cli.CliOptions to here
|
||||
,query_ = unwords $ listofstringopt "args" rawopts -- doesn't handle an arg like "" right
|
||||
,average_ = boolopt "average" rawopts
|
||||
,related_ = boolopt "related" rawopts
|
||||
|
@ -9,7 +9,7 @@ import Yesod.Default.Config
|
||||
import Yesod.Test
|
||||
import Test.Hspec (hspec)
|
||||
import Application (makeFoundation)
|
||||
import Hledger.Web.Options (defwebopts)
|
||||
import Hledger.Web.WebOptions (defwebopts)
|
||||
|
||||
import HomeTest
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user