From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/12612 Path: main.gmane.org!not-for-mail From: Colin Rafferty Newsgroups: gmane.emacs.gnus.general Subject: [patch][x-post] message.el Date: 16 Oct 1997 13:32:58 -0400 Message-ID: References: <199710160844.QAA05104@charlotte.iss.nus.sg> <87g1q257fh.fsf@bittersweet.inetarena.com> <86vhyxzojz.fsf@kramer.in.aventail.com> NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by tm-edit 7.108) Content-Type: multipart/signed; protocol="application/pgp-signature"; boundary="pgp-sign-Multipart_Thu_Oct_16_13:32:32_1997-1"; micalg=pgp-md5 Content-Transfer-Encoding: 7bit X-Trace: main.gmane.org 1035152116 4722 80.91.224.250 (20 Oct 2002 22:15:16 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 22:15:16 +0000 (UTC) Return-Path: Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16]) by altair.xemacs.org (8.8.7/8.8.7) with ESMTP id LAA16528 for ; Thu, 16 Oct 1997 11:38:38 -0700 Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2]) by xemacs.org (8.8.5/8.8.5) with SMTP id NAA05949 for ; Thu, 16 Oct 1997 13:30:31 -0500 (CDT) Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) id for ; Thu, 16 Oct 1997 19:33:46 +0200 Original-Received: (qmail 12906 invoked by uid 504); 16 Oct 1997 17:33:43 -0000 Original-Received: (qmail 12903 invoked from network); 16 Oct 1997 17:33:42 -0000 Original-Received: from wfdutilf01.ml.com (HELO wfdutilgw.ml.com) (206.3.74.31) by claymore.vcinet.com with SMTP; 16 Oct 1997 17:33:41 -0000 Original-Received: from ml1.ml.com ([199.201.57.130]) by wfdutilgw.ml.com (8.8.7/8.8.7/MLgwo-3.05) with ESMTP id NAA17521; Thu, 16 Oct 1997 13:33:39 -0400 (EDT) Original-Received: from commpost.ml.com (commpost.ml.com [146.125.4.24]) by ml1.ml.com (8.8.5/8.8.5/MLml4-2.07) with SMTP id NAA19985; Thu, 16 Oct 1997 13:33:01 -0400 (EDT) Original-Received: from spssunp.spspme.ml.com (spssunp.spspme.ml.com [192.168.111.13]) by commpost.ml.com (8.6.12/8.6.12) with ESMTP id NAA00221; Thu, 16 Oct 1997 13:33:01 -0400 Original-Received: by spssunp.spspme.ml.com (SMI-8.6/SMI-4.1) id NAA04627; Thu, 16 Oct 1997 13:33:00 -0400 Original-To: XEmacs Beta List , ding@gnus.org X-Face: D>:hrrB{l6#\wU;)0R:OHSTA@ayd.Oq?s@Rrc;[+z0m+<-U"$G-J6L)F2QY`qK~uPu!s1(6{\#uy!Ag/D)?'L[}xErXvxoPn8T_hKi{M]/(`BF{e}X7;hby`p\.E$rJ}Aff#BT,rdDIw\y X-Y-Zippy: I want to kill everyone here with a cute colorful Hydrogen Bomb!! In-Reply-To: Colin Rafferty's message of "16 Oct 1997 13:16:07 -0400" Original-Lines: 70 X-Mailer: Gnus v5.5/XEmacs 20.4(beta1) - "Century" Xref: main.gmane.org gmane.emacs.gnus.general:12612 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:12612 --pgp-sign-Multipart_Thu_Oct_16_13:32:32_1997-1 Content-Type: multipart/mixed; boundary="Multipart_Thu_Oct_16_13:32:32_1997-1" Content-Transfer-Encoding: 7bit --Multipart_Thu_Oct_16_13:32:32_1997-1 Content-Type: text/plain; charset=US-ASCII Hello- I am only working with Gnus 5.5, so I don't know if this is fixed in Quassia, but given the discussion on xemacs-beta, it doesn't seem to be. In `message-make-fqdn', we get the result of `message-user-mail-address'. This can be nil, but we don't check that in `message-make-fqdn'. Here is the patch (and ChangeLog) against 5.5. I don't know the right way to handle this in XEmacs 19.16, 20.3 (pre-release), or the Gnus development cycle. I assume that Steve and Lars can work that out. --Multipart_Thu_Oct_16_13:32:32_1997-1 Content-Type: application/octet-stream Content-Disposition: attachment; filename="message-patch" Content-Transfer-Encoding: 8bit 1997-10-16 Colin Rafferty * message.el (message-make-fqdn): Made certain that user-mail is not nil. *** message.el~ Mon Oct 6 01:00:39 1997 --- message.el Thu Oct 16 13:11:29 1997 *************** *** 2652,2658 **** (string-match "\\." mail-host-address)) mail-host-address) ;; We try `user-mail-address' as a backup. ! ((and (string-match "\\." user-mail) (string-match "@\\(.*\\)\\'" user-mail)) (match-string 1 user-mail)) ;; Default to this bogus thing. --- 2652,2659 ---- (string-match "\\." mail-host-address)) mail-host-address) ;; We try `user-mail-address' as a backup. ! ((and user-mail ! (string-match "\\." user-mail) (string-match "@\\(.*\\)\\'" user-mail)) (match-string 1 user-mail)) ;; Default to this bogus thing. --Multipart_Thu_Oct_16_13:32:32_1997-1-- --pgp-sign-Multipart_Thu_Oct_16_13:32:32_1997-1 Content-Type: application/pgp-signature Content-Transfer-Encoding: 7bit -----BEGIN PGP MESSAGE----- Version: 2.6.3i Comment: Processed by Mailcrypt 3.4, an Emacs/PGP interface iQCVAwUBNEZPx6CXWENFE/FpAQHEaQP/WxMSxXJ/DAsQHBNL9HLGoc1rlg/M0DWH VccYcFhWcUkrQMRsRZwabON0jl1Y+NITPuTB6aqfp870TPYwhT2G4b/8XvSRMjan cv6kFbEK/kRJNRp8Q9o3dsQ8+SMJt0wXhwFFzL92S8Izs39ZaHxuMT7KdnrqyUFi pX/LxOJ8lBU= =4Uxd -----END PGP MESSAGE----- --pgp-sign-Multipart_Thu_Oct_16_13:32:32_1997-1--