@@ -188,6 +188,7 @@ escapeLexer = try $ do
188 '|' -> return " "
188 '|' -> return " "
189 '\'' -> return "`"
189 '\'' -> return "`"
190 '.' -> return "`"
190 '.' -> return "`"
191+ '~' -> return "\160" -- nonbreaking space
191 _ -> escUnknown [c] "\xFFFD"
192 _ -> escUnknown [c] "\xFFFD"