Mercurial > emacs

changeset 49250:6c62487c3c29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Setup the fontset "fontset-mac" correctly.
author Kenichi Handa <handa@m17n.org>
date Wed, 15 Jan 2003 05:32:56 +0000
parents 7c4bc41333d1
children afbb682b9aa5
files lisp/term/mac-win.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term/mac-win.el	Tue Jan 14 23:58:13 2003 +0000
+++ b/lisp/term/mac-win.el	Wed Jan 15 05:32:56 2003 +0000
@@ -205,10 +205,10 @@
 	 (function
 	  (lambda (key val)
 	    (or (generic-char-p key)
-		(memq (char-charset key)
+		(memq (char-charset val)
 		      '(ascii eight-bit-control eight-bit-graphic))
-		(set-fontset-font "fontset-mac" key monaco-font))))
-	 (get 'mac-roman-encoder 'translation-table)))))
+		(set-fontset-font "fontset-mac" val monaco-font))))
+	 (get 'mac-roman-decoder 'translation-table)))))
 
 (if (eq system-type 'darwin)
     ;; On Darwin filenames are encoded in UTF-8