mirror of
https://github.com/simonmichael/hledger.git
synced 2024-11-07 21:15:19 +03:00
cli:Fixed NoLine column rendering after previous commit
This commit is contained in:
parent
011a864deb
commit
e33aa56d43
@ -85,7 +85,9 @@ renderHLine' vpos pretty prop is h = edge HL ++ sep ++ coreLine ++ sep ++ edge H
|
||||
helper = either vsep dashes
|
||||
dashes (i,_) = concat (replicate i sep)
|
||||
sep = boxchar vpos HM NoLine prop pretty
|
||||
vsep v = sep ++ cross v prop ++ sep
|
||||
vsep v = case v of
|
||||
NoLine -> sep ++ sep
|
||||
_ -> sep ++ cross v prop ++ sep
|
||||
cross v h = boxchar vpos HM v h pretty
|
||||
|
||||
data VPos = VT | VM | VB -- top middle bottom
|
||||
|
Loading…
Reference in New Issue
Block a user