1 (defun fix-nonstandard-chars
2 "Replace some typical nonstandard characters that result from
3 copy-and-pasting word processor text into XHTML documents."
5 (replace-string "’" "'")
6 (replace-string "“" "“")
7 (replace-string "”" "”")
8 (replace-string "–" "-")