From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: John Mastro Newsgroups: gmane.emacs.help Subject: Re: sending a buffer by mail Date: Wed, 30 Aug 2017 18:55:47 -0700 Message-ID: References: <05596771-5F19-4254-848C-77F6E66233A6@gmail.com> <87a82gfxyl.fsf@ericabrahamsen.net> <85C51987-1B1D-494B-A2A1-700190E68A73@gmail.com> <871snsd0e1.fsf@ericabrahamsen.net> <87tw0obkxz.fsf@ericabrahamsen.net> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset="UTF-8" X-Trace: blaine.gmane.org 1504144604 12262 195.159.176.226 (31 Aug 2017 01:56:44 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Thu, 31 Aug 2017 01:56:44 +0000 (UTC) Cc: Eric Abrahamsen To: "help-gnu-emacs@gnu.org" Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Thu Aug 31 03:56:39 2017 Return-path: Envelope-to: geh-help-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dnEie-0002dT-QN for geh-help-gnu-emacs@m.gmane.org; Thu, 31 Aug 2017 03:56:32 +0200 Original-Received: from localhost ([::1]:53529 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dnEil-00025d-U0 for geh-help-gnu-emacs@m.gmane.org; Wed, 30 Aug 2017 21:56:39 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:34063) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dnEiI-00025M-5u for help-gnu-emacs@gnu.org; Wed, 30 Aug 2017 21:56:10 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dnEiH-00046n-Et for help-gnu-emacs@gnu.org; Wed, 30 Aug 2017 21:56:10 -0400 Original-Received: from mail-qt0-x231.google.com ([2607:f8b0:400d:c0d::231]:32890) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dnEiH-00046X-Af for help-gnu-emacs@gnu.org; Wed, 30 Aug 2017 21:56:09 -0400 Original-Received: by mail-qt0-x231.google.com with SMTP id e2so34688778qta.0 for ; Wed, 30 Aug 2017 18:56:09 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=mime-version:in-reply-to:references:from:date:message-id:subject:to :cc; bh=FTPPmglyzAHvB4pq+9VCjoK4/FxWiaf/o23E5c4c5tk=; b=u2OVpxlYP0NbwuBiUTCKYBlVDwbQGetILtyjpVuWQMX73kblOa4EA+UamOe9Kb2o5P mPfqYN6XO/is+2GGoxMo9Nv8pmTspSbJox3XqYUSRuk6u0mKLtHB/WuEC2QUQZ5SwiC4 nIjXF8XkqEBwvEoUYqJyj1xUBS765uL2VwDtnVnxkRg20tQTv50PJVJMBb6wmHbNxgVu g+UlRHaVccJ8jt4+cANT3ua834Z2RqSymPZPyi12lzfNl1YRKxkQkJmGcaZ4ZNKcMGgK h9wbq71HSThDDMf/DS7AYhShDT620hjfC1gMmgMkS22qXWaU7F4Cfg4LAVYPeySwIRLt 2eKw== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:in-reply-to:references:from:date :message-id:subject:to:cc; bh=FTPPmglyzAHvB4pq+9VCjoK4/FxWiaf/o23E5c4c5tk=; b=iQt1808JeuiWgmwZ656T7p949FV4LxdldnE+JsN5/hd4hhuXRxBk+XhXWQb4uxEN9b 8HDr084Xjtz801fxnNI7qiB+oH7NdLm+b99dBN5i6OoLQaJO+Obc3vL4DLV/1rGwU4pq YlJICYLHwQJf/stgHBfn9BwrwXYuoYhM7aJ9L/2AhUlCpX3LH6J+EvNh5wroJkAGlkvZ fdVli1bdJFt2vh0FPP7YmCMakcX9pG2P2in2LujErbH2UHHn2wnTxwhj26+09YvOnfgA 06BgfgxCM2Ezjy62sNgKs4wnoTKmhaTMyCpOLL+S5L7Dv/bwB/AKYKHAN/JWEH6AkwQi DaaQ== X-Gm-Message-State: AHPjjUjyH+p3jRBPPJPhQtLgWpvwjgb0uD1gMz/gJRpWHgDxB5c5x+JP S7EgSFAnKg5YPZSbiquxpwxqBqK4XVDh1RQ= X-Received: by 10.200.14.72 with SMTP id j8mr5201534qti.340.1504144568198; Wed, 30 Aug 2017 18:56:08 -0700 (PDT) Original-Received: by 10.237.59.215 with HTTP; Wed, 30 Aug 2017 18:55:47 -0700 (PDT) In-Reply-To: <87tw0obkxz.fsf@ericabrahamsen.net> X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-Received-From: 2607:f8b0:400d:c0d::231 X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "help-gnu-emacs" Xref: news.gmane.org gmane.emacs.help:114145 Archived-At: Eric Abrahamsen wrote: >> Well, that sounds like a very thin wrapper around insert-buffer: >> >> (defun send-buffer-as-mail () >> (interactive) >> (let ((str (buffer-string))) >> (compose-mail) >> (message-goto-body) >> (insert str))) > > This will be nicer: > > (defun send-buffer-as-mail () > (interactive) > (let ((str (buffer-string))) > (compose-mail) > (save-excursion > (message-goto-body) > (insert str)))) The difference is likely irrelevant, but you can still use `insert-buffer' rather than consing a string of the buffer's contents: (defun send-buffer-as-mail () (interactive) (let ((buf (current-buffer))) (compose-mail) (save-excursion (message-goto-body) (insert-buffer buf))))