Mercurial > emacs
changeset 2388:3f27c886f375
(try-face-font, find-face, get-face): New aliases.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 27 Mar 1993 18:01:28 +0000 |
| parents | cb44857cab89 |
| children | 6048be0eedcd |
| files | lisp/emacs-lisp/lucid.el |
| diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lucid.el Sat Mar 27 08:21:02 1993 +0000 +++ b/lisp/emacs-lisp/lucid.el Sat Mar 27 18:01:28 1993 +0000 @@ -98,6 +98,10 @@ (switch-to-buffer (if (<= arg 1) (other-buffer (current-buffer)) (nth (1+ arg) (buffer-list))))) + +(fset 'find-face 'internal-find-face) +(fset 'get-face 'internal-get-face) +(fset 'try-face-font 'internal-try-face-font) ;; Support the Lucid names with `screen' instead of `frame'.