Mercurial > emacs
comparison lisp/gnus/nnrss.el @ 90982:a66921565bcb
Merge from emacs--devo--0
Patches applied:
* emacs--devo--0 (patch 806-813)
- Merge from emacs--rel--22
- Update from CVS
* emacs--rel--22 (patch 51-58)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 233-236)
- Merge from emacs--devo--0
- Update from CVS
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-230
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Sun, 15 Jul 2007 04:47:46 +0000 |
| parents | f0705c4da65a |
| children | 24202b793a08 |
comparison
equal
deleted
inserted
replaced
| 90981:a37d5bf6cbb7 | 90982:a66921565bcb |
|---|---|
| 83 ARTICLE is the article number of the current headline.") | 83 ARTICLE is the article number of the current headline.") |
| 84 | 84 |
| 85 (defvar nnrss-file-coding-system mm-universal-coding-system | 85 (defvar nnrss-file-coding-system mm-universal-coding-system |
| 86 "Coding system used when reading and writing files.") | 86 "Coding system used when reading and writing files.") |
| 87 | 87 |
| 88 (defvar nnrss-compatible-encoding-alist '((iso-8859-1 . windows-1252)) | 88 (defvar nnrss-compatible-encoding-alist |
| 89 (delq nil (mapcar (lambda (elem) | |
| 90 (if (and (mm-coding-system-p (car elem)) | |
| 91 (mm-coding-system-p (cdr elem))) | |
| 92 elem)) | |
| 93 mm-charset-override-alist)) | |
| 89 "Alist of encodings and those supersets. | 94 "Alist of encodings and those supersets. |
| 90 The cdr of each element is used to decode data if it is available when | 95 The cdr of each element is used to decode data if it is available when |
| 91 the car is what the data specify as the encoding. Or, the car is used | 96 the car is what the data specify as the encoding. Or, the car is used |
| 92 for decoding when the cdr that the data specify is not available.") | 97 for decoding when the cdr that the data specify is not available.") |
| 93 | 98 |