From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/67083 Path: news.gmane.org!not-for-mail From: Uwe Brauer Newsgroups: gmane.emacs.gnus.general Subject: Re: BUG: ngnus-0.10 can't send messages Date: Wed, 25 Jun 2008 13:33:32 +0200 Message-ID: <87y74tycj7.fsf@mat.ucm.es> References: <87od60tp06.fsf@mat.ucm.es> <87hcbpkcb7.fsf@mat.ucm.es> <4860C51B.5030604@mat.ucm.es> <87r6anned5.fsf@mat.ucm.es> Reply-To: Uwe Brauer NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: ger.gmane.org 1214393719 12933 80.91.229.12 (25 Jun 2008 11:35:19 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 25 Jun 2008 11:35:19 +0000 (UTC) To: ding@gnus.org Original-X-From: ding-owner+M15549@lists.math.uh.edu Wed Jun 25 13:36:03 2008 Return-path: Envelope-to: ding-account@gmane.org Original-Received: from util0.math.uh.edu ([129.7.128.18]) by lo.gmane.org with esmtp (Exim 4.50) id 1KBTI3-0004dF-By for ding-account@gmane.org; Wed, 25 Jun 2008 13:35:55 +0200 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by util0.math.uh.edu with smtp (Exim 4.63) (envelope-from ) id 1KBTG8-0005KJ-8t; Wed, 25 Jun 2008 06:33:56 -0500 Original-Received: from mx2.math.uh.edu ([129.7.128.33]) by util0.math.uh.edu with esmtps (TLSv1:AES256-SHA:256) (Exim 4.63) (envelope-from ) id 1KBTG6-0005K6-KH for ding@lists.math.uh.edu; Wed, 25 Jun 2008 06:33:54 -0500 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtp (Exim 4.67) (envelope-from ) id 1KBTFz-0007MS-3X for ding@lists.math.uh.edu; Wed, 25 Jun 2008 06:33:54 -0500 Original-Received: from main.gmane.org ([80.91.229.2] helo=ciao.gmane.org) by quimby.gnus.org with esmtp (Exim 3.35 #1 (Debian)) id 1KBTGF-0001Hs-00 for ; Wed, 25 Jun 2008 13:34:03 +0200 Original-Received: from list by ciao.gmane.org with local (Exim 4.43) id 1KBTFs-0000Vb-UZ for ding@gnus.org; Wed, 25 Jun 2008 11:33:40 +0000 Original-Received: from maportatil12.quim.ucm.es ([147.96.6.137]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 25 Jun 2008 11:33:40 +0000 Original-Received: from oub by maportatil12.quim.ucm.es with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 25 Jun 2008 11:33:40 +0000 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 34 Original-X-Complaints-To: usenet@ger.gmane.org X-Gmane-NNTP-Posting-Host: maportatil12.quim.ucm.es X-Hashcash: 1:20:080625:gmane.emacs.gnus.general::KaHRt0deXBCGeF8q:00000000000000000000000000000000000002gTJ User-Agent: Gnus/5.110009 (No Gnus v0.9) XEmacs/21.4.19 (linux) Cancel-Lock: sha1:hnp84+hK852JUX7bhBHn1EoQcCI= X-Spam-Score: -2.5 (--) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:67083 Archived-At: >>>>> "Katsumi" == Katsumi Yamaoka writes: >>>>> Reiner Steib wrote: >> Fix it to handle non-nil ALL correctly. > Yup, it's exactly the solution. Maybe those advices can be > simply replaced with: > (defadvice mail-extract-address-components (after capitalize first activate) > "Capitalize names." > (dolist (adrs (if (ad-get-arg 1) > ad-return-value > (and ad-return-value (list ad-return-value)))) > (if (car adrs) > (setcar adrs (capitalize (car adrs)))))) > (defadvice mail-extract-address-components (after capitalize-mc last activate) > "Fix capitalization of \"Mc\" names, e.g. \"Mcdonald\" -> \"McDonald\"." > (let ((case-fold-search nil) > full-name start) > (dolist (adrs (if (ad-get-arg 1) > ad-return-value > (and ad-return-value (list ad-return-value)))) > (when (setq full-name (car adrs)) > (setq start 0) > (while (string-match "\\ (aset full-name (match-beginning 1) > (upcase (aref full-name (match-beginning 1)))) > (setq start (match-end 0))))))) Thanks for that code. Uwe