changeset 96947:57b80a67db7b

(recode-region): Deactivate mark at the end.
author Chong Yidong <cyd@stupidchicken.com>
date Wed, 23 Jul 2008 22:40:07 +0000
parents 097917c3c2c2
children d09831a9672d
files lisp/international/mule.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule.el	Wed Jul 23 22:39:57 2008 +0000
+++ b/lisp/international/mule.el	Wed Jul 23 22:40:07 2008 +0000
@@ -2049,7 +2049,9 @@
   (save-restriction
     (narrow-to-region start end)
     (encode-coding-region (point-min) (point-max) coding)
-    (decode-coding-region (point-min) (point-max) new-coding)))
+    (decode-coding-region (point-min) (point-max) new-coding))
+  (if (region-active-p)
+      (deactivate-mark)))
 
 (defun make-translation-table (&rest args)
   "Make a translation table from arguments.