* async.el (async-start): Use the possible true name of emacs executable.

diff --git a/async.el b/async.el
index 15966d2845abcfb0f5de1e56b7ac909d94313263..87fec2f81e139788dbc9c59eef1c743a2160bce5 100644 (file)
--- a/async.el
+++ b/async.el
@@ -262,8 +262,9 @@ returns nil.  It can still be useful, however, as an argument to
     `(let* ((sexp ,start-func)
             (,procvar
              (async-start-process
-              "emacs" (expand-file-name invocation-name
-                                        invocation-directory)
+              "emacs" (file-truename
+                       (expand-file-name invocation-name
+                                         invocation-directory))
               ,finish-func
               "-Q" "-l" ,(funcall (symbol-function 'find-library-name)
                                   "async")