masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-13 23:49:02 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix type check in tramp-get-buffer-string

Browse source 
* lisp/net/tramp.el (tramp-get-buffer-string): Check, that BUFFER
is really a bufferp.
This commit is contained in:
Michael Albinus 2023-06-25 14:31:23 +02:00
parent 2aa57fe6cf
commit fc7e7c3fde
1 changed files with 5 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/net/tramp.el
View file

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