emacs: content-type comparison should be case insensitive.

The function notmuch-match-content-type was comparing content types
case sensitively. Fix it so it tests case insensitively.

This fixes a bug where emacs would not include any body when replying
to a message with content-type TEXT/PLAIN.
This commit is contained in:
Mark Walters 2012-03-25 00:43:28 +00:00 committed by David Bremner
parent 46e73fe539
commit f57ef64302

View file

@ -185,8 +185,9 @@ the user hasn't set this variable with the old or new value."
(st2 (notmuch-split-content-type t2))) (st2 (notmuch-split-content-type t2)))
(if (or (string= (cadr st1) "*") (if (or (string= (cadr st1) "*")
(string= (cadr st2) "*")) (string= (cadr st2) "*"))
(string= (car st1) (car st2)) ;; Comparison of content types should be case insensitive.
(string= t1 t2)))) (string= (downcase (car st1)) (downcase (car st2)))
(string= (downcase t1) (downcase t2)))))
(defvar notmuch-multipart/alternative-discouraged (defvar notmuch-multipart/alternative-discouraged
'( '(