(recode-region): Deactivate mark at the end.

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 9e0d575e6fc4c8152db6293651ff0141f95907c5..35c696dc916d7f597e4a08d69daa950ad73c2f5f 100644 (file)
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -2049,7 +2049,9 @@ Part of the job of this function is setting `buffer-undo-list' appropriately."
   (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.