summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/lucid.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/lucid.el')
-rw-r--r--lisp/emacs-lisp/lucid.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/lucid.el b/lisp/emacs-lisp/lucid.el
index 9e61577c970..d1b541d34b9 100644
--- a/lisp/emacs-lisp/lucid.el
+++ b/lisp/emacs-lisp/lucid.el
@@ -98,6 +98,10 @@ bottom of the buffer stack."
(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'.