]> git.eshelyaron.com Git - emacs.git/commitdiff
Improve `M-x speedbar' under emacs -nw very slightly
authorLars Ingebrigtsen <larsi@gnus.org>
Sun, 23 Jan 2022 13:46:55 +0000 (14:46 +0100)
committerLars Ingebrigtsen <larsi@gnus.org>
Sun, 23 Jan 2022 13:46:55 +0000 (14:46 +0100)
* lisp/speedbar.el (speedbar-frame-mode): `M-x speedbar' doesn't
seem to do anything visible under -nw, so issue a message in that
case to tell the user how to proceed (bug#32597).

lisp/speedbar.el

index e63a2642fe263554a8576a1cc46b513927d86d28..b2e7be1505caaf00ac398e93582485a54cca354c 100644 (file)
@@ -938,7 +938,9 @@ supported at a time.
   ;; hscroll
   (setq-local auto-hscroll-mode nil)
   ;; reset the selection variable
-  (setq speedbar-last-selected-file nil))
+  (setq speedbar-last-selected-file nil)
+  (unless (display-graphic-p)
+    (message "Use `M-x speedbar-get-focus' to see the speedbar window")))
 
 (defun speedbar-frame-reposition-smartly ()
   "Reposition the speedbar frame to be next to the attached frame."