]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/net/tramp.el: Make last change backward compatible.
authorMichael Albinus <michael.albinus@gmx.de>
Tue, 11 Aug 2020 14:46:41 +0000 (16:46 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Tue, 11 Aug 2020 14:46:41 +0000 (16:46 +0200)
lisp/net/tramp.el

index fdf26f6b782f865a65283a671b4143a50fb48eb1..d8113a9af9bb1b83ef37f8761453b8b45c536318 100644 (file)
@@ -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)