diff options
| author | Paul Eggert | 2016-04-08 13:39:17 -0700 |
|---|---|---|
| committer | Paul Eggert | 2016-04-08 13:40:01 -0700 |
| commit | a1f221bd82eb4393ccba83a361b435a4992b532a (patch) | |
| tree | 638526b67bc8bfc6b516465e56e65a6615b72790 /lisp | |
| parent | 5c288909b96452ed5d01befc8b624e94511620ed (diff) | |
| download | emacs-a1f221bd82eb4393ccba83a361b435a4992b532a.tar.gz emacs-a1f221bd82eb4393ccba83a361b435a4992b532a.zip | |
Comint and compile no longer set EMACS
This mostly restores the change that I reverted on March 23,
fixing most of Bug#20202. The only part of the change that is
still reverted is the change to M-x term, where compatibility with
current Bash constrains us from moving too quickly (Bug#20484).
Problem reported by Phillip Lord in: http://bugs.gnu.org/20484#108
* etc/NEWS: Document this.
* lisp/comint.el (comint-exec-1):
* lisp/net/tramp-sh.el (tramp-remote-process-environment):
* lisp/progmodes/compile.el (compilation-start):
Don’t set EMACS=t in the subsidiary process.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/comint.el | 7 | ||||
| -rw-r--r-- | lisp/net/tramp-sh.el | 1 | ||||
| -rw-r--r-- | lisp/progmodes/compile.el | 8 |
3 files changed, 0 insertions, 16 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index cb79c175f0e..dcd4a5ae4cf 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -816,13 +816,6 @@ series of processes in the same Comint buffer. The hook | |||
| 816 | (format "COLUMNS=%d" (window-width))) | 816 | (format "COLUMNS=%d" (window-width))) |
| 817 | (list "TERM=emacs" | 817 | (list "TERM=emacs" |
| 818 | (format "TERMCAP=emacs:co#%d:tc=unknown:" (window-width)))) | 818 | (format "TERMCAP=emacs:co#%d:tc=unknown:" (window-width)))) |
| 819 | |||
| 820 | ;; This hack is for backward compatibility with Bash 4.3 and | ||
| 821 | ;; earlier. It can break common uses of 'configure', so | ||
| 822 | ;; remove it once Bash 4.4 or later is common. | ||
| 823 | (unless (getenv "EMACS") | ||
| 824 | (list "EMACS=t")) | ||
| 825 | |||
| 826 | (list (format "INSIDE_EMACS=%s,comint" emacs-version)) | 819 | (list (format "INSIDE_EMACS=%s,comint" emacs-version)) |
| 827 | process-environment)) | 820 | process-environment)) |
| 828 | (default-directory | 821 | (default-directory |
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el index 79ff1bea4c2..4d529f7aa32 100644 --- a/lisp/net/tramp-sh.el +++ b/lisp/net/tramp-sh.el | |||
| @@ -520,7 +520,6 @@ as given in your `~/.profile'." | |||
| 520 | (defcustom tramp-remote-process-environment | 520 | (defcustom tramp-remote-process-environment |
| 521 | `("TMOUT=0" "LC_CTYPE=''" | 521 | `("TMOUT=0" "LC_CTYPE=''" |
| 522 | ,(format "TERM=%s" tramp-terminal-type) | 522 | ,(format "TERM=%s" tramp-terminal-type) |
| 523 | "EMACS=t" ;; Deprecated; remove this line once Bash 4.4-or-later is common. | ||
| 524 | ,(format "INSIDE_EMACS='%s,tramp:%s'" emacs-version tramp-version) | 523 | ,(format "INSIDE_EMACS='%s,tramp:%s'" emacs-version tramp-version) |
| 525 | "CDPATH=" "HISTORY=" "MAIL=" "MAILCHECK=" "MAILPATH=" "PAGER=cat" | 524 | "CDPATH=" "HISTORY=" "MAIL=" "MAILCHECK=" "MAILPATH=" "PAGER=cat" |
| 526 | "autocorrect=" "correct=") | 525 | "autocorrect=" "correct=") |
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el index 0b15a283090..b7ab408f744 100644 --- a/lisp/progmodes/compile.el +++ b/lisp/progmodes/compile.el | |||
| @@ -1702,14 +1702,6 @@ Returns the compilation buffer created." | |||
| 1702 | (list "TERM=emacs" | 1702 | (list "TERM=emacs" |
| 1703 | (format "TERMCAP=emacs:co#%d:tc=unknown:" | 1703 | (format "TERMCAP=emacs:co#%d:tc=unknown:" |
| 1704 | (window-width)))) | 1704 | (window-width)))) |
| 1705 | |||
| 1706 | ;; Set the EMACS variable, but | ||
| 1707 | ;; don't override users' setting of $EMACS. | ||
| 1708 | ;; Remove this hack once Bash 4.4-or-later is common, | ||
| 1709 | ;; since it can break 'configure'. | ||
| 1710 | (unless (getenv "EMACS") | ||
| 1711 | (list "EMACS=t")) | ||
| 1712 | |||
| 1713 | (list (format "INSIDE_EMACS=%s,compile" emacs-version)) | 1705 | (list (format "INSIDE_EMACS=%s,compile" emacs-version)) |
| 1714 | (copy-sequence process-environment)))) | 1706 | (copy-sequence process-environment)))) |
| 1715 | (set (make-local-variable 'compilation-arguments) | 1707 | (set (make-local-variable 'compilation-arguments) |