[Mew-dist 12580] addrbook fix for 1.95

[Kazu Yamamoto ( 山本和彦 )]

最近 To: に列挙したアドレスを Mew が学習しないと思っていたら、やっぱり
バグでした。(しかも、情けない。) b28 に、これを当て下さい。

--かず

Index: mew-encode.el
===================================================================
RCS file: /usr/home/kazu/cvsroot/Mew/mew/mew-encode.el,v
retrieving revision 1.176
retrieving revision 1.177
diff -c -r1.176 -r1.177
*** mew-encode.el	2000/02/21 12:37:03	1.176
--- mew-encode.el	2000/02/28 14:09:27	1.177
***************
*** 230,244 ****
  ;;;
  
  ;; xxx Bcc: and/or Dcc:?
! (defun mew-encode-learn-aliases (recentp)
    (if (and mew-use-auto-alias mew-addrbook-append-domain-p)
        ;; If mew-addrbook-append-domain-p is nil, automatic
        ;; short names would be conflicted to local users.
!       (if recentp
! 	  (mapcar (function mew-addrbook-alias-add)
! 		  (mew-header-parse-address-list (list mew-to: mew-cc:)))
! 	(mapcar (function mew-addrbook-alias-add)
! 		(mew-header-parse-address-list (list mew-resent-to: mew-resent-cc:))))))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;
--- 230,244 ----
  ;;;
  
  ;; xxx Bcc: and/or Dcc:?
! (defun mew-encode-learn-aliases (resentp)
    (if (and mew-use-auto-alias mew-addrbook-append-domain-p)
        ;; If mew-addrbook-append-domain-p is nil, automatic
        ;; short names would be conflicted to local users.
!       (mapcar (function mew-addrbook-alias-add)
! 	      (mew-header-parse-address-list
! 	       (if resentp
! 		   (list mew-resent-to: mew-resent-cc:)
! 		 (list mew-to: mew-cc:))))))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;;;