From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Richard Stallman Newsgroups: gmane.emacs.devel Subject: Re: Sending attachments Date: Wed, 08 Jul 2009 14:34:15 -0400 Message-ID: References: <87k52rzyn1.fsf@benthic.rattlesnake.com> <873a9fw6dt.fsf@catnip.gol.com> <87y6r7yp1y.fsf@stupidchicken.com> <87ljn1dcc4.fsf@stupidchicken.com> Reply-To: rms@gnu.org NNTP-Posting-Host: lo.gmane.org Content-Type: text/plain; charset=ISO-8859-15 X-Trace: ger.gmane.org 1247078077 9957 80.91.229.12 (8 Jul 2009 18:34:37 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Wed, 8 Jul 2009 18:34:37 +0000 (UTC) Cc: cyd@stupidchicken.com, miles@gnu.org, ams@gnu.org, monnier@iro.umontreal.ca, emacs-devel@gnu.org To: Andreas Schwab Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Wed Jul 08 20:34:29 2009 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by lo.gmane.org with esmtp (Exim 4.50) id 1MObyP-0004uM-2s for ged-emacs-devel@m.gmane.org; Wed, 08 Jul 2009 20:34:29 +0200 Original-Received: from localhost ([127.0.0.1]:32920 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MObyO-0007EG-HL for ged-emacs-devel@m.gmane.org; Wed, 08 Jul 2009 14:34:28 -0400 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MObyJ-0007DL-Q5 for emacs-devel@gnu.org; Wed, 08 Jul 2009 14:34:23 -0400 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MObyE-0007Bi-Iy for emacs-devel@gnu.org; Wed, 08 Jul 2009 14:34:23 -0400 Original-Received: from [199.232.76.173] (port=39199 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MObyE-0007Bf-C3 for emacs-devel@gnu.org; Wed, 08 Jul 2009 14:34:18 -0400 Original-Received: from fencepost.gnu.org ([140.186.70.10]:48435) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1MObyD-0007ec-Rq for emacs-devel@gnu.org; Wed, 08 Jul 2009 14:34:18 -0400 Original-Received: from rms by fencepost.gnu.org with local (Exim 4.67) (envelope-from ) id 1MObyB-0003zC-SO; Wed, 08 Jul 2009 14:34:15 -0400 In-reply-to: (message from Andreas Schwab on Wed, 08 Jul 2009 11:46:54 +0200) X-detected-operating-system: by monty-python.gnu.org: GNU/Linux 2.6, seldom 2.4 (older, 4) X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:112188 Archived-At: That's what mml-preview is for. It isn't mentioned in the Emacs-Mime manual. Its doc string seems to say it displays the message with Gnus, which is not what I want to do. I did manage to preview the mime text by executing (mml-to-mime). (That interface is not satisfactory.) But now, after looking at the code of mml-preview, I wonder whether that is enough. The code of mml-preview does things I do not understand the purpose of. Here's what the code does, leading up to the call to mml-to-mime. Why is this needed? What does this do? (mml-preview-insert-mail-followup-to) (let ((message-deletable-headers (if (message-news-p) nil message-deletable-headers))) (message-generate-headers (copy-sequence (if (message-news-p) message-required-news-headers message-required-mail-headers)))) (if (re-search-forward (concat "^" (regexp-quote mail-header-separator) "\n") nil t) (replace-match "\n")) (let ((mail-header-separator ""));; mail-header-separator is removed. (message-sort-headers) (mml-to-mime))