Mercurial > emacs
comparison lisp/mail/rmailmm.el @ 106339:656eabdc03be
(rmail-mime-handle): Doc fix.
(rmail-mime-show): Downcase the encoding. (Bug#5070)
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Tue, 01 Dec 2009 03:13:03 +0000 |
| parents | 3f65383da746 |
| children | 1d1d5d9bd884 |
comparison
equal
deleted
inserted
replaced
| 106338:8241fe93acbf | 106339:656eabdc03be |
|---|---|
| 327 "Handle the current buffer as a MIME part. | 327 "Handle the current buffer as a MIME part. |
| 328 The current buffer should be narrowed to the respective body, and | 328 The current buffer should be narrowed to the respective body, and |
| 329 point should be at the beginning of the body. | 329 point should be at the beginning of the body. |
| 330 | 330 |
| 331 CONTENT-TYPE, CONTENT-DISPOSITION, and CONTENT-TRANSFER-ENCODING | 331 CONTENT-TYPE, CONTENT-DISPOSITION, and CONTENT-TRANSFER-ENCODING |
| 332 are the values of the respective parsed headers. The parsed | 332 are the values of the respective parsed headers. The latter should |
| 333 headers for CONTENT-TYPE and CONTENT-DISPOSITION have the form | 333 be downcased. The parsed headers for CONTENT-TYPE and CONTENT-DISPOSITION |
| 334 have the form | |
| 334 | 335 |
| 335 \(VALUE . ALIST) | 336 \(VALUE . ALIST) |
| 336 | 337 |
| 337 In other words: | 338 In other words: |
| 338 | 339 |
| 406 (mail-fetch-field "Content-Type") | 407 (mail-fetch-field "Content-Type") |
| 407 content-transfer-encoding | 408 content-transfer-encoding |
| 408 (mail-fetch-field "Content-Transfer-Encoding") | 409 (mail-fetch-field "Content-Transfer-Encoding") |
| 409 content-disposition | 410 content-disposition |
| 410 (mail-fetch-field "Content-Disposition"))))) | 411 (mail-fetch-field "Content-Disposition"))))) |
| 411 (if content-type | 412 ;; Per RFC 2045, C-T-E is case insensitive (bug#5070), but the others |
| 412 (setq content-type (mail-header-parse-content-type | 413 ;; are not completely so. Hopefully mail-header-parse-* DTRT. |
| 413 content-type)) | 414 (if content-transfer-encoding |
| 414 ;; FIXME: Default "message/rfc822" in a "multipart/digest" | 415 (setq content-transfer-encoding (downcase content-transfer-encoding))) |
| 415 ;; according to RFC 2046. | 416 (setq content-type |
| 416 (setq content-type '("text/plain"))) | 417 (if content-type |
| 418 (mail-header-parse-content-type content-type) | |
| 419 ;; FIXME: Default "message/rfc822" in a "multipart/digest" | |
| 420 ;; according to RFC 2046. | |
| 421 '("text/plain"))) | |
| 417 (setq content-disposition | 422 (setq content-disposition |
| 418 (if content-disposition | 423 (if content-disposition |
| 419 (mail-header-parse-content-disposition content-disposition) | 424 (mail-header-parse-content-disposition content-disposition) |
| 420 ;; If none specified, we are free to choose what we deem | 425 ;; If none specified, we are free to choose what we deem |
| 421 ;; suitable according to RFC 2183. We like inline. | 426 ;; suitable according to RFC 2183. We like inline. |