changeset 62780:64854af11132

(gnus-agent-make-mode-line-string): Use mode-line-highlight as mouse-face.
author Luc Teirlinck <teirllm@auburn.edu>
date Thu, 26 May 2005 20:52:42 +0000
parents c3dbcfe29c9e
children f63d77804518
files lisp/gnus/gnus-agent.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/gnus-agent.el	Thu May 26 20:48:37 2005 +0000
+++ b/lisp/gnus/gnus-agent.el	Thu May 26 20:52:42 2005 +0000
@@ -561,7 +561,8 @@
   (if (and (fboundp 'propertize)
 	   (fboundp 'make-mode-line-mouse-map))
       (propertize string 'local-map
-		  (make-mode-line-mouse-map mouse-button mouse-func))
+		  (make-mode-line-mouse-map mouse-button mouse-func)
+		  'mouse-face 'mode-line-highlight)
     string))
 
 (defun gnus-agent-toggle-plugged (set-to)