Re: Argh. Annotations.

[Wesley Hardaker <whardake@sphysdec1.unil.ch>]

>>>>> 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