X-Git-Url: http://gitweb.michael.orlitzky.com/?p=emacs.d.git;a=blobdiff_plain;f=fix-nonstandard-chars.el;h=e1ec2f563d8ddc7cd796c411c40a4f8dee56d7b3;hp=2f558cbde30b50ceae325ac5ae4dd12142f6e755;hb=761582529e1b17e025bf2bd45109afe8b14202a7;hpb=2d26db20b89374179ffab83893a257c023528ee9 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