Re: registry marks in gnus 5.13

[emacsnews]

Hi Ted,
        that did the trick :) 
        thanks alot.
Regards,

Aleblanc

Ted Zlatanov <tzz@lifelogs.com> writes:

> On Mon, 12 Jan 2009 17:05:05 +0000 <emacsnews@aleblanc.cotse.net> wrote: 
>
>> I am using gnus 5.13 with emacs 23.0.60.1 in Ubuntu Intrepid
>> I see no registry marks in my summary buffer.
>> I have the following lines in my .gnus.el file:
>
>> ;; gnus registry 
>> (setq gnus-registry-cache-file "~/.emacs.d/.gnus.registry.eld"
>>       gnus-registry-max-entries 25000
>>       gnus-registry-use-long-group-names t
>>       gnus-registry-install t)
>> (gnus-registry-initialize)
>
>> I have not changed the value of gnus-registry-marks which is:
>
>> ((Important :char 105 :image "summary_important")
>>  (Work :char 119 :image "summary_work")
>>  (Personal :char 112 :image "summary_personal")
>>  (To-Do :char 116 :image "summary_todo")
>>  (Later :char 108 :image "summary_later"))
>
>> I tried all the default registry marks, and checked with the
>> gnus-registry-get-article-marks function that the marks have indeed been
>> allocated.
>
>> I suspect it has something to do with the :image property, but this is
>> not documented in the info files.
>
> :image is for future expansion, we'll associate an image with each mark
> eventually (suggestions for images are welcome).  The :char is all that
> matters for now.  You can use any character.  I use:
>
> (setq gnus-registry-marks  
>       '((Important
>      :char ?ι
>      :image "summary_important")
>     (Work
>      :char ?ω
>      :image "summary_work")
>     (Personal
>      :char ?π
>      :image "summary_personal")
>     (To-Do
>      :char ?τ
>      :image "summary_todo")
>     (Later
>      :char ?λ
>      :image "summary_later")))
>
> I display marks like this:
>
> gnus-summary-line-format is a variable defined in `gnus.el'.
> Its value is 
> "%U%R %10&user-date; $%6uS [%6uM] %6k  %B %(%4L: %*%-25,25a%) %s \n"
>
> (the "[%6uM]" part is what matters)
>
> I set up the M user format like this:
>
> (defalias 'gnus-user-format-function-M 'gnus-registry-user-format-function-M)
>
> Let me know if you still have trouble.
>
> Ted

--