X-Git-Url: http://gitweb.michael.orlitzky.com/?p=emacs.d.git;a=blobdiff_plain;f=fix-nonstandard-chars.el;h=e1ec2f563d8ddc7cd796c411c40a4f8dee56d7b3;hp=2ba368b83a81aecceb4d9ab569944567b1ca6300;hb=cf5775ba8cc0672bf5f37c6be9e0165f186bcf23;hpb=4db88b40d59182e654e24cdd64cd6e163096183b diff --git a/fix-nonstandard-chars.el b/fix-nonstandard-chars.el index 2ba368b..e1ec2f5 100644 --- a/fix-nonstandard-chars.el +++ b/fix-nonstandard-chars.el @@ -4,11 +4,17 @@ (interactive "p") - (setq replacements '( ("’" "'") - ("“" "“") - ("”" "”") - ("–" "-") - ("—" "—") )) + (setq replacements + '( ("’" "'") + ("“" "“") + ("”" "”") + ("–" "-") + ("—" "—") + ("°" "°") + ("®" "®") + ("™" "™") + ) + ) (dolist (replacement replacements nil) ;; The mark gets all fucked up here. It's easiest to