diff options
| author | Lars Ingebrigtsen | 2019-10-28 13:31:37 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-10-28 13:31:37 +0100 |
| commit | 2864c5201d5c4ddfcfe1e8f2fca4168077c7f44f (patch) | |
| tree | 2b356e0e2af29fcdf0210293599a614c9d7ab3bf | |
| parent | 3478f2f3d6ccd8c9921b03870261b13d5b6c8ba2 (diff) | |
| download | emacs-2864c5201d5c4ddfcfe1e8f2fca4168077c7f44f.tar.gz emacs-2864c5201d5c4ddfcfe1e8f2fca4168077c7f44f.zip | |
Be more permissive when interpreting IMAP mail headers
* lisp/gnus/nnimap.el (nnimap-transform-headers): Some mail
doesn't have space after the colon of the header name. Don't
ignore these.
| -rw-r--r-- | lisp/gnus/nnimap.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 1ec5522831d..856ac75cd66 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el | |||
| @@ -271,8 +271,8 @@ textual parts.") | |||
| 271 | (save-excursion | 271 | (save-excursion |
| 272 | (forward-line) | 272 | (forward-line) |
| 273 | (null (looking-at-p | 273 | (null (looking-at-p |
| 274 | ;; We're expecting a mail header. | 274 | ;; We're expecting a mail-ish header. |
| 275 | "^[!-9;-~]+:[[:space:]]")))) | 275 | "^[!-9;-~]+:[[:space:]]?")))) |
| 276 | (delete-region (line-beginning-position) | 276 | (delete-region (line-beginning-position) |
| 277 | (1+ (line-end-position))) | 277 | (1+ (line-end-position))) |
| 278 | (setq lines nil) | 278 | (setq lines nil) |