Smtpmail server password ends up serialized to .emacs customization buffer

Smtpmail server password ends up serialized to .emacs customization buffer

[Peter Wisnovsky]

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.3.1 (i386-mingw-nt5.1.2600)
 of 2004-03-10 on NYAUMO
configured using `configure --with-gcc (3.2)'
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: ENU
  locale-coding-system: iso-latin-1
  default-enable-multibyte-characters: t

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

I use VM and the current version of smtpmail.el/sendmail.el I
downloaded from the CVS repository, which support the ability to
customize the smptmail auth credentials along the lines of:

 '(smtpmail-auth-credentials (quote (("my.mail.server" 25 "my.userid" nil))))

The last "nil" for password indicates I want to be prompted, since I
don't want it in my .emacs file.

If I send mail I get prompted for the password. 
If I then customize another variable and say "Save for future
sessions" it serializes WHOLE customization variable set, including
the password, into my .emacs file. Gack!


Recent input:
<escape> x g n u <escape> <backspace> e m a c s <escape> 
<backspace> r e p o r t - b <tab> <escape> <backspace> 
<escape> <backspace> C-g C-h a b u g <return> C-x 0 
C-s e m a c s C-a C-v C-v C-v C-v C-v C-v C-v <escape> 
< C-s s u b m i t C-s C-s C-s C-w C-w C-s C-s C-r C-r 
C-s C-a C-s e a <backspace> m a c s C-s C-s C-a <escape> 
x r e p o r t - e m a c s - b u g <return>

Recent messages:
Wrote c:/users/pwisnovsky/.emacs
call-interactively: Quit
Loading apropos...done
Loading view...done
Loading eieio-opt...done
Type C-x 1 to remove help window.  C-M-v to scroll the help.
Mark saved where search started
Mark set
Mark saved where search started [2 times]
Loading emacsbug...done