emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/term/mac-win.el


From: YAMAMOTO Mitsuharu
Subject: [Emacs-diffs] Changes to emacs/lisp/term/mac-win.el
Date: Tue, 05 Apr 2005 22:15:30 -0400

Index: emacs/lisp/term/mac-win.el
diff -c emacs/lisp/term/mac-win.el:1.35 emacs/lisp/term/mac-win.el:1.36
*** emacs/lisp/term/mac-win.el:1.35     Wed Mar 16 03:23:34 2005
--- emacs/lisp/term/mac-win.el  Wed Apr  6 02:15:29 2005
***************
*** 1577,1583 ****
          (new-fontset font (x-complement-fontset-spec xlfd-fields nil))
        ;; Create a fontset from FONT.  The fontset name is
        ;; generated from FONT.
!       (create-fontset-from-ascii-font font resolved-name "startup"))))
  
  ;; Apply a geometry resource to the initial frame.  Put it at the end
  ;; of the alist, so that anything specified on the command line takes
--- 1577,1586 ----
          (new-fontset font (x-complement-fontset-spec xlfd-fields nil))
        ;; Create a fontset from FONT.  The fontset name is
        ;; generated from FONT.
!       (if (and (string= "mac" (aref xlfd-fields xlfd-regexp-registry-subnum))
!                (string= "roman" (aref xlfd-fields 
xlfd-regexp-encoding-subnum)))
!           (create-fontset-from-mac-roman-font font resolved-name "startup")
!         (create-fontset-from-ascii-font font resolved-name "startup")))))
  
  ;; Apply a geometry resource to the initial frame.  Put it at the end
  ;; of the alist, so that anything specified on the command line takes



reply via email to

[Prev in Thread] Current Thread [Next in Thread]