Gnus development mailing list
 help / color / mirror / Atom feed
* Where are `gnus-agent-group/summary-mode-hooks' run from?
@ 1998-03-15 23:33 Mike McEwan
  1998-03-16 19:16 ` Mike McEwan
  1998-03-19 13:12 ` Lars Magne Ingebrigtsen
  0 siblings, 2 replies; 3+ messages in thread
From: Mike McEwan @ 1998-03-15 23:33 UTC (permalink / raw)


  Well, I decided to have a look at Emacs 20.2 just in case I was
missing out on anything. In the process of getting gnus 5.6.2 working
I noticed that the `agent' had menu-bar items in both group and
summary modes - I hadn't seen these under Xemacs.

  Upon return to Xemacs I decided to try and enable these menu items,
but couldn't see anything in the manual as to how this is
achieved. After quite a bit of code perusal, I concluded that, under
Xemacs at least, these menu items are installed via:

`gnus-agent-group-mode-hook' and `gnus-agent-summary-mode-hook'

  However, grepping the lisp directory, I cannot see where these hooks 
are meant to be run from. I noticed that `gnus-agent-mode-hook' was
run when invoking `gnus-agent-mode' and so I've ended up adding the
following to my .gnus.el, which seems to do the job:

(add-hook 'gnus-agent-mode-hook 
	  '(lambda ()
		  (if gnus-agent-group-mode
		      (gnus-run-hooks 'gnus-agent-group-mode-hook)
		    (gnus-run-hooks 'gnus-agent-summary-mode-hook))))

  I'm still wet behind the ears when it comes to lisp, and so I was
wondering whether I have missed something, or has Lars maybe forgotten 
to have these hooks run at the appropriate juncture?

-- 
Mike.


^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: Where are `gnus-agent-group/summary-mode-hooks' run from?
  1998-03-15 23:33 Where are `gnus-agent-group/summary-mode-hooks' run from? Mike McEwan
@ 1998-03-16 19:16 ` Mike McEwan
  1998-03-19 13:12 ` Lars Magne Ingebrigtsen
  1 sibling, 0 replies; 3+ messages in thread
From: Mike McEwan @ 1998-03-16 19:16 UTC (permalink / raw)



  I missed `gnus-agent-server-mode', I've now got:

(add-hook 'gnus-agent-mode-hook 
	  '(lambda ()
		  (if (boundp 'gnus-agent-group-mode)
		      (if gnus-agent-group-mode
			  (gnus-run-hooks 'gnus-agent-group-mode-hook)))
		  (if (boundp 'gnus-agent-summary-mode)
		      (if gnus-agent-summary-mode
			  (gnus-run-hooks 'gnus-agent-summary-mode-hook)))
		  (if (boundp 'gnus-agent-server-mode)
		      (if gnus-agent-server-mode
			  (gnus-run-hooks 'gnus-agent-server-mode-hook)))))

  Do I really need this?

-- 
Mike.


^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: Where are `gnus-agent-group/summary-mode-hooks' run from?
  1998-03-15 23:33 Where are `gnus-agent-group/summary-mode-hooks' run from? Mike McEwan
  1998-03-16 19:16 ` Mike McEwan
@ 1998-03-19 13:12 ` Lars Magne Ingebrigtsen
  1 sibling, 0 replies; 3+ messages in thread
From: Lars Magne Ingebrigtsen @ 1998-03-19 13:12 UTC (permalink / raw)


Mike McEwan <mike@lotusland.demon.co.uk> writes:

>   Upon return to Xemacs I decided to try and enable these menu items,
> but couldn't see anything in the manual as to how this is
> achieved. After quite a bit of code perusal, I concluded that, under
> Xemacs at least, these menu items are installed via:
> 
> `gnus-agent-group-mode-hook' and `gnus-agent-summary-mode-hook'
> 
>   However, grepping the lisp directory, I cannot see where these hooks 
> are meant to be run from.

Yup.  Fix in Gnus v5.6.3.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen


^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~1998-03-19 13:12 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-03-15 23:33 Where are `gnus-agent-group/summary-mode-hooks' run from? Mike McEwan
1998-03-16 19:16 ` Mike McEwan
1998-03-19 13:12 ` Lars Magne Ingebrigtsen

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).