@@ -1067,8 +1067,8 @@ str = do
10671067 then case likelyAbbrev result of
10681068 [] -> return $ Str result
10691069 xs -> choice (map (\x ->
1070− try (string x >> char ' ' >>
1071− notFollowedBy spaceChar >>
1070+ try (string x >> oneOf " \n" >>
1071+ lookAhead letter >>
10721072 return (Str $ result ++ spacesToNbr x ++ "\160"))) xs)
10731073 <|> (return $ Str result)
10741074 else return $ Str result