diff options
author | Andreas Schwab <schwab@suse.de> | 2005-11-19 21:09:10 +0000 |
---|---|---|
committer | Andreas Schwab <schwab@suse.de> | 2005-11-19 21:09:10 +0000 |
commit | dc9d3a05c7a4983554fb029086c020e971f10499 (patch) | |
tree | 3613c4422ad271d2cc793e3040a036f829289be5 /lisp/international/mule-cmds.el | |
parent | c613b39cea7e035c55fed86b52e4a49622744982 (diff) | |
download | emacs-dc9d3a05c7a4983554fb029086c020e971f10499.tar.gz |
Revert last change.
Diffstat (limited to 'lisp/international/mule-cmds.el')
-rw-r--r-- | lisp/international/mule-cmds.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 88ccd88df38..c84a66bcd63 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -1883,10 +1883,8 @@ specifies the character set for the major languages of Western Europe." (while list (with-current-buffer (car list) (set-case-table (standard-case-table))) - (setq list (cdr list))))))) - ;; Always call this so that the display table is correctly set up for - ;; unibyte buffers. - (set-display-table-and-terminal-coding-system language-name) + (setq list (cdr list)))))) + (set-display-table-and-terminal-coding-system language-name)) (let ((required-features (get-language-info language-name 'features))) (while required-features |