diff lisp/gnus/gnus-agent.el @ 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 ad05d91d3598
children 4b7fa3ee8e9e
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)