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