@@ -126,6 +126,10 @@ tests =
126126 let attr = ("", [], [("align", "right"), ("vspace", "4")])
127127 in para $ imageWith attr "image.gif" "Hello" mempty
128128
129+ , "inserted text" =:
130+ "+the new version+" =?>
131+ para (spanWith ("", ["underline"], []) "the new version")
132+
129133 , "HTML entity" =:
130134 "me & you" =?> para "me & you"
131135