Re: [Bug: 21.4.18] gnus 5.10.7 not rendering Latin-1 headers

[Reiner Steib <reinersteib+gmane@imap.cc>]

On Sun, Feb 19 2006, Mike Kupfer wrote:

> mm-coding-system-p appears to be trying to figure out what coding system
> interface to use, 

[ This is the relevant code: ]

,----[ `mm-util.el' ]
| (defun mm-coding-system-p (cs)
|   "Return non-nil if CS is a symbol naming a coding system.
| In XEmacs, also return non-nil if CS is a coding system object.
| If CS is available, return CS itself in Emacs, and return a coding
| system object in XEmacs."
|   (if (fboundp 'find-coding-system)
|       (and cs (find-coding-system cs))
|     (if (fboundp 'coding-system-p)
| 	(when (coding-system-p cs)
| 	  cs)
|       ;; Is this branch ever actually useful?
|       (car (memq cs (mm-get-coding-system-list))))))
`----

So "Is this branch ever actually useful?" is used in non-MULE XEmacs.

> with the choices being find-coding-system, coding-system-p, and
> mm-get-coding-system-list.  Are any of these standard Emacs or
> XEmacs interfaces?

`coding-system-p' is a standard Emacs interface:

,----[ (info "(elisp)Lisp and Coding Systems") ]
|  -- Function: coding-system-p object
|      This function returns `t' if OBJECT is a coding system name or
|      `nil'.
`----

The function `find-coding-system' doesn't exist in Emacs 21/22.

In case it wasn't obvious: mm-coding-system-list (the function) is
aliased to "ignore" if (fbound 'coding-system-list) is nil.

Leaving this for the XEmacs folks...
> The docstring for mm-coding-system-p says it returns "a coding system
> object in XEmacs".  The XEmacs Lisp reference talks about coding
> systems, under MULE.  Does that mean that coding system objects only
> exist in MULE XEmacs?  What should (mm-coding-system-p 'iso-8859-1)
> return in non-MULE XEmacs?

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/