changeset 29769:18a16ab69699

(frame-background-mode): Use set-default, not set, in setter. (frame-update-faces, frame-update-face-colors): Define with defalias.
author Dave Love <fx@gnu.org>
date Tue, 20 Jun 2000 11:33:24 +0000
parents 6f3f0ca4a359
children ed7a602dec2b
files lisp/faces.el
diffstat 1 files changed, 3 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Tue Jun 20 11:23:13 2000 +0000
+++ b/lisp/faces.el	Tue Jun 20 11:33:24 2000 +0000
@@ -1272,7 +1272,7 @@
 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 @@
 
 ;; 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")