diff options
Diffstat (limited to 'tp-bbcode/test')
| -rw-r--r-- | tp-bbcode/test/Thermoprint/Printout/BBCodeSpec.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tp-bbcode/test/Thermoprint/Printout/BBCodeSpec.hs b/tp-bbcode/test/Thermoprint/Printout/BBCodeSpec.hs index 09b3147..7909360 100644 --- a/tp-bbcode/test/Thermoprint/Printout/BBCodeSpec.hs +++ b/tp-bbcode/test/Thermoprint/Printout/BBCodeSpec.hs | |||
| @@ -53,7 +53,7 @@ normalize = (!! 3) . iterate normalize' . first (const ()) | |||
| 53 | join' _ = Left () | 53 | join' _ = Left () |
| 54 | 54 | ||
| 55 | pOut :: Seq Block -> Printout | 55 | pOut :: Seq Block -> Printout |
| 56 | pOut = fmap (pure . Cooked) | 56 | pOut = Printout . fmap (Paragraph . pure . Cooked) |
| 57 | 57 | ||
| 58 | examples :: [(Text, Either BBCodeError (Seq Block))] | 58 | examples :: [(Text, Either BBCodeError (Seq Block))] |
| 59 | examples = [ ("Hello World!" | 59 | examples = [ ("Hello World!" |