From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/75803 Path: news.gmane.org!not-for-mail From: Chong Yidong Newsgroups: gmane.emacs.gnus.general Subject: Re: bug#7596: 23.2.90; fill-flowed with DELETE-SPACE option does not work Date: Sat, 22 Jan 2011 14:31:52 -0500 Message-ID: <877hdwzqdz.fsf@stupidchicken.com> References: <82bp4vn7wv.wl%kzhr@d1.dion.ne.jp> NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1295724754 4506 80.91.229.12 (22 Jan 2011 19:32:34 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Sat, 22 Jan 2011 19:32:34 +0000 (UTC) Cc: Kazuhiro Ito , 7596@debbugs.gnu.org To: ding@gnus.org Original-X-From: ding-owner+M24153@lists.math.uh.edu Sat Jan 22 20:32:28 2011 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.69) (envelope-from ) id 1PgjCF-0001CD-NO for ding-account@gmane.org; Sat, 22 Jan 2011 20:32:28 +0100 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 1PgjC7-00028n-M4; Sat, 22 Jan 2011 13:32:19 -0600 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 1PgjC6-00028g-M0 for ding@lists.math.uh.edu; Sat, 22 Jan 2011 13:32:18 -0600 Original-Received: from quimby.gnus.org ([80.91.231.51]) by mx2.math.uh.edu with esmtp (Exim 4.72) (envelope-from ) id 1PgjC1-0002zO-KW for ding@lists.math.uh.edu; Sat, 22 Jan 2011 13:32:18 -0600 Original-Received: from vm-emlprdomr-05.its.yale.edu ([130.132.50.146]) by quimby.gnus.org with esmtp (Exim 4.72) (envelope-from ) id 1PgjC0-0006MY-EW for ding@gnus.org; Sat, 22 Jan 2011 20:32:12 +0100 Original-Received: from furball (c-71-192-165-84.hsd1.ct.comcast.net [71.192.165.84]) (authenticated bits=0) by vm-emlprdomr-05.its.yale.edu (8.14.4/8.14.4) with ESMTP id p0MJVq2M030217 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-SHA bits=256 verify=NOT); Sat, 22 Jan 2011 14:31:53 -0500 Original-Received: by furball (Postfix, from userid 1000) id 5FE681611FB; Sat, 22 Jan 2011 14:31:52 -0500 (EST) In-Reply-To: <82bp4vn7wv.wl%kzhr@d1.dion.ne.jp> (Kazuhiro Ito's message of "Thu, 09 Dec 2010 08:48:00 +0900") User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) X-Scanned-By: MIMEDefang 2.71 on 130.132.50.146 X-Spam-Score: -1.9 (-) List-ID: Precedence: bulk Xref: news.gmane.org gmane.emacs.gnus.general:75803 Archived-At: Kazuhiro Ito writes: > (with-temp-buffer > (insert "ABC \nDEF") > (fill-flowed nil t) > (buffer-string)) > It returns > "ABC > DEF" > But I expect > "ABCDEF" > I expect DELETE-SPACE option corresponds to "DelSp" parameter in > RFC3676 and works so. Plesse see attached patch. Could a Gnus developer please review Kazuhiro Ito's patch? Thanks. --- lisp/gnus/flow-fill.el 2010-01-13 08:35:10 +0000 +++ lisp/gnus/flow-fill.el 2010-12-08 10:14:13 +0000 @@ -106,8 +106,6 @@ (forward-line 1)) (goto-char (point-min)) (while (re-search-forward " $" nil t) - (when delete-space - (delete-char -1)) (when (save-excursion (beginning-of-line) (looking-at "^\\(>*\\)\\( ?\\)")) @@ -135,6 +133,8 @@ (replace-match (if (string= (match-string 2) " ") "" "\\2"))) (backward-delete-char -1) + (when delete-space + (delete-char -1)) (end-of-line)) (unless sig (condition-case nil