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

dev: Uniqueleafnames.hs: fix haddock failure

Browse Source
This commit is contained in:
Simon Michael 2022-07-13 19:10:28 +01:00
parent 7d8fbe2dc0
commit 0ecc1ed79b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hledger-lib/Hledger/Data/JournalChecks/Uniqueleafnames.hs
View File

@ -50,7 +50,7 @@ journalCheckUniqueleafnames j = do
llen = T.length $ accountLeafName a llen = T.length $ accountLeafName a
col = 5 + (if isVirtual p then 1 else 0) + alen - llen col = 5 + (if isVirtual p then 1 else 0) + alen - llen
col2 = col + llen - 1 col2 = col + llen - 1
accts = T.unlines fulls -- $ map (("\""<>).(<>"\"")) fulls accts = T.unlines fulls
_ -> Right () -- shouldn't happen _ -> Right () -- shouldn't happen