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

avoid a Text.Printf name collision with GHC 7.7+ (fixes #153)

Browse Source
This commit is contained in:
Simon Michael 2014-01-10 08:29:25 -08:00
parent 2a23ebd74f
commit d55f686f68
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hledger-lib/Hledger/Data/FormatStrings.hs
View File

@ -67,13 +67,13 @@ formatLiteral = do
c = (satisfy isPrintableButNotPercentage <?> "printable character") c = (satisfy isPrintableButNotPercentage <?> "printable character")
<|> try (string "%%" >> return '%') <|> try (string "%%" >> return '%')
formatString :: GenParser Char st FormatString formatStr :: GenParser Char st FormatString
formatString = formatStr =
formatField formatField
<|> formatLiteral <|> formatLiteral
formatStrings :: GenParser Char st [FormatString] formatStrings :: GenParser Char st [FormatString]
formatStrings = many formatString formatStrings = many formatStr
testFormat :: FormatString -> String -> String -> Assertion testFormat :: FormatString -> String -> String -> Assertion
testFormat fs value expected = assertEqual name expected actual testFormat fs value expected = assertEqual name expected actual