# HG changeset patch # User Eli Zaretskii # Date 992777333 0 # Node ID 4f75256c6aae6101fb833ef62fc77cbe25779136 # Parent 745b05b3e5ed72fbf9b24026beb04fea924f0523 (list-buffers-noselect): Add help-echo to mouse-highlighted text. diff -r 745b05b3e5ed -r 4f75256c6aae lisp/buff-menu.el --- a/lisp/buff-menu.el Sun Jun 17 11:25:12 2001 +0000 +++ b/lisp/buff-menu.el Sun Jun 17 11:28:53 2001 +0000 @@ -548,7 +548,9 @@ (put-text-property this-buffer-line-start (point) 'buffer buffer) (put-text-property this-buffer-line-start name-end - 'mouse-face 'highlight)) + 'mouse-face 'highlight) + (put-text-property this-buffer-line-start name-end + 'help-echo "mouse-2: select this buffer")) (let ((size (format "%8d" this-buffer-size)) (mode this-buffer-mode-name) (excess (- (current-column) 17)))