aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/international/mule-util.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/international/mule-util.el b/lisp/international/mule-util.el
index 513fd28bb91..7c51409422b 100644
--- a/lisp/international/mule-util.el
+++ b/lisp/international/mule-util.el
@@ -327,6 +327,7 @@ coding systems ordered by priority."
327 (mapc (function (lambda (x) (set (car x) (cdr x)))) 327 (mapc (function (lambda (x) (set (car x) (cdr x))))
328 prio-list) 328 prio-list)
329 (set-coding-priority (mapcar #'car prio-list)) 329 (set-coding-priority (mapcar #'car prio-list))
330 (update-coding-systems-internal)
330 (detect-coding-region ,from ,to)) 331 (detect-coding-region ,from ,to))
331 ;; We must restore the internal database. 332 ;; We must restore the internal database.
332 (set-coding-priority coding-category-list) 333 (set-coding-priority coding-category-list)