summaryrefslogtreecommitdiff
path: root/lisp/international/mule-cmds.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2010-08-31 16:49:21 +0900
committerKenichi Handa <handa@m17n.org>2010-08-31 16:49:21 +0900
commitd419e1d94e885388b86f8753d741befa1855d333 (patch)
treed907b7c8e384e459dbf027179d7710fba43837d0 /lisp/international/mule-cmds.el
parentb295da470123c7beea983f9b500db5286fd12996 (diff)
downloademacs-d419e1d94e885388b86f8753d741befa1855d333.tar.gz
Fix handling of 8-bit characters in a display table.
Diffstat (limited to 'lisp/international/mule-cmds.el')
-rw-r--r--lisp/international/mule-cmds.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 008a59531fc..871bab20013 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1953,7 +1953,7 @@ See `set-language-info-alist' for use in programs."
(> (aref (number-to-string (nth 2 (x-server-version))) 0)
?3))
;; Make non-line-break space display as a plain space.
- (aset standard-display-table 160 [32]))
+ (aset standard-display-table (unibyte-char-to-multibyte 160) [32]))
;; Most Windows programs send out apostrophes as \222. Most X fonts
;; don't contain a character at that position. Map it to the ASCII
;; apostrophe. [This is actually RIGHT SINGLE QUOTATION MARK,
@@ -1961,7 +1961,7 @@ See `set-language-info-alist' for use in programs."
;; fonts probably have the appropriate glyph at this position,
;; so they could use standard-display-8bit. It's better to use a
;; proper windows-1252 coding system. --fx]
- (aset standard-display-table 146 [39]))))
+ (aset standard-display-table (unibyte-char-to-multibyte 146) [39]))))
(defun set-language-environment-coding-systems (language-name)
"Do various coding system setups for language environment LANGUAGE-NAME."