Re: fun function: get new news, dammit.

[Ed L Cashin <ecashin@uga.edu>]

Ed L Cashin <ecashin@uga.edu> writes:

> Despite gnus' great features, I often wind up switching to the *Group*
> buffer, hitting "L", and then doing "M-g" about twenty times or so to
> see whether there's new news/mail.
>
> Finally I made a function that does just that.  

OK, I this function appeared to work, but here's something really
wierd: although the function does exactly what I do -- it calls the
same functions the keys are bound to, it sometimes doesn't show new
mail when the keys do!

That is, I can run elc-get-news-dammit and not see any new mail, then
manually hit M-g on an nnimap mailbox, and it shows new messages!
That, to me, seems very strange, since "ESC g" is bound to
gnus-topic-get-new-news-this-topic, the same function called in
elc-get-news-dammit. 

...
>
> (defun elc-get-news-dammit ()
>   "get the news, dammit!"
>   (interactive)
>   (let ((gbuf (get-buffer "*Group*")))
>     (if (not gbuf)
> 	(error "Cannot find *Group* buffer"))
>     (switch-to-buffer gbuf)
>     (gnus-group-list-all-groups)
>     (save-excursion
>       (beginning-of-buffer)
>       (labels
> 	  ((rec ()
> 	     (gnus-topic-get-new-news-this-topic)
> 	     (if (= (forward-line) 0)
> 		 (rec))))
> 	(rec)))))

-- 
  Singing Science  | Now anyone can tell you what a mammal is,
  "Mammal"         | Anyone who understands!
                   | They're warm blooded, have hair on their bodies,
                   | And suckle their young from mammary glands.