Tramp cleanup
* lisp/net/tramp-compat.el (tramp-compat-temporary-file-directory): Adapt docstring.
This commit is contained in:
@@ -52,6 +52,7 @@ SYNTAX can be one of the symbols `default' (default),
|
||||
(when syntax
|
||||
(customize-set-variable 'tramp-syntax syntax)))
|
||||
|
||||
;; Use `match-buffers' starting with Emacs 29.1.
|
||||
;;;###tramp-autoload
|
||||
(defun tramp-list-tramp-buffers ()
|
||||
"Return a list of all Tramp connection buffers."
|
||||
@@ -63,6 +64,7 @@ SYNTAX can be one of the symbols `default' (default),
|
||||
(all-completions
|
||||
"*trace tramp" (mapcar #'list (mapcar #'buffer-name (buffer-list))))))
|
||||
|
||||
;; Use `match-buffers' starting with Emacs 29.1.
|
||||
;;;###tramp-autoload
|
||||
(defun tramp-list-remote-buffers ()
|
||||
"Return a list of all buffers with remote `default-directory'."
|
||||
|
||||
@@ -75,7 +75,7 @@
|
||||
(prog1 (setq xdg (concat (file-name-as-directory xdg) "emacs"))
|
||||
(make-directory xdg t))
|
||||
(eval (car (get 'temporary-file-directory 'standard-value)) t)))
|
||||
"The default value of `temporary-file-directory'.")
|
||||
"The default value of `temporary-file-directory' for Tramp.")
|
||||
|
||||
(defsubst tramp-compat-make-temp-name ()
|
||||
"Generate a local temporary file name (compat function)."
|
||||
|
||||
Reference in New Issue
Block a user