X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=fix-nonstandard-chars.el;fp=fix-nonstandard-chars.el;h=e5c3464476659ea7a98c3757b567fde8603c6a0c;hb=c8ef0ff3bd4f0b1ddaaadf9770d64db7fe28159a;hp=0000000000000000000000000000000000000000;hpb=83f0c9d6b7078bc444ef02cb043f1be68399bbee;p=emacs.d.git

diff --git a/fix-nonstandard-chars.el b/fix-nonstandard-chars.el
new file mode 100644
index 0000000..e5c3464
--- /dev/null
+++ b/fix-nonstandard-chars.el
@@ -0,0 +1,9 @@
+(defun fix-nonstandard-chars
+  "Replace some typical nonstandard characters that result from
+   copy-and-pasting word processor text into XHTML documents."
+
+  (replace-string "’" "'")
+  (replace-string "“" "“")
+  (replace-string "”" "”")
+  (replace-string "–" "-")
+)