/[emacs]/emacs/lisp/term/mac-win.el
ViewVC logotype

Diff of /emacs/lisp/term/mac-win.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.53 by mituharu, Sun Sep 18 05:40:06 2005 UTC revision 1.54 by mituharu, Sat Oct 1 11:07:39 2005 UTC
# Line 1132  correspoinding TextEncodingBase value." Line 1132  correspoinding TextEncodingBase value."
1132  (mac-add-charset-info "mac-symbol" 33)  (mac-add-charset-info "mac-symbol" 33)
1133  (mac-add-charset-info "adobe-fontspecific" 33) ; for X-Symbol  (mac-add-charset-info "adobe-fontspecific" 33) ; for X-Symbol
1134  (mac-add-charset-info "mac-dingbats" 34)  (mac-add-charset-info "mac-dingbats" 34)
1135    (mac-add-charset-info "iso10646-1" 126) ; for ATSUI
1136    
1137    
1138  ;;;; Keyboard layout/language change events  ;;;; Keyboard layout/language change events
# Line 1714  It returns a name of the created fontset Line 1715  It returns a name of the created fontset
1715    
1716  ;; Setup the default fontset.  ;; Setup the default fontset.
1717  (setup-default-fontset)  (setup-default-fontset)
1718  ;; Add Mac-encoding fonts unless ETL fonts are installed.  (cond ((x-list-fonts "*-iso10646-1")
1719  (unless (x-list-fonts "*-iso8859-1")         ;; Use ATSUI (if available) for the following charsets.
1720    (fontset-add-mac-fonts "fontset-default"))         (dolist
1721               (charset '(latin-iso8859-1
1722                          latin-iso8859-2 latin-iso8859-3 latin-iso8859-4
1723                          thai-tis620 greek-iso8859-7 arabic-iso8859-6
1724                          hebrew-iso8859-8 cyrillic-iso8859-5
1725                          latin-iso8859-9 latin-iso8859-15 latin-iso8859-14
1726                          japanese-jisx0212 chinese-sisheng ipa
1727                          vietnamese-viscii-lower vietnamese-viscii-upper
1728                          lao ethiopic tibetan))
1729             (set-fontset-font nil charset '(nil . "iso10646-1"))))
1730          ((null (x-list-fonts "*-iso8859-1"))
1731           ;; Add Mac-encoding fonts unless ETL fonts are installed.
1732           (fontset-add-mac-fonts "fontset-default")))
1733    
1734  ;; Create a fontset that uses mac-roman font.  With this fontset,  ;; Create a fontset that uses mac-roman font.  With this fontset,
1735  ;; characters decoded from mac-roman encoding (ascii, latin-iso8859-1,  ;; characters decoded from mac-roman encoding (ascii, latin-iso8859-1,

Legend:
Removed from v.1.53  
changed lines
  Added in v.1.54

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26