From c20d5073510b8993ecb631d2b6c0bec987480cf1 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 20 Jun 2000 11:33:24 +0000 Subject: [PATCH] (frame-background-mode): Use set-default, not set, in setter. (frame-update-faces, frame-update-face-colors): Define with defalias. --- lisp/faces.el | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/lisp/faces.el b/lisp/faces.el index 914f2c177af..170b0849b7e 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -1272,7 +1272,7 @@ your background is light, or nil (default) if you want Emacs to examine the brightness for you." :group 'faces :set #'(lambda (var value) - (set var value) + (set-default var value) (mapcar 'frame-set-background-mode (frame-list))) :initialize 'custom-initialize-changed :type '(choice (choice-item dark) @@ -1469,15 +1469,13 @@ created." ;; Update a frame's faces when we change its default font. -(defun frame-update-faces (frame) - nil) +(defalias 'frame-update-faces 'ignore) (make-obsolete 'frame-update-faces "No longer necessary" "21.1") ;; Update the colors of FACE, after FRAME's own colors have been ;; changed. -(defun frame-update-face-colors (frame) - (frame-set-background-mode frame)) +(defalias 'frame-update-face-colors 'frame-set-background-mode) (make-obsolete 'frame-update-face-colors 'frame-set-background-mode "21.1") -- 2.39.2