From c83a4a3fa34a5fa27ee3168ef173ad553b1f47f9 Mon Sep 17 00:00:00 2001 From: morioka Date: Thu, 27 Nov 1997 08:12:08 +0000 Subject: [PATCH] sync with qgnus-0.13. --- lisp/ChangeLog | 85 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ lisp/message.el | 3 +- 2 files changed, 87 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 5f0750b..a899e64 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,9 +1,94 @@ +Thu Nov 6 20:43:05 1997 Lars Magne Ingebrigtsen + + * gnus.el: Quassia Gnus v0.13 is released. + +Thu Nov 6 20:30:14 1997 Lars Magne Ingebrigtsen + + * nnlistserv.el: New backend. + +Thu Nov 6 01:53:51 1997 Stefan Waldherr + + * nnweb.el (nnweb-dejanewsold-search): New function. + +Thu Nov 6 01:52:43 1997 Lars Magne Ingebrigtsen + + * gnus-topic.el (gnus-topic-change-level): Really delete multiple + instances. + +Wed Nov 5 14:04:54 1997 Lars Magne Ingebrigtsen + + * gnus-topic.el (gnus-topic-update-topic-line): Possibly fix nil + numbers. + + * gnus-sum.el (gnus-summary-show-article): New command and + keystroke. + +Tue Nov 4 06:29:58 1997 Lars Magne Ingebrigtsen + + * gnus-score.el (gnus-score-adaptive): Use the home score file. + +Sat Oct 25 05:52:22 1997 Lars Magne Ingebrigtsen + + * gnus-art.el (gnus-article-save): Hide headers in the right + buffer. + + * gnus-picon.el (gnus-picons-xbm-face): New face. + +Sat Oct 25 00:39:42 1997 Lars Balker Rasmussen + + * gnus-art.el (gnus-article-fill-paragraph): New command and + keystroke. + +1997-10-16 Colin Rafferty + + * message.el (message-make-fqdn): Made certain that user-mail is + not nil. + +Sat Oct 25 00:18:32 1997 David S. Goldberg + + * gnus-art.el (article-hide-boring-headers): Use many-to. + +Fri Oct 24 23:48:39 1997 Lars Magne Ingebrigtsen + + * gnus-picon.el (gnus-picons-display-pairs): Don't add two bars. + (gnus-picons-try-face): Set the foreground color on the bar. + (gnus-picons-group-exluded-groups): New variable. + (gnus-group-display-picons): Use it. + +Mon Oct 13 00:01:35 1997 Lars Magne Ingebrigtsen + + * gnus-agent.el (gnus-agent-group-path): Translate file chars. + (gnus-agent-batch-fetch): New command. + (gnus-agent-fetch-group): Message. + +Sun Oct 12 23:54:55 1997 ISO-2022-JP + + * gnus-agent.el (gnus-agent-article-file-coding-system): New + variable. + +Sun Oct 12 16:46:11 1997 Lars Magne Ingebrigtsen + + * dgnushack.el (lpath): Reversed. + + * gnus-msg.el (gnus-summary-cancel-article): Use sym prefix. + + * gnus-art.el (article-translate-characters): New function. + (article-treat-dumbquotes): New command and keystroke. + +Sun Oct 5 20:09:31 1997 Lars Magne Ingebrigtsen + + * gnus-art.el (gnus-button-alist): No ' and " in News:. + + * gnus-msg.el (gnus-inews-insert-archive-gcc): Comp warn. + Sat Oct 4 00:53:55 1997 Lars Magne Ingebrigtsen * gnus.el: Quassia Gnus v0.12 is released. Sat Oct 4 00:16:39 1997 Lars Magne Ingebrigtsen + * gnus.el (gnus-plugged): Moved here. + * nnmail.el (nnmail-delete-incoming): Changed default to nil. * gnus-int.el (gnus-request-scan): Don't do anything if diff --git a/lisp/message.el b/lisp/message.el index 28c131b..cc78f54 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -2723,7 +2723,8 @@ give as trustworthy answer as possible." (string-match "\\." mail-host-address)) mail-host-address) ;; We try `user-mail-address' as a backup. - ((and (string-match "\\." user-mail) + ((and user-mail + (string-match "\\." user-mail) (string-match "@\\(.*\\)\\'" user-mail)) (match-string 1 user-mail)) ;; Default to this bogus thing. -- 1.7.10.4