From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/54773 Path: main.gmane.org!not-for-mail From: Sam Steingold Newsgroups: gmane.emacs.gnus.general Subject: Re: follow-up & CC Date: Mon, 10 Nov 2003 14:26:57 -0500 Organization: disorganization Sender: ding-owner@lists.math.uh.edu Message-ID: References: Reply-To: sds@gnu.org NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1068492440 28555 80.91.224.253 (10 Nov 2003 19:27:20 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 10 Nov 2003 19:27:20 +0000 (UTC) Original-X-From: ding-owner+M3314@lists.math.uh.edu Mon Nov 10 20:27:17 2003 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AJHgy-00050i-00 for ; Mon, 10 Nov 2003 20:27:17 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1AJHgn-0002Lc-00; Mon, 10 Nov 2003 13:27:05 -0600 Original-Received: from justine.libertine.org ([66.139.78.221]) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1AJHgj-0002LX-00 for ding@lists.math.uh.edu; Mon, 10 Nov 2003 13:27:01 -0600 Original-Received: from main.gmane.org (main.gmane.org [80.91.224.249]) by justine.libertine.org (Postfix) with ESMTP id 6017C3A004B for ; Mon, 10 Nov 2003 13:27:00 -0600 (CST) Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 1AJHgh-00088h-00 for ; Mon, 10 Nov 2003 20:26:59 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-To: ding@gnus.org Original-Received: from sea.gmane.org ([80.91.224.252]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AJHgg-00088Z-00 for ; Mon, 10 Nov 2003 20:26:58 +0100 Original-Received: from news by sea.gmane.org with local (Exim 3.35 #1 (Debian)) id 1AJHgg-0007Pg-00 for ; Mon, 10 Nov 2003 20:26:58 +0100 Original-Lines: 46 Original-X-Complaints-To: usenet@sea.gmane.org X-Attribution: Sam X-Disclaimer: You should not expect anyone to agree with me. User-Agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3.50 (windows-nt) Cancel-Lock: sha1:3felrtyw360Vq18UMp6Mn5Hqs40= Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:54773 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:54773 > * Reiner Steib <4.hpr.03.e.f@aheshrefcnz.qr> [2003-11-10 19:54:29 +0100]: > > I changed the doc-string to reflect the new behavior (any suggestions > for better wording?): > > ,----[ C-h f message-insert-to RET ] > | Insert a To header that points to the author of the article being replied to. > | If the original author requested not to be sent mail, don't insert it. With > | the prefix argument FORCE, insert the header anyway. > `---- Another suggested change: when there is no reasonable reply-to address, `message-insert-to' will insert an empty "To: " field (like C-c C-f C-t `message-goto-to' does), which is undesirable when `message-insert-to' is run from `message-setup-hook'. Maybe the following is even better? (defun message-insert-to (&optional force) "Insert a To header that points to the author of the article being replied to. If the original author requested not to be sent mail, the function signals an error. With the prefix argument FORCE, insert the header anyway." (interactive "P") (let* ((co (message-fetch-reply-field "mail-copies-to")) (dont (and co (or (equal (downcase co) "never") (equal (downcase co) "nobody")))) (to (or (message-fetch-reply-field "mail-reply-to") (message-fetch-reply-field "reply-to") (message-fetch-reply-field "from")))) (when (and dont to) (message (if force "Ignoring the user request not to have copies sent via mail" "Complying with the user request not to have copies sent via mail"))) (when (and force (not to)) (error "no mail address in the article")) (when (and to (or force (not dont))) (message-carefully-insert-headers (list (cons 'To to)))))) -- Sam Steingold (http://www.podval.org/~sds) running w2k Only adults have difficulty with child-proof caps.