emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] Changes to emacs/lisp/international/fontset.el


From: Juanma Barranquero
Subject: [Emacs-diffs] Changes to emacs/lisp/international/fontset.el
Date: Tue, 04 Feb 2003 08:09:39 -0500

Index: emacs/lisp/international/fontset.el
diff -c emacs/lisp/international/fontset.el:1.55 
emacs/lisp/international/fontset.el:1.56
*** emacs/lisp/international/fontset.el:1.55    Fri Jan 17 03:13:39 2003
--- emacs/lisp/international/fontset.el Tue Feb  4 08:09:38 2003
***************
*** 432,438 ****
                (or (assq charset fontlist)
                    (setq fontlist
                          (cons (cons charset ascii-font-spec) fontlist))))))))
!     
      fontlist))
  
  (defun fontset-name-p (fontset)
--- 432,438 ----
                (or (assq charset fontlist)
                    (setq fontlist
                          (cons (cons charset ascii-font-spec) fontlist))))))))
! 
      fontlist))
  
  (defun fontset-name-p (fontset)
***************
*** 510,516 ****
        (name (match-string 0 fontset-spec))
        xlfd-fields charset fontlist ascii-font)
      (if (query-fontset name)
!       (or noerror 
            (error "Fontset \"%s\" already exists" name))
        (setq xlfd-fields (x-decompose-font-name name))
        (or xlfd-fields
--- 510,516 ----
        (name (match-string 0 fontset-spec))
        xlfd-fields charset fontlist ascii-font)
      (if (query-fontset name)
!       (or noerror
            (error "Fontset \"%s\" already exists" name))
        (setq xlfd-fields (x-decompose-font-name name))
        (or xlfd-fields




reply via email to

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