@@ -478,13 +478,15 @@ toReport source err =
478 H.reflow $
478 H.reflow $
479 "I do not recognize this (" ++ N.toString op ++ ") operator."
479 "I do not recognize this (" ++ N.toString op ++ ") operator."
481− case map H.text suggestions of
481+ H.fillSep $
483− H.reflow "Is there an `import` and `exposing` entry for it?"
482+ ["Is","there","an","`import`","and","`exposing`","entry","for","it?"]
485− alts ->
484+ case map H.text suggestions of
486− H.fillSep $
485+ [] ->
487− ["Maybe","you","want"] ++ H.commaSep "or" format alts ++ ["instead?"]
489+ ["Maybe","you","want"] ++ H.commaSep "or" format alts ++ ["instead?"]
490 PatternHasRecordCtor region name ->
492 PatternHasRecordCtor region name ->