diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2009-01-10 12:55:24 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2009-01-10 12:55:24 +0000 |
| commit | 311a84c06b6ebca702475d69fba0406127b98e55 (patch) | |
| tree | 32d08642575be1071f5f29f78b3e33321311165a /lisp | |
| parent | a933c4f76735b853e9e1a59b9202d1a7c4415541 (diff) | |
| download | emacs-311a84c06b6ebca702475d69fba0406127b98e55.tar.gz emacs-311a84c06b6ebca702475d69fba0406127b98e55.tar.bz2 emacs-311a84c06b6ebca702475d69fba0406127b98e55.zip | |
(x-font-family-list): Remove entirely.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/faces.el | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 4c98423a8a1..bbc7d32e3ac 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -2681,18 +2681,6 @@ If that can't be done, return nil." (internal-frob-font-slant font "i"))) (make-obsolete 'x-make-font-bold-italic 'make-face-bold-italic "21.1") -(defun x-font-family-list (&optional frame) - "Return a list of available font families on FRAME. -If FRAME is omitted or nil, use the selected frame. -Value is a list of conses (FAMILY . FIXED-P) where FAMILY -is a font family, and FIXED-P is non-nil if fonts of that family -are fixed-pitch." - (if (fboundp 'font-family-list) - (mapcar (lambda (family) (cons family nil)) - (font-family-list)) - '(("default" . t)))) -(make-obsolete 'x-font-family-list 'font-family-list "23.1") - (provide 'faces) ;; arch-tag: 19a4759f-2963-445f-b004-425b9aadd7d6 |