Use the proper index for the height
commita5d0a6b01534dd0a84a46376fb2129407f63a292
authorBen Boeckel <MathStuf@gmail.com>
dateSat 2 Apr 2011, 00:21 (16 years ago)
parentad661a0
src/Graphics/Vty/Image.hs+1−1
@@ -218,7 +218,7 @@ image_height VertJoin { output_height = r } = r
218218image_height BGFill { output_height = r } = r
219219image_height EmptyImage = 0
220220image_height ( Translation _v i ) = image_height i
221−image_height ( ImageCrop _v i ) = min (image_height i) (toEnum $ fst _v)
221+image_height ( ImageCrop _v i ) = min (image_height i) (toEnum $ snd _v)
222222
223223-- | Combines two images side by side.
224224--