]> git.eshelyaron.com Git - emacs.git/commitdiff
Respect case-insensite DelSp flow-fill parameter
authorLars Ingebrigtsen <larsi@gnus.org>
Sat, 22 Jun 2019 14:25:36 +0000 (16:25 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Sat, 22 Jun 2019 14:25:36 +0000 (16:25 +0200)
* 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

index 849488293a72083fc175645f56d5126d9b80ac8f..6ffa1fc168ddc29401f0d9771c00f32621f64a33 100644 (file)
@@ -22,7 +22,7 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'cl-lib))
+(require 'cl-lib)
 (require 'mail-parse)
 (require 'mailcap)
 (require 'mm-bodies)
       (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))