# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 896121430 0
# Node ID d065677598093e093dc11ae6e1fdc8af699b65e8
# Parent  96217e8a9b7f32b9ae23edb95eb37d4e1e55d6bb
(frame-update-face-colors): Call frame-set-background-mode.

diff -r 96217e8a9b7f -r d06567759809 lisp/faces.el
--- a/lisp/faces.el	Mon May 25 16:45:33 1998 +0000
+++ b/lisp/faces.el	Mon May 25 18:37:10 1998 +0000
@@ -1474,6 +1474,7 @@
 ;; This applies only to faces with global color specifications
 ;; that are not simple constants.
 (defun frame-update-face-colors (frame)
+  (frame-set-background-mode frame)
   (let ((faces global-face-data))
     (while faces
       (condition-case nil