Merge pull request #29 from rootzlevel/crop-bug
Don't let remain_rows go negative
commitc57442d6d5a9d2766a5a593b699de6b754bddb6e
authorCorey O'Connor <coreyoconnor@gmail.com>
dateFri 17 Aug 2012, 21:39 (14 years ago)
parente7361b7028da8f
src/Graphics/Vty/Span.hs+1−1
@@ -186,7 +186,7 @@ row_ops_for_image mrow_ops -- the image to output the ops t
186186 (skip_row', skip_col)
187187 (y + top_height)
188188 remaining_columns
189− (remain_rows - top_height)
189+ (max 0 $ remain_rows - top_height)
190190 return (skip_row'', min skip_col' skip_col'')
191191 HorizJoin l r _ _ -> do
192192 (skip_row',skip_col') <- row_ops_for_image mrow_ops l bg region skip_dim y remaining_columns remain_rows