(window_size_fixed): New variable.

(syms_of_window): Add a DEFVAR_BOOL for window-size-fixed, for
the doc string.

2 files changed, 17 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index affd55502de..f3f088a9b28 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,9 @@
 2001-01-18  Gerd Moellmann  <gerd@gnu.org>
 
+        * window.c (window_size_fixed): New variable.
+        (syms_of_window): Add a DEFVAR_BOOL for window-size-fixed, for
+        the doc string.
+
         * eval.c (specbind): If binding a per-buffer variable which
         doesn't have a buffer-local value in the current buffer, change
         the global value by changing the value of the symbol bound in all
diff --git a/src/window.c b/src/window.c
index baa55a53969..fe899c84265 100644
--- a/src/window.c
+++ b/src/window.c
@@ -1,6 +1,6 @@
 /* Window creation, deletion and examination for GNU Emacs.
    Does not include redisplay.
-   Copyright (C) 1985,86,87,93,94,95,96,97,1998,2000
+   Copyright (C) 1985,86,87,93,94,95,96,97,1998,2000, 2001
    Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
@@ -82,6 +82,10 @@ static int foreach_window_1 P_ ((struct window *,
                                  void *));
 static Lisp_Object window_list_1 P_ ((Lisp_Object, Lisp_Object, Lisp_Object));
 
+/* The value of `window-size-fixed'.  */
+
+int window_size_fixed;
+
 /* This is the window in which the terminal's cursor should
    be left when nothing is being done with it.  This must
    always be a leaf window, and its buffer is selected by
@@ -5806,6 +5810,14 @@ If there is only one window, it is split regardless of this value.");
 The selected frame is the one whose configuration has changed.");
   Vwindow_configuration_change_hook = Qnil;
 
+  DEFVAR_BOOL ("window-size-fixed", &window_size_fixed,
+    "Non-nil in a buffer means windows displaying the buffer are fixed-size.\n\
+Emacs won't change the size of any window displaying that buffer,\n\
+unless you explicitly change the size, or Emacs has no other choice.\n\
+This variable automatically becomes buffer-local when set.");
+  Fmake_variable_buffer_local (Qwindow_size_fixed);
+  window_size_fixed = 0;
+
   defsubr (&Sselected_window);
   defsubr (&Sminibuffer_window);
   defsubr (&Swindow_minibuffer_p);