diff options
| author | Michael Albinus <michael.albinus@gmx.de> | 2021-10-09 18:42:11 +0200 |
|---|---|---|
| committer | Michael Albinus <michael.albinus@gmx.de> | 2021-10-09 18:42:11 +0200 |
| commit | 75d9fbec8853c2040bbb0d5a447894cca86b9df9 (patch) | |
| tree | abb55c0a6bad8f70ec6b77e2e2d107a822a1ae6b /lisp/net/tramp-sshfs.el | |
| parent | 394209c1a012ec0d24cbef031101c82a79ceea83 (diff) | |
| download | emacs-75d9fbec8853c2040bbb0d5a447894cca86b9df9.tar.gz emacs-75d9fbec8853c2040bbb0d5a447894cca86b9df9.tar.bz2 emacs-75d9fbec8853c2040bbb0d5a447894cca86b9df9.zip | |
Tramp code cleanup
* lisp/net/tramp.el (tramp-remote-path): Adapt docstring.
(tramp-action-login, tramp-action-password, tramp-action-yesno)
(tramp-action-yn, tramp-process-actions): Move let-binding of
`enable-recursive-minibuffers' up.
(tramp-handle-make-process, tramp-handle-write-region):
* lisp/net/tramp-adb.el (tramp-adb-handle-write-region)
(tramp-adb-handle-make-process):
* lisp/net/tramp-sh.el (tramp-sh-handle-make-process)
(tramp-sh-handle-write-region):
* lisp/net/tramp-smb.el (tramp-smb-handle-write-region):
* lisp/net/tramp-sshfs.el (tramp-sshfs-handle-write-region):
Use `string-or-null-p'.
Diffstat (limited to 'lisp/net/tramp-sshfs.el')
| -rw-r--r-- | lisp/net/tramp-sshfs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/tramp-sshfs.el b/lisp/net/tramp-sshfs.el index 1bd4c5dc1c8..a1007863453 100644 --- a/lisp/net/tramp-sshfs.el +++ b/lisp/net/tramp-sshfs.el @@ -320,7 +320,7 @@ arguments to pass to the OPERATION." ;; The end. (when (and (null noninteractive) - (or (eq visit t) (null visit) (stringp visit))) + (or (eq visit t) (string-or-null-p visit))) (tramp-message v 0 "Wrote %s" filename)) (run-hooks 'tramp-handle-write-region-hook)))) |