File tree Expand file tree Collapse file tree 1 file changed +2
-5
lines changed Expand file tree Collapse file tree 1 file changed +2
-5
lines changed Original file line number Diff line number Diff line change @@ -207,8 +207,7 @@ If FILENAME is not a Tramp filename return FILENAME"
207207When completion process is not started on a remote location return FILE.
208208This 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)
You can’t perform that action at this time.
0 commit comments