message-fetch-field returns strange results

message-fetch-field returns strange results

[Jochen Küpper]

If I run
,----
| (message-fetch-field "from")
`----
on a message with the following From line (changed for content)
,----
| From: k.XXX-ps1yJmh03mYHOUQ5Bl9qvIfYan1s6kej@public.gmane.org (Klaas XXX)
`----
I get the following result:
,----
| k.XXX-ps1yJmh03mYHOUQ5Bl9qvIfYan1s6kej@public.gmane.org (Klaas XXX) domaintypecountry
`----

Since gnus-fetch-field uses message-fetch-field (and is in turn used
by bbdb) I get strange net entries in bbdb.

I am not sure where the last part comes from and would appreciate any
suggestions to fix or debug this.

,----
| GNU Emacs 21.2.1 (i686-pc-cygwin, X toolkit) of 2003-01-23 on DRACO
| No Gnus v0.2
| BBDB version 2.35 ($Date: 2004/03/22 15:23:33 $)
`----

Greetings,
Jochen
-- 
Einigkeit und Recht und Freiheit                http://www.Jochen-Kuepper.de
    Liberté, Égalité, Fraternité                GnuPG key: CC1B0B4D
        (Part 3 you find in my messages before fall 2003.)

Re: message-fetch-field returns strange results

[Jesper Harder]

Jochen Küpper <jochen@fhi-berlin.mpg.de> writes:

> ,----
> | (message-fetch-field "from")
> `----
> on a message with the following From line (changed for content)
> ,----
> | From: k.XXX@domain.type.country (Klaas XXX)
> `----
> I get the following result:
> ,----
> | k.XXX@domain.type.country (Klaas XXX) domaintypecountry
> `----

I can't reproduce that:

(with-temp-buffer
  (insert "From: k.XXX@domain.type.country (Klaas XXX)\n")
  (message-fetch-field "from"))
=> "k.XXX@domain.type.country (Klaas XXX)"

-- 
Jesper Harder                                <http://purl.org/harder/>

Re: message-fetch-field returns strange results

[Jochen Küpper]

On Mon, 29 Mar 2004 22:11:04 +0200 Jesper Harder wrote:

Jesper> Jochen Küpper <jochen-+It19tn3Rl9sbm7dSapR3bNAH6kLmebB@public.gmane.org> writes:


[...]
>> ,----
>> | k.XXX-ps1yJmh03mYHOUQ5Bl9qvIfYan1s6kej@public.gmane.org (Klaas XXX) domaintypecountry
>> `----

Jesper> I can't reproduce that:
Jesper> => "k.XXX-ps1yJmh03mYHOUQ5Bl9qvIfYan1s6kej@public.gmane.org (Klaas XXX)"

Hmm, me neither anymore; I do still see some of these entries in my
bbdb, but now it works (correctly again). I must have had something
else screwed up. Sorry for the noise:(

Greetings,
Jochen
-- 
Einigkeit und Recht und Freiheit                http://www.Jochen-Kuepper.de
    Liberté, Égalité, Fraternité                GnuPG key: CC1B0B4D
        (Part 3 you find in my messages before fall 2003.)

Re: message-fetch-field returns strange results

[Reiner Steib]

On Tue, Mar 30 2004, Jochen Küpper wrote:

> On Mon, 29 Mar 2004 22:11:04 +0200 Jesper Harder wrote:
>
> Jesper> Jochen Küpper writes:
>
> [...]
>>> ,----
>>> | k.XXX@domain.type.country (Klaas XXX) domaintypecountry
>>> `----
>
> Jesper> I can't reproduce that:
[...]
> Hmm, me neither anymore; I do still see some of these entries in my
> bbdb, but now it works (correctly again). I must have had something
> else screwed up. Sorry for the noise:(

Jochen, you mentioned [1] that you use Jesper's Loom-style picon
patch.  I got the behavior you described too:

`M-: (message-fetch-field "from") RET' in the article buffer results
in "do.li@something.uni-ulm.de de" and I got this entry in my BBDB,
too.

Bye, Reiner.

[1] <news:86r7vepjuz.fsf@doze.rz-berlin.mpg.de> and refs.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo--- PGP key available via WWW   http://rsteib.home.pages.de/

Re: message-fetch-field returns strange results

[Jochen Küpper]

On Wed, 31 Mar 2004 14:46:27 +0200 Reiner Steib wrote:

Reiner> Jesper's Loom-style picon patch. I got the behavior you
Reiner> described too:

Reiner> `M-: (message-fetch-field "from") RET' in the article buffer results
Reiner> in "do.li-f52GMkFzgz/na5VO6qPzpxRJbrLmWrcZ@public.gmane.org de" and I got this entry in my BBDB,

Correct.

If I startup Emacs/Gnus with a plain Gnus from cvs HEAD everything
works alright (incl. using picons and bbdb). If I then evaluate the
modified 'gnus-picon-transform-address (and gnus-picon-style) the
problem shows up. (Well, using 'inline style it works, not too
surprising, but FYI.)

I guess that also somehow explains why the following works:
,----
| (with-temp-buffer
|   (insert "From: k.XXX-ps1yJmh03mYHOUQ5Bl9qvIfYan1s6kej@public.gmane.org (Klaas XXX)\n")
|   (message-fetch-field "from"))
`----
since there aren't any picons in that buffer...

Greetings,
Jochen
-- 
Einigkeit und Recht und Freiheit                http://www.Jochen-Kuepper.de
    Liberté, Égalité, Fraternité                GnuPG key: CC1B0B4D
        (Part 3 you find in my messages before fall 2003.)

Re: message-fetch-field returns strange results

[Reiner Steib]

On Wed, Mar 31 2004, Jochen Küpper wrote:

> On Wed, 31 Mar 2004 14:46:27 +0200 Reiner Steib wrote:
>
> Reiner> Jesper's Loom-style picon patch. I got the behavior you
> Reiner> described too:
[...]
> If I startup Emacs/Gnus with a plain Gnus from cvs HEAD everything
> works alright (incl. using picons and bbdb). If I then evaluate the
> modified 'gnus-picon-transform-address (and gnus-picon-style) the
> problem shows up.

I found a workaround:

New optional argument to `gnus-picon-insert-glyph':

--8<---------------cut here---------------start------------->8---
(defun gnus-picon-insert-glyph (glyph category &optional nostring)
  "Insert GLYPH into the buffer.
GLYPH can be either a glyph or a string."
  (if (stringp glyph)
      (insert glyph)
    (gnus-add-wash-type category)
    (gnus-add-image category (car glyph))
    (gnus-put-image (car glyph) (unless nostring (cdr glyph)) category)))
--8<---------------cut here---------------end--------------->8---

Use this argument in the "(right ...)" part of
`gnus-picon-transform-address':

+ (gnus-picon-insert-glyph image category)
- (gnus-picon-insert-glyph image category 'nostring)

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo--- PGP key available via WWW   http://rsteib.home.pages.de/

Re: message-fetch-field returns strange results

[Xavier Maillard]

On  2 avr 2004, Reiner Steib wrote:

> On Wed, Mar 31 2004, Jochen Küpper wrote:
> 
> > On Wed, 31 Mar 2004 14:46:27 +0200 Reiner Steib wrote:
> > 
> > Reiner> Jesper's Loom-style picon patch. I got the behavior you
> > Reiner> described too:
> [...]
> > If I startup Emacs/Gnus with a plain Gnus from cvs HEAD everything
> > works alright (incl. using picons and bbdb). If I then evaluate the
> > modified 'gnus-picon-transform-address (and gnus-picon-style) the
> > problem shows up.
> 
> I found a workaround:

Yeah it works great :)

Thank you.

zeDek
-- 
 In Gruuik we trust