Skip to content

Commit 29d1c08

Browse files
Don't use internal tramp-make-tramp-file-name
The signature of `tramp-make-tramp-filename` changed in Emacs 26.
1 parent fad843b commit 29d1c08

File tree

1 file changed

+2
-5
lines changed

1 file changed

+2
-5
lines changed

fsharp-mode-completion.el

Lines changed: 2 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -207,8 +207,7 @@ If FILENAME is not a Tramp filename return FILENAME"
207207
When completion process is not started on a remote location return FILE.
208208
This function should always be evaluated in the process-buffer!"
209209
(if (tramp-tramp-file-p default-directory)
210-
(with-parsed-tramp-file-name default-directory nil
211-
(tramp-make-tramp-file-name method user host file))
210+
(concat (file-remote-p default-directory) file)
212211
file))
213212

214213
;;; ----------------------------------------------------------------------------
@@ -337,9 +336,7 @@ If HOST is nil, check process on local system."
337336

338337
(defun fsharp-ac--configure-proc ()
339338
(let* ((fsac (if (tramp-tramp-file-p default-directory)
340-
(with-parsed-tramp-file-name default-directory nil
341-
(tramp-make-tramp-file-name
342-
method user host (car (last fsharp-ac-complete-command))))
339+
(concat (file-remote-p default-directory) (car (last fsharp-ac-complete-command)))
343340
(car (last fsharp-ac-complete-command))))
344341
(process-environment
345342
(if (null fsharp-ac-using-mono)

0 commit comments

Comments
 (0)