Function: tramp-sshfs-tolerate-tilde

tramp-sshfs-tolerate-tilde is a byte-compiled function defined in tramp-sshfs.el.gz.

Signature

(tramp-sshfs-tolerate-tilde ORIG-FUN)

Documentation

Advice for shell-mode to tolerate tilde in remote file names.

Source Code

;; Defined in /usr/src/emacs/lisp/net/tramp-sshfs.el.gz
;; `shell-mode' tries to open remote files like "/sshfs:user@host:~/.history".
;; This fails, because the tilde cannot be expanded.  Tell
;; `tramp-handle-expand-file-name' to tolerate this.
(defun tramp-sshfs-tolerate-tilde (orig-fun)
  "Advice for `shell-mode' to tolerate tilde in remote file names."
  (let ((tramp-tolerate-tilde
	 (or tramp-tolerate-tilde
	     (equal (file-remote-p default-directory 'method)
		    tramp-sshfs-method))))
    (funcall orig-fun)))