diff options
| author | Stefan Monnier | 2008-03-03 04:12:46 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2008-03-03 04:12:46 +0000 |
| commit | 62dc3ac3540670addcc4891d3725e37ae17af321 (patch) | |
| tree | 2b8883ae57cf4ac441208aabaa0fb8d41bf7a91f | |
| parent | a88fd51a1fe1f5a89e428269a4761d84912e57c2 (diff) | |
| download | emacs-62dc3ac3540670addcc4891d3725e37ae17af321.tar.gz emacs-62dc3ac3540670addcc4891d3725e37ae17af321.zip | |
(nndoc-oe-dbx-type-p): Use mm-string-to-multibyte.
| -rw-r--r-- | lisp/gnus/ChangeLog | 1 | ||||
| -rw-r--r-- | lisp/gnus/nndoc.el | 4 |
2 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 2440a735b15..4c6dad5872b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -7,6 +7,7 @@ | |||
| 7 | well. Similar changes might be needed elsewhere, but that's the one I've | 7 | well. Similar changes might be needed elsewhere, but that's the one I've |
| 8 | bumped into during my use. | 8 | bumped into during my use. |
| 9 | 9 | ||
| 10 | * nndoc.el (nndoc-oe-dbx-type-p): | ||
| 10 | * gnus-msg.el (gnus-debug): | 11 | * gnus-msg.el (gnus-debug): |
| 11 | * gnus-group.el (gnus-update-group-mark-positions): | 12 | * gnus-group.el (gnus-update-group-mark-positions): |
| 12 | Use mm-string-to-multibyte. | 13 | Use mm-string-to-multibyte. |
diff --git a/lisp/gnus/nndoc.el b/lisp/gnus/nndoc.el index f9455edfd5a..dbaaa4d71a9 100644 --- a/lisp/gnus/nndoc.el +++ b/lisp/gnus/nndoc.el | |||
| @@ -689,7 +689,7 @@ from the document.") | |||
| 689 | (looking-at "JMF")) | 689 | (looking-at "JMF")) |
| 690 | 690 | ||
| 691 | (defun nndoc-oe-dbx-type-p () | 691 | (defun nndoc-oe-dbx-type-p () |
| 692 | (looking-at (mm-string-as-multibyte "\317\255\022\376"))) | 692 | (looking-at (mm-string-to-multibyte "\317\255\022\376"))) |
| 693 | 693 | ||
| 694 | (defun nndoc-read-little-endian () | 694 | (defun nndoc-read-little-endian () |
| 695 | (+ (prog1 (char-after) (forward-char 1)) | 695 | (+ (prog1 (char-after) (forward-char 1)) |
| @@ -1027,5 +1027,5 @@ symbol in the alist." | |||
| 1027 | 1027 | ||
| 1028 | (provide 'nndoc) | 1028 | (provide 'nndoc) |
| 1029 | 1029 | ||
| 1030 | ;;; arch-tag: f5c2970e-0387-47ac-a0b3-6cc317dffabe | 1030 | ;; arch-tag: f5c2970e-0387-47ac-a0b3-6cc317dffabe |
| 1031 | ;;; nndoc.el ends here | 1031 | ;;; nndoc.el ends here |