# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 773886266 0
# Node ID b88934e6402151d5fb0077d8453ba52c2cea22a8
# Parent  4c58d2b235b71708337e660bd924e7cc6bbbf629
(compilation-window-height): Use defvar.
(compilation-leave-directory-regexp): Likewise.
(compilation-enter-directory-regexp): Likewise.

diff -r 4c58d2b235b7 -r b88934e64021 lisp/progmodes/compile.el
--- a/lisp/progmodes/compile.el	Mon Jul 11 00:23:33 1994 +0000
+++ b/lisp/progmodes/compile.el	Mon Jul 11 00:24:26 1994 +0000
@@ -34,7 +34,7 @@
   "*List of hook functions run by `compilation-mode' (see `run-hooks').")
 
 ;;;###autoload
-(defconst compilation-window-height nil
+(defvar compilation-window-height nil
   "*Number of lines in a compilation window.  If nil, use Emacs default.")
 
 (defvar compilation-error-list nil
@@ -208,14 +208,14 @@
 				    (concat \"make -k \"
 					    buffer-file-name))))))")
 
-(defconst compilation-enter-directory-regexp
+(defvar compilation-enter-directory-regexp
   ": Entering directory `\\(.*\\)'$"
   "Regular expression matching lines that indicate a new current directory.
 This must contain one \\(, \\) pair around the directory name.
 
 The default value matches lines printed by the `-w' option of GNU Make.")
 
-(defconst compilation-leave-directory-regexp
+(defvar compilation-leave-directory-regexp
   ": Leaving directory `\\(.*\\)'$"
   "Regular expression matching lines that indicate restoring current directory.
 This may contain one \\(, \\) pair around the name of the directory