diff --git a/src/xfaces.c b/src/xfaces.c
index d211ec8c46..10cfa50526 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -4207,6 +4207,11 @@ two lists of the form (RED GREEN BLUE) aforementioned. */)
   struct frame *f = decode_live_frame (frame);
   Emacs_Color cdef1, cdef2;
 
+  fprintf (stderr,
+           "Initial: %d, hook: %p",
+           FRAME_INITIAL_P (f),
+           FRAME_TERMINAL (f)->defined_color_hook);
+
   if (!(CONSP (color1) && parse_rgb_list (color1, &cdef1))
       && !(STRINGP (color1)
            && FRAME_TERMINAL (f)->defined_color_hook (f,