Bug in gnus pop3-munge-message-separator

[Kim F. Storm]

For some time, gnus (from emacs CVS) wasn't able to receive mail
from one of my mail accounts (it barfs about nil is not a string).

I tracked this down to messages with an empty Date: header.

The following patch fixes this.  I don't know if this is the proper
way to fix it, but at least it works...

Index: pop3.el
===================================================================
RCS file: /cvs/emacs/lisp/gnus/pop3.el,v
retrieving revision 1.17
diff -c -r1.17 pop3.el
*** pop3.el     15 Jul 2001 16:15:34 -0000      1.17
--- pop3.el     11 Apr 2002 13:36:56 -0000
***************
*** 245,251 ****
                   (looking-at "BABYL OPTIONS:") ; Babyl
                   ))
          (let ((from (mail-strip-quoted-names (mail-fetch-field "From")))
!               (date (split-string (or (mail-fetch-field "Date")
                                        (pop3-make-date))
                                    " "))
                (From_))
--- 245,252 ----
                   (looking-at "BABYL OPTIONS:") ; Babyl
                   ))
          (let ((from (mail-strip-quoted-names (mail-fetch-field "From")))
!               (date (split-string (or (let ((df (mail-fetch-field "Date")))
!                                         (if (and df (stringp df) (> (length 
df) 0)) df))
                                        (pop3-make-date))
                                    " "))
                (From_))

-- 
Kim F. Storm  http://www.cua.dk