From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Mark Lillibridge Newsgroups: gmane.emacs.bugs Subject: bug#7743: bug #7743: unrmail loses extra blank line at end of message [PATCH] Date: Sun, 13 Nov 2011 11:59:58 -0800 Message-ID: References: Reply-To: mark.lillibridge@hp.com NNTP-Posting-Host: lo.gmane.org X-Trace: dough.gmane.org 1321214442 20071 80.91.229.12 (13 Nov 2011 20:00:42 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sun, 13 Nov 2011 20:00:42 +0000 (UTC) To: 7743@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sun Nov 13 21:00:38 2011 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RPgEI-0007Rf-CY for geb-bug-gnu-emacs@m.gmane.org; Sun, 13 Nov 2011 21:00:38 +0100 Original-Received: from localhost ([::1]:53144 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RPgEH-0004e7-JE for geb-bug-gnu-emacs@m.gmane.org; Sun, 13 Nov 2011 15:00:37 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:48121) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RPgEE-0004dr-A0 for bug-gnu-emacs@gnu.org; Sun, 13 Nov 2011 15:00:35 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RPgED-00081b-G1 for bug-gnu-emacs@gnu.org; Sun, 13 Nov 2011 15:00:34 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:46763) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RPgED-00081X-EU for bug-gnu-emacs@gnu.org; Sun, 13 Nov 2011 15:00:33 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1RPgEg-0000UW-8I for bug-gnu-emacs@gnu.org; Sun, 13 Nov 2011 15:01:02 -0500 X-Loop: help-debbugs@gnu.org In-Reply-To: Resent-From: Mark Lillibridge Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sun, 13 Nov 2011 20:01:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 7743 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: Original-Received: via spool by 7743-submit@debbugs.gnu.org id=B7743.13212144391859 (code B ref 7743); Sun, 13 Nov 2011 20:01:02 +0000 Original-Received: (at 7743) by debbugs.gnu.org; 13 Nov 2011 20:00:39 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RPgEF-0000To-61 for submit@debbugs.gnu.org; Sun, 13 Nov 2011 15:00:38 -0500 Original-Received: from gundega.hpl.hp.com ([192.6.19.190]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RPgEC-0000Tf-Hp for 7743@debbugs.gnu.org; Sun, 13 Nov 2011 15:00:33 -0500 Original-Received: from mailhub-pa1.hpl.hp.com (mailhub-pa1.hpl.hp.com [15.25.115.25]) by gundega.hpl.hp.com (8.14.4/8.14.4/HPL-PA Relay) with ESMTP id pADK00F0014658 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NOT) for <7743@debbugs.gnu.org>; Sun, 13 Nov 2011 12:00:00 -0800 Original-Received: from ts-rhel5 (ts-rhel5.hpl.hp.com [15.25.118.27]) by mailhub-pa1.hpl.hp.com (8.14.3/8.14.3/HPL-PA Hub) with ESMTP id pADJxwmd013642; Sun, 13 Nov 2011 11:59:58 -0800 X-Scanned-By: MIMEDefang 2.71 on 15.0.48.190 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Sun, 13 Nov 2011 15:01:02 -0500 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:53874 Archived-At: The automatic system seems not to have noticed, but I provided a patch for this bug: ts-rhel5 [124]% ( setenv LC_ALL C ; setenv TZ UTC0 ; diff -Naur original-unrmail.el unrmail.el) --- original-unrmail.el 2011-11-13 19:57:25.156549000 +0000 +++ unrmail.el 2011-11-13 19:58:34.826505000 +0000 @@ -232,10 +232,9 @@ (while (search-forward "\nFrom " nil t) (forward-char -5) (insert ?>))) - ;; Make sure the message ends with two newlines + ;; Add terminator blank line to message (goto-char (point-max)) - (unless (looking-back "\n\n") - (insert "\n")) + (insert "\n") ;; Write it to the output file, suitably encoded. (let ((coding-system-for-write coding)) (write-region (point-min) (point-max) to-file t