10 lines
353 B
EmacsLisp
10 lines
353 B
EmacsLisp
|
;;; Reported upstream, see #39596.
|
||
|
(defun ambrevar/set-inside-emacs ()
|
||
|
"Export INSIDE_EMACS just like M-x shell does.
|
||
|
This is useful for programs like Guix that take provisions for Emacs."
|
||
|
(setenv "INSIDE_EMACS" (format "%s;%s" emacs-version "eshell")))
|
||
|
|
||
|
(add-hook 'eshell-mode-hook 'ambrevar/set-inside-emacs)
|
||
|
|
||
|
(provide 'patch-eshell-inside-emacs)
|