2003-07-28 Tak Ota <Takaaki.Ota@am.sony.com> (tiny change)
* progmodes/compile.el (compilation-environment): New user variable. (compile-internal): Respect it.
This commit is contained in:
parent
17e6d49143
commit
c20f961b23
2 changed files with 12 additions and 0 deletions
|
@ -1,3 +1,8 @@
|
|||
2003-07-28 Tak Ota <Takaaki.Ota@am.sony.com> (tiny change)
|
||||
|
||||
* progmodes/compile.el (compilation-environment): New user variable.
|
||||
(compile-internal): Respect it.
|
||||
|
||||
2003-07-23 Masatake YAMATO <jet@gyve.org>
|
||||
|
||||
* progmodes/gud.el (gdb-script-font-lock-keywords):
|
||||
|
|
|
@ -593,6 +593,12 @@ This should be a function of three arguments: process status, exit status,
|
|||
and exit message; it returns a cons (MESSAGE . MODELINE) of the strings to
|
||||
write into the compilation buffer, and to put in its mode line.")
|
||||
|
||||
(defvar compilation-environment nil
|
||||
"*List of environment variables for compilation to inherit.
|
||||
Each element should be a string of the form ENVVARNAME=VALUE.
|
||||
This list is temporarily prepended to `process-environment' prior to
|
||||
starting the compilation process.")
|
||||
|
||||
;; History of compile commands.
|
||||
(defvar compile-history nil)
|
||||
;; History of grep commands.
|
||||
|
@ -1090,6 +1096,7 @@ Returns the compilation buffer created."
|
|||
(if (not no-async)
|
||||
(let* ((process-environment
|
||||
(append
|
||||
compilation-environment
|
||||
(if (and (boundp 'system-uses-terminfo)
|
||||
system-uses-terminfo)
|
||||
(list "TERM=dumb" "TERMCAP="
|
||||
|
|
Loading…
Add table
Reference in a new issue