From 79e0bebbc3336cc698075826c5eb2629853363ab Mon Sep 17 00:00:00 2001 From: kaoru Date: Wed, 24 May 2000 04:58:23 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-default-from): Fix probrem when std11-extract-address-components return (nil "foo@bar"). --- wl/ChangeLog | 5 +++++ wl/wl-summary.el | 5 +++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 2a13424..1ebb1a3 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,8 @@ +2000-05-24 TAKAHASHI Kaoru + + * wl-summary.el (wl-summary-default-from): Fix probrem when + std11-extract-address-components return (nil "foo@bar"). + 2000-05-24 OKAZAKI Tetsurou * wl-draft.el (wl-draft-clone-local-variables): diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 5f52ece..fa11d4d 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -200,8 +200,9 @@ (eword-decode-string (if wl-use-petname (wl-address-get-petname to) - (car - (std11-extract-address-components to)))))) + (or + (car (std11-extract-address-components to)) + to))))) (wl-parse-addresses tos) ",")))) ((setq ng (elmo-msgdb-overview-entity-get-extra-field -- 1.7.10.4