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:
parent
d038d31c37
commit
9b766d3be3
1 changed files with 3 additions and 3 deletions
|
@ -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))
|
||||
|
|
Loading…
Add table
Reference in a new issue