From 50aac8891209d63b5793289715026655175b2139 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Tue, 16 Apr 2013 19:55:02 +0300 Subject: [PATCH] Fixed hard link to emacs.exe in non-MSYS build. --- lisp/loadup.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/loadup.el b/lisp/loadup.el index 3970e514376..75659d88ac4 100644 --- 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, -- 2.39.2