(x_set_screen_gamma): Clear face cache.

diff --git a/src/frame.c b/src/frame.c
index c7ec3dda3b45ed120220d4188cb23277d1200db2..f2b7c514cf39da91bd3974de5912d20bc09de33f 100644 (file)
--- a/src/frame.c
+++ b/src/frame.c
@@ -3058,8 +3058,11 @@ x_set_screen_gamma (f, new_value, old_value)
   if (NILP (new_value))
     f->gamma = 0;
   else if (NUMBERP (new_value) && XFLOATINT (new_value) > 0)
-    /* The value 0.4545 is the normal viewing gamma.  */
-    f->gamma = 1.0 / (0.4545 * XFLOATINT (new_value));
+    {
+      Fclear_face_cache (Qnil);
+      /* The value 0.4545 is the normal viewing gamma.  */
+      f->gamma = 1.0 / (0.4545 * XFLOATINT (new_value));
+    }
   else
     signal_error ("Invalid screen-gamma", new_value);