diff options
| author | Kenichi Handa | 2005-03-26 02:06:50 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2005-03-26 02:06:50 +0000 |
| commit | d49a52e4ddb0a000ccab45d7d6ef1f803bcda808 (patch) | |
| tree | 25c69afc93d3ddf2b9e51cbd7838c8b2e639c719 | |
| parent | 835da4eea0715bacbc02877703256c889218b711 (diff) | |
| download | emacs-d49a52e4ddb0a000ccab45d7d6ef1f803bcda808.tar.gz emacs-d49a52e4ddb0a000ccab45d7d6ef1f803bcda808.zip | |
(detect-coding-with-priority): Call
update-coding-systems-internal before detect-coding-region.
| -rw-r--r-- | lisp/international/mule-util.el | 1 |
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) |