[nnimap] Lines: handling in Courier IMAP

[Daiki Ueno <ueno@unixuser.org>]

[-- Attachment #1: Type: text/plain, Size: 318 bytes --]

I switched to the Courier IMAP server, and I found that all the
articles have "0 lines" in the summary.

The attached patch will fix this. Can someone please apply?

2000-04-10   Daiki Ueno  <ueno@unixuser.org>

        * lisp/imap.el (imap-body-lines): Check Content-Type: of the
        article case insensitively.


[-- Attachment #2: imap.el.diff --]
[-- Type: text/plain, Size: 740 bytes --]

Index: imap.el
===================================================================
RCS file: /usr/local/cvsroot/gnus/lisp/imap.el,v
retrieving revision 1.13
diff -u -F^( -r1.13 imap.el
--- imap.el	2000/04/08 10:00:50	1.13
+++ imap.el	2000/04/11 15:07:19
@@ -1359,10 +1359,10 @@ (defun imap-body-lines (body)
   "Return number of lines in article by looking at the mime bodystructure BODY."
   (if (listp body)
       (if (stringp (car body))
-	  (cond ((and (string= (car body) "TEXT")
+	  (cond ((and (string= (upcase (car body)) "TEXT")
 		      (numberp (nth 7 body)))
 		 (nth 7 body))
-		((and (string= (car body) "MESSAGE")
+		((and (string= (upcase (car body)) "MESSAGE")
 		      (numberp (nth 9 body)))
 		 (nth 9 body))
 		(t 0))

[-- Attachment #3: Type: text/plain, Size: 15 bytes --]

-- 
Daiki Ueno