on master help sign in
Fix function name typo
commit6495b9a382f7a5d99abb0f61284883fd7b54ab0e authorJonathan Daugherty <cygnus@foobox.com> dateSun 22 Jan 2017, 15:36 (10 years ago) parent2ad3041
2 files changed+4−4
src/Graphics/Vty/Output/Interface.hs+2−2 src/Graphics/Vty/Span.hs+2−2
src/Graphics/Vty/Output/Interface.hs+2−2
@@ -164,8 +164,8 @@ outputPicture dc pic = liftIO $ do
164164 -- Diff the previous output against the requested output.
165165 -- Differences are currently on a per-row basis.
166166 diffs :: [Bool] = case prevOutputOps as of
167− Nothing -> replicate (fromEnum $ regionHeight $ effectedRegion ops) True
168− Just previousOps -> if effectedRegion previousOps /= effectedRegion ops
167+ Nothing -> replicate (fromEnum $ regionHeight $ affectedRegion ops) True
168+ Just previousOps -> if affectedRegion previousOps /= affectedRegion ops
169169 then replicate (displayOpsRows ops) True
170170 else zipWith (/=) (Vector.toList previousOps)
171171 (Vector.toList ops)
src/Graphics/Vty/Span.hs+2−2
@@ -109,8 +109,8 @@ displayOpsColumns ops
109109displayOpsRows :: DisplayOps -> Int
110110displayOpsRows ops = Vector.length ops
111111
112−effectedRegion :: DisplayOps -> DisplayRegion
113−effectedRegion ops = (displayOpsColumns ops, displayOpsRows ops)
112+affectedRegion :: DisplayOps -> DisplayRegion
113+affectedRegion ops = (displayOpsColumns ops, displayOpsRows ops)
114114
115115-- | The number of columns a SpanOps effects.
116116spanOpsEffectedColumns :: SpanOps -> Int