summaryrefslogtreecommitdiff
path: root/tests/opml-reader.native
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2014-03-27 19:58:14 +0000
committerMatthew Pickering <matthewtpickering@gmail.com>2014-04-01 13:53:34 +0100
commit90269cb213ae6b2db31cc11199d1ce8d378bdac8 (patch)
tree3b52f36e9b18cdd73a09af95f4377f4f25bcadf4 /tests/opml-reader.native
parent5a51a67abda59c177f3a6d0f6cba59d41e866287 (diff)
Tests updated to reflect changes to readers.
Previously normalisation was handled by the `normalizeSpaces` function. The behavoir of the builder monoid is slightly different and melds together more items such as consecutive strings and spaces adjacent to line breaks. The tests have been changed to reflect this. All relevant tests passed when the string melding line of the builder monoid was commented out.
Diffstat (limited to 'tests/opml-reader.native')
-rw-r--r--tests/opml-reader.native2
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/opml-reader.native b/tests/opml-reader.native
index e71857680..14aff2c03 100644
--- a/tests/opml-reader.native
+++ b/tests/opml-reader.native
@@ -19,7 +19,7 @@ Pandoc (Meta {unMeta = fromList [("author",MetaList [MetaInlines [Str "Dave",Spa
,Header 3 ("",[],[]) [Str "North",Space,Str "Dakota"]
,Header 3 ("",[],[]) [Str "Oklahoma"]
,Header 3 ("",[],[]) [Str "South",Space,Str "Dakota"]
-,Header 2 ("",[],[]) [Str "Mid",Str "-",Str "Atlantic"]
+,Header 2 ("",[],[]) [Str "Mid-Atlantic"]
,Header 3 ("",[],[]) [Str "Delaware"]
,Header 3 ("",[],[]) [Str "Maryland"]
,Header 3 ("",[],[]) [Str "New",Space,Str "Jersey"]