Missing To addresses in rmail outgoing summary (FCC)

[david]

This bug report will be sent to the Free Software Foundation,
not to your local site managers!
Please write in English, because the Emacs maintainers do not have
translators to read other languages for them.

Your bug report will be posted to the bug-gnu-emacs@gnu.org mailing list,
and to the gnu.emacs.bug news group.

In GNU Emacs 21.4.1 (i486-pc-linux-gnu, X toolkit, Xaw3d scroll bars)
 of 2006-05-18 on rothera, modified by Debian
configured using `configure '--build=i486-linux-gnu' '--host=i486-linux-gnu' 
'--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib' 
'--localstatedir=/var/lib' '--infodir=/usr/share/info' 
'--mandir=/usr/share/man' '--with-pop=yes' '--with-x=yes' 
'--with-x-toolkit=athena' 'CFLAGS=-DDEBIAN -g -O2' 'build_alias=i486-linux-gnu' 
'host_alias=i486-linux-gnu''
Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: en_GB.UTF-8
  locale-coding-system: utf-8
  default-enable-multibyte-characters: t

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

No To addresses appearing in RMAIL summary for FCC file.

With mail-from-style = system-default 
smtpmail.el does not add a From: field to to a FCC file ( /home/david/outgoing) 
This may be correct,
but when I do 'i' 'outgoing' in the RMAIL buffer to view the outgoing
BABYL file, and then do 'h' to get the summary of the outgoing file, I
just get blanks in the summary listing instead of the expected To
address. e.g.

  39  21-Nov                             [41] Re: Touch Screen PCs and Security 
Policy
  40  21-Nov                             [13] Re: contact_table.pm
  41  21-Nov                             [10] What do I get

Setting mail-from-style = angle
fixes this problem.

/usr/share/emacs/21.4/lisp/mail/rmailsum.el
function rmail-make-basic-summary-line

(if (not (re-search-forward "^From:[ \t]*" nil t))
    "                         "
    (let* ...
         (if (not (re-search-forward "^To:[ \t]*" nil t))
             nil
             (setq from
                   (concat "to: ...
    ... )
)

I.e. dont put a To: address in summary if we dont have a From: field in mail 
header.

Logic doesnt seem quite right to me.

      David McKelvie

Recent input:
o SPC g e t SPC a n t <backspace> y SPC T o : SPC a 
d d r e s s e s SPC i n SPC t h e SPC s u m m a r y 
SPC f o r SPC o u t g o i n g . <return> <down-mouse-1> 
<mouse-1> <backspace> W C-a <return> <down-mouse-1> 
<mouse-1> <escape> q <down-mouse-1> <mouse-1> <return> 
<tab> D a v i d <return> C-c C-c i o u SPC <return> 
h M-x r e p o r t - e m a c s - b SPC <return>

Recent messages:
Loading ht-mime-pgp...done
Loading cl-seq...done
Loading cl-extra...done
Loading mc-remail (source)...done
Sending...done
my-display-european called
Counting messages...done
Loading rmailsum...done
Computing summary lines...done
Loading emacsbug...done