procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/net/tramp.el (tramp-get-buffer-string): Stabilize.

Browse source
This commit is contained in:
Michael Albinus 2023-07-08 15:43:41 +02:00
parent a82486e5a4
commit dbac807605
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/net/tramp.el
View file

@ -1960,11 +1960,10 @@ version, the function does nothing."
"Return contents of BUFFER.
If BUFFER is not a buffer or a buffer name, return the contents
of `current-buffer'."
(or (let ((buf (or buffer (current-buffer))))
(when (bufferp buf)
(with-current-buffer (or buffer (current-buffer))
(substring-no-properties (buffer-string)))))
""))
(with-current-buffer
(if (or (bufferp buffer) (and (stringp buffer) (get-buffer buffer)))
buffer (current-buffer))
(substring-no-properties (buffer-string))))
(defun tramp-debug-buffer-name (vec)
"A name for the debug buffer for VEC."