Re: no executable emacs binary in exec-directory

[Stefan Monnier]

>> (defun ourcomments-find-emacs-executable ()
>> (let ((exec-path (list invocation-directory)))
>> (executable-find invocation-name)))

> Hm, this looks better, but I wonder about the "1".

> (defun ourcomments-find-emacs ()
>   (locate-file invocation-name
>                (list invocation-directory)
>                exec-suffixes
>                1 ;; Depreceated, but used in executable-find
>                ))

Why does it look better to you?


        Stefan