bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#32730: [PATCH] Respect case-insensite DelSp flow-fill parameter


From: Tom Tromey
Subject: bug#32730: [PATCH] Respect case-insensite DelSp flow-fill parameter
Date: Sat, 22 Jun 2019 08:31:19 -0600

From: Lars Ingebrigtsen <larsi@gnus.org>

* lisp/gnus/mm-view.el (mm-inline-text): The DelSp parameter is
case-insentitive, so make it work then it's "Yes" (bug#26775).
---
 lisp/gnus/mm-view.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/gnus/mm-view.el b/lisp/gnus/mm-view.el
index 849488293a..6ffa1fc168 100644
--- a/lisp/gnus/mm-view.el
+++ b/lisp/gnus/mm-view.el
@@ -22,7 +22,7 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'cl-lib))
+(require 'cl-lib)
 (require 'mail-parse)
 (require 'mailcap)
 (require 'mm-bodies)
@@ -359,8 +359,8 @@ mm-inline-text
       (save-restriction
        (narrow-to-region b (point))
        (goto-char b)
-       (fill-flowed nil (equal (cdr (assoc 'delsp (mm-handle-type handle)))
-                               "yes"))
+       (fill-flowed nil (cl-equalp (cdr (assoc 'delsp (mm-handle-type handle)))
+                                   "yes"))
        (goto-char (point-max))))
     (save-restriction
       (narrow-to-region b (point))
-- 
2.17.2






reply via email to

[Prev in Thread] Current Thread [Next in Thread]