* lisp/net/tramp.el: Make last change backward compatible.
This commit is contained in:
parent
39c90f8dfa
commit
119a9ecfe1
1 changed files with 5 additions and 2 deletions
|
@ -3814,9 +3814,12 @@ support symbolic links."
|
|||
(setq current-buffer-p t)
|
||||
(current-buffer))
|
||||
(t (get-buffer-create
|
||||
;; These variables have been introduced with Emacs 28.1.
|
||||
(if asynchronous
|
||||
shell-command-buffer-name-async
|
||||
shell-command-buffer-name)))))
|
||||
(or (bound-and-true-p shell-command-buffer-name-async)
|
||||
"*Async Shell Command*")
|
||||
(or (bound-and-true-p shell-command-buffer-name)
|
||||
"*Shell Command Output*"))))))
|
||||
(error-buffer
|
||||
(cond
|
||||
((bufferp error-buffer) error-buffer)
|
||||
|
|
Loading…
Add table
Reference in a new issue