Re: INSIDE_EMACS and Tramp

[Stefan Monnier]

> +(defvar inside-emacs-functions nil
[...]
> +(defun inside-emacs (&optional context)
> +  "Return the string to be set in environment variable INSIDE_EMACS.
> +CONTEXT could be a string which is added."
> +  (mapconcat
> +   #'identity
> +   (delq nil (append `(,emacs-version
> +                    ,(and (stringp context) context))
> +                  (mapcar #'funcall inside-emacs-functions)))
> +   ","))

Any chance we could live without `inside-emacs-functions` and instead do:

    (defun inside-emacs (&optional context)
      "Return the string to be set in environment variable INSIDE_EMACS.
    CONTEXT could be a string which is added."
      (let ((base (or (getenv "INSIDE_EMACS") emacs-version)))
        (if context (concat case "," context) base)))


-- Stefan