Respect case-insensite DelSp flow-fill parameter

* lisp/gnus/mm-view.el (mm-inline-text): The DelSp parameter is
case-insentitive, so make it work then it's "Yes" (bug#26775).
This commit is contained in:
Lars Ingebrigtsen 2019-06-22 16:25:36 +02:00
parent d038d31c37
commit 9b766d3be3

View file

@ -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 @@
(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))