diff options
Diffstat (limited to 'lisp/vc/vc-git.el')
| -rw-r--r-- | lisp/vc/vc-git.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el index e6fe0196d8..43a831f159 100644 --- a/lisp/vc/vc-git.el +++ b/lisp/vc/vc-git.el @@ -705,7 +705,12 @@ It is based on `log-edit-mode', and has Git-specific extensions.") ;; arguments must be in the system codepage, and therefore ;; might not support the non-ASCII characters in the log ;; message. - (if (eq system-type 'windows-nt) (make-temp-file "git-msg")))) + (if (eq system-type 'windows-nt) + (if (file-remote-p file1) + (let ((default-directory (file-name-directory file1))) + (file-remote-p + (make-nearby-temp-file "git-msg") 'localname)) + (make-temp-file "git-msg"))))) (cl-flet ((boolean-arg-fn (argument) (lambda (value) (when (equal value "yes") (list argument))))) |