Argh. Annotations.

Argh. Annotations.

[Lars Magne Ingebrigtsen]

I have:

  (add-hook 'gnus-article-display-hook 'gnus-article-display-picons t)
  (add-hook 'gnus-article-display-hook 'gnus-group-display-picons t)
  (setq gnus-picons-display-where 'article)

This works, except that the bar separating these two things comes
*before* everything else, and not in the middle.  This is highly
annoying.

I just don't understand the annotations stuff.  The bar annotation is
made with RIGHTP set to t, but it ends up on the beginning of the line
anyway.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@ifi.uio.no * Lars Ingebrigtsen

Re: Argh. Annotations.

[Wesley Hardaker]

>>>>> In article <w8sk9mfrzw1.fsf@hrotti.ifi.uio.no>, Lars Magne Ingebrigtsen <larsi@ifi.uio.no> writes:

Lars> (add-hook 'gnus-article-display-hook 'gnus-article-display-picons t)
Lars> (add-hook 'gnus-article-display-hook 'gnus-group-display-picons t)
Lars> (setq gnus-picons-display-where 'article)

Lars> This works, except that the bar separating these two things comes
Lars> *before* everything else, and not in the middle.  This is highly
Lars> annoying.

Arg indeed...  Sigh...  The whole thing really needs to be re-thought
out, but I've been a bit too busy on other projects lately.

Anyway, you *might* try reversing the two add-hooks and see if that
helps, which I think it will...

Lars> I just don't understand the annotations stuff.  The bar
Lars> annotation is made with RIGHTP set to t, but it ends up on the
Lars> beginning of the line anyway.

The exact reason the whole thing needs to be re-thought out...

Put the following in the mini-buffer:

(let ((i 1))
(while (< i 7)
  (make-annotation (format "%d" i) (point-max) 'text nil nil nil 
		   (equal (mod i 2) 1))
  (setq i (+ i 1))))

It returns '531246' as a set of annotations...  This is, uh, wrong
according to what you think it should be doing.  Even numbers should
be (not rightp) and odd should be rightp, but when you look at the
results its not quite what you'd expect.  In fact, its rather
backwards in my mind.  I spent a couple hours yelling at Emacs the day
I was playing with this initially.  Note that it always builds from
the center, which is why the 'bar' must be placed first, as the rest
of the items are built out from the center.

This is why order matters so much, and I suspect the order of the
hooks matters as well.  Ick.  Truely ugly.

Wes

Re: Argh. Annotations.

[Danny Siu]

Wesley Hardaker writes:

  >>>>>> In article <w8sk9mfrzw1.fsf@hrotti.ifi.uio.no>, Lars Magne
  >>>>>> Ingebrigtsen <larsi@ifi.uio.no> writes:
  Lars> (add-hook 'gnus-article-display-hook 'gnus-article-display-picons t)
  Lars> (add-hook 'gnus-article-display-hook 'gnus-group-display-picons t)
  Lars> (setq gnus-picons-display-where 'article)

  Lars> This works, except that the bar separating these two things comes
  Lars> *before* everything else, and not in the middle.  This is highly
  Lars> annoying.

  Wesley> Arg indeed...  Sigh...  The whole thing really needs to be
  Wesley> re-thought out, but I've been a bit too busy on other projects
  Wesley> lately.

  Wesley> Anyway, you *might* try reversing the two add-hooks and see if
  Wesley> that helps, which I think it will...

Hmm, reversing them displays "foo@[1].[2] | nnfolder:GNUS" which is not
right.

Footnotes: 
[1]  picon 1
[2]  picon 2 

-- 
                                                                ^..^
 '/..\"                                                        ( oo )  )~
m( oo )m                                                         ,,  ,,
/=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\
|  Danny Dick-Fung Siu                http://www-leland.stanford.edu/~dsiu |
|  Reference System Group             http://www.csua.berkeley.edu/~dsiu   |
|  Adobe Systems Incorporated       E-Mail:<dsiu@alumni.eecs.berkeley.edu> |
|       "What do you expect from a         <dsiu@leland.stanford.edu>      |
|          Cal. Berkeley grad.?"           <dsiu@adobe.com>                |
\=-=-=-=-=-=-=-=-=-=-=-==-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=/

Re: Argh. Annotations.

[Wesley Hardaker]

>>>>> In article <yj9g1wxnpjr.fsf@adobe.com>, Danny Siu <dsiu@Adobe.COM> writes:

Danny> Hmm, reversing them displays "foo@[1].[2] | nnfolder:GNUS" which is not
Danny> right.

Danny> Footnotes: 
Danny> [1]  picon 1
Danny> [2]  picon 2 

Actually, it is...  The reasoning is the way the make-annotation
function in XEmacs works...  It was much easier due to the layout of
the faces database to put the group on the right and the address on
the left of the bar...  Long story...  Again, it should be re-worked
upon...

Wes