Fixed hard link to emacs.exe in non-MSYS build.

diff --git a/lisp/loadup.el b/lisp/loadup.el
index 3970e514376f1e519209e9786da7b877a206db09..75659d88ac4bd77e7a6814dabc88336e8f422043 100644 (file)
--- a/lisp/loadup.el
+++ b/lisp/loadup.el
@@ -414,7 +414,12 @@
                                 (substring name (match-end 0)))))
            (setq name (concat name exe))
             (message "Adding name %s" name)
-           (add-name-to-file (concat "emacs" exe) name t)))
+           ;; When this runs on Windows, invocation-directory is not
+           ;; necessarily the current directory.
+           (add-name-to-file (expand-file-name (concat "emacs" exe)
+                                               invocation-directory)
+                             (expand-file-name name invocation-directory)
+                             t)))
       (kill-emacs)))
 
 ;; For machines with CANNOT_DUMP defined in config.h,