# HG changeset patch # User Miles Bader # Date 1166775285 0 # Node ID 6b69e86dc4cca73341f970235ade34973b3b14a3 # Parent 5e43de1ffaac297f97db52b9aaffdf312435d29b Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 177-178) - Merge from emacs--devo--0 - Update from CVS 2006-12-20 Reiner Steib * lisp/gnus/gnus-group.el (gnus-group-tool-bar-gnome): Exchange connect and disconnect icons. Add help text. Revision: emacs@sv.gnu.org/emacs--devo--0--patch-569 diff -r 5e43de1ffaac -r 6b69e86dc4cc lisp/gnus/ChangeLog --- a/lisp/gnus/ChangeLog Thu Dec 21 21:49:21 2006 +0000 +++ b/lisp/gnus/ChangeLog Fri Dec 22 08:14:45 2006 +0000 @@ -1,3 +1,8 @@ +2006-12-20 Reiner Steib + + * gnus-group.el (gnus-group-tool-bar-gnome): Exchange connect and + disconnect icons. Add help text. + 2006-12-13 Reiner Steib * legacy-gnus-agent.el: Add Copyright notice. diff -r 5e43de1ffaac -r 6b69e86dc4cc lisp/gnus/gnus-group.el --- a/lisp/gnus/gnus-group.el Thu Dec 21 21:49:21 2006 +0000 +++ b/lisp/gnus/gnus-group.el Fri Dec 22 08:14:45 2006 +0000 @@ -1018,9 +1018,11 @@ '((gnus-group-post-news "mail/compose") ;; Some useful agent icons? I don't use the agent so agent users should ;; suggest useful commands: - (gnus-agent-toggle-plugged "connect" t + (gnus-agent-toggle-plugged "disconnect" t + :help "Gnus is currently unplugged. Click to work online." :visible (and gnus-agent (not gnus-plugged))) - (gnus-agent-toggle-plugged "disconnect" t + (gnus-agent-toggle-plugged "connect" t + :help "Gnus is currently plugged. Click to work offline." :visible (and gnus-agent gnus-plugged)) ;; FIXME: gnus-agent-toggle-plugged (in gnus-agent-group-make-menu-bar) ;; should have a better help text.