[Emacs-diffs] Changes to emacs/src/window.c

[Kim F. Storm]

Index: emacs/src/window.c
diff -c emacs/src/window.c:1.400 emacs/src/window.c:1.401
*** emacs/src/window.c:1.400    Mon Jan 21 03:53:42 2002
--- emacs/src/window.c  Mon Feb 11 09:42:16 2002
***************
*** 133,138 ****
--- 133,145 ----
  
  Lisp_Object Vtemp_buffer_show_function;
  
+ /* Nil means to use mode-line face in all windows.
+    t means to use mode-line-inactive face in all windows but the
+    selected-window and the minibuffer-scroll-window.
+    Any other value means to use mode-line-inactive face in all
+    non-selected windows (including minibuffer-scroll-window.  */
+ Lisp_Object Vmode_line_in_non_selected_windows;
+ 
  /* If a window gets smaller than either of these, it is removed. */
  
  int window_min_height;
***************
*** 5795,5800 ****
--- 5802,5813 ----
    DEFVAR_LISP ("minibuffer-scroll-window", &Vminibuf_scroll_window,
               doc: /* Non-nil means it is the window that C-M-v in minibuffer 
should scroll.  */);
    Vminibuf_scroll_window = Qnil;
+ 
+   DEFVAR_LISP ("mode-line-in-non-selected-windows", 
&Vmode_line_in_non_selected_windows,
+              doc: /* Non-nil means to use `mode-line-inactive' face in 
non-selected windows.
+ However, if value is t, the current `minibuffer-scroll-window' still
+ uses the `mode-line' face when minibuffer is active.  */);
+   Vmode_line_in_non_selected_windows = Qt;
  
    DEFVAR_LISP ("other-window-scroll-buffer", &Vother_window_scroll_buffer,
               doc: /* If non-nil, this is a buffer and \\[scroll-other-window] 
should scroll its window.  */);