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