@@ -216,8 +216,8 @@ snoc_text_span a text_str mrow_ops skip_col y remaining_columns = do
216216 then if ow' == remaining_columns
217217 then ( ow', dw', char_count', b0 )
218218 else if (w' + ow') > remaining_columns
219− then ( remaining_columns, dw', char_count' + ooverflow, B.append b0 $ B.pack $ encode $ genericReplicate ooverflow '…' )
220− else ( ow' + w', dw', char_count' + 1, B.append b0 $ B.pack $ encode [c] )
219+ then ( remaining_columns, dw', char_count' + ooverflow, B.append b0 $ B.pack $ encode $ genericReplicate ooverflow '…' )
220+ else ( ow' + w', dw', char_count' + 1, B.append b0 $ B.pack $ encode [c] )
221221 else if (w' + dw') > skip_col
222222 then ( doverflow, skip_col, doverflow, B.append b0 $ B.pack $ encode $ genericReplicate doverflow '…' )
223223 else ( ow', w' + dw', char_count', b0 )