/[emacs]/emacs/lisp/faces.el
ViewVC logotype

Diff of /emacs/lisp/faces.el

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

revision 1.240.2.2 by jasonr, Fri Jan 25 23:54:37 2002 UTC revision 1.240.2.3 by eliz, Thu May 16 15:48:32 2002 UTC
# Line 66  a font height that isn't optimal." Line 66  a font height that isn't optimal."
66    '(("courier" "fixed")    '(("courier" "fixed")
67      ("helv" "helvetica" "arial" "fixed"))      ("helv" "helvetica" "arial" "fixed"))
68    "*Alist of alternative font family names.    "*Alist of alternative font family names.
69  Each element has the the form (FAMILY ALTERNATIVE1 ALTERNATIVE2 ...).  Each element has the form (FAMILY ALTERNATIVE1 ALTERNATIVE2 ...).
70  If fonts of family FAMILY can't be loaded, try ALTERNATIVE1, then  If fonts of family FAMILY can't be loaded, try ALTERNATIVE1, then
71  ALTERNATIVE2 etc."  ALTERNATIVE2 etc."
72    :tag "Alternative font families to try."    :tag "Alternative font families to try."
# Line 90  ALTERNATIVE2 etc." Line 90  ALTERNATIVE2 etc."
90        ("ksc5601.1989" "ksx1001.1992" "ksc5601.1987")        ("ksc5601.1989" "ksx1001.1992" "ksc5601.1987")
91        ("muletibetan-2" "muletibetan-0")))        ("muletibetan-2" "muletibetan-0")))
92    "*Alist of alternative font registry names.    "*Alist of alternative font registry names.
93  Each element has the the form (REGISTRY ALTERNATIVE1 ALTERNATIVE2 ...).  Each element has the form (REGISTRY ALTERNATIVE1 ALTERNATIVE2 ...).
94  If fonts of registry REGISTRY can be loaded, font selection  If fonts of registry REGISTRY can be loaded, font selection
95  tries to find a best matching font among all fonts of registry  tries to find a best matching font among all fonts of registry
96  REGISTRY, ALTERNATIVE1, ALTERNATIVE2, and etc."  REGISTRY, ALTERNATIVE1, ALTERNATIVE2, and etc."
# Line 303  If FRAME is omitted or nil, use the sele Line 303  If FRAME is omitted or nil, use the sele
303    "*List of X resources and classes for face attributes.    "*List of X resources and classes for face attributes.
304  Each element has the form (ATTRIBUTE ENTRY1 ENTRY2...) where ATTRIBUTE is  Each element has the form (ATTRIBUTE ENTRY1 ENTRY2...) where ATTRIBUTE is
305  the name of a face attribute, and each ENTRY is a cons of the form  the name of a face attribute, and each ENTRY is a cons of the form
306  (RESOURCE . CLASS) with RESOURCE being the resource and CLASS being the  \(RESOURCE . CLASS) with RESOURCE being the resource and CLASS being the
307  X resource class for the attribute."  X resource class for the attribute."
308    :type '(repeat (cons symbol (repeat (cons string string))))    :type '(repeat (cons symbol (repeat (cons string string))))
309    :group 'faces)    :group 'faces)
# Line 634  Argument NOERROR is ignored and retained Line 634  Argument NOERROR is ignored and retained
634  FRAME nil or not specified means change face on all frames.  FRAME nil or not specified means change face on all frames.
635  Argument NOERROR is ignored and retained for compatibility.  Argument NOERROR is ignored and retained for compatibility.
636  Use `set-face-attribute' for finer control of font weight and slant."  Use `set-face-attribute' for finer control of font weight and slant."
637    (interactive (list (read-face-name "Make which face bold-italic: ")))    (interactive (list (read-face-name "Make which face bold-italic ")))
638    (set-face-attribute face frame :weight 'bold :slant 'italic))    (set-face-attribute face frame :weight 'bold :slant 'italic))
639    
640    
# Line 1044  The sample text is a string that comes f Line 1044  The sample text is a string that comes f
1044             "Use "             "Use "
1045             (if (display-mouse-p) "\\[help-follow-mouse] or ")             (if (display-mouse-p) "\\[help-follow-mouse] or ")
1046             "\\[help-follow] on a face name to customize it\n"             "\\[help-follow] on a face name to customize it\n"
1047             "or on its sample text for a decription of the face.\n\n")))             "or on its sample text for a description of the face.\n\n")))
1048          (setq help-xref-stack nil)          (setq help-xref-stack nil)
1049          (while faces          (while faces
1050            (setq face (car faces))            (setq face (car faces))

Legend:
Removed from v.1.240.2.2  
changed lines
  Added in v.1.240.2.3

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