gnus-group-current-level ?

gnus-group-current-level ?

[Bastien]

Hi,

I'm trying to write a function that will fetch the current group level
and increment it by one before redisplaying.  Basically something like
this: 

(define-key gnus-group-mode-map (kbd "C-^") 
            (lambda() (gnus (1+ gnus-group-current-level))))

... but of course, gnus-group-current-level doesn't exist.  Is there a
way around?  Any ideas?

Thanks!

PS: I want to do this because my group levels reflect their importance.
When I process my inboxes, I first check for 1, then 2 [staying in 2 at
work], then 3, etc.  Trying to avoid distraction.

-- 
Bastien

Re: gnus-group-current-level ?

[Katsumi Yamaoka]

>>>>> Bastien wrote:

> I'm trying to write a function that will fetch the current group level
> and increment it by one before redisplaying.  Basically something like
> this:

> (define-key gnus-group-mode-map (kbd "C-^")
>             (lambda() (gnus (1+ gnus-group-current-level))))

> ... but of course, gnus-group-current-level doesn't exist.  Is there a
> way around?  Any ideas?

That's the return value of the `gnus-group-group-level' function.
The function has to be made a command, i.e., an interactive
function.  And, I think using `gnus-group-get-new-news' is better
rather than to use `gnus'.

> PS: I want to do this because my group levels reflect their importance.
> When I process my inboxes, I first check for 1, then 2 [staying in 2 at
> work], then 3, etc.  Trying to avoid distraction.

Though I cannot imagine the usefulness ;-), how about this one?

(define-key gnus-group-mode-map (kbd "C-^")
  (lambda ()
    (interactive)
    (gnus-group-get-new-news
     (min (1+ (gnus-group-group-level))
	  (1- gnus-level-default-unsubscribed)))))