Re: `eshell-under-cygwin-p' etc. inappropriate?

[Eli Zaretskii]

> From: Tak Ota <address@hidden>
> Date: Thu, 08 Aug 2002 10:23:16 -0700 (PDT)
> 
> 07 Aug 2002 06:06:12 +0100: John Paul Wallington <address@hidden> wrote:
> 
> > Maybe `eshell-under-cygwin-p' should be called something else?
> 
> I use the following function for my own use.
> 
> (defun cygwin-exists-p ()
>   "Search cygwin1.dll in the exec-path and return the full path if it exists 
> or nil otherwise."
>   (catch 'exists
>     (let ((path-list exec-path))
>       (while path-list
>       (let ((full-path (expand-file-name "cygwin1.dll" (car path-list))))
>         (if (file-exists-p full-path)
>             (throw 'exists full-path))
>         (setq path-list (cdr path-list)))))))

I think this might be dangerous: a user could have some Cygwin tools
installed, but she could still be using a natively-co9mpiled Emacs.

In other words, the mere fact of cygwin.dll's existence does not
necessarily mean that this Emacs is a Cygwin binary.