Remove redundant clause from clipForCharWidth

This commit is contained in:
Eric Mertens 2016-09-06 19:07:12 -07:00
parent 83ceb682f7
commit 25429683cd

View File

@ -46,7 +46,6 @@ clipText txt leftSkip rightClip =
| w < cw = (n, w /= 0)
| otherwise = clipForCharWidth (w - cw) (TL.tail t) (n + 1)
where cw = safeWcwidth (TL.head t)
clipForCharWidth _ _ _ = error "clipForCharWidth applied to undefined"
in txt''
-- | This is the internal representation of Images. Use the constructors in "Graphics.Vty.Image" to