Re: Bad value in file-coding-system-alist

[Katsumi Yamaoka]

>>>>> Katsumi Yamaoka wrote:

>> I guess the reason the `coding-system' widget doesn't check whether
>> the value is a coding system is for the coding systems that are
>> defined afterward, e.g., the ones to be autoloaded.

> Therefore, I modified the `coding-system' widget only for
> `file-coding-system-alist' so that it may not issue an error
> signal when the value is a function.  Committed in both
> the Emacs trunk and the EMACS_22_BASE branch.

Oops.  The fix I committed was incorrect.  I've fixed it again
in the trunk and the EMACS_22_BASE branch.  The following patch
for the Emacs 22.1 release represents what I did:

*** cus-start.el~       Thu Apr 12 03:05:31 2007
--- cus-start.el        Mon Jul  9 01:33:47 2007
***************
*** 122,129 ****
                                  :value (undecided . undecided)
                                  (coding-system :tag "Decoding")
                                  (coding-system :tag "Encoding"))
!                           (coding-system :tag "Single coding system"
!                                          :value undecided)
                            (function :value ignore))))
             (selection-coding-system mule coding-system)
             ;; dired.c
--- 122,132 ----
                                  :value (undecided . undecided)
                                  (coding-system :tag "Decoding")
                                  (coding-system :tag "Encoding"))
!                           (coding-system
!                            :tag "Single coding system"
!                            :value undecided
!                            :match (lambda (widget value)
!                                     (and value (not (functionp value)))))
                            (function :value ignore))))
             (selection-coding-system mule coding-system)
             ;; dired.c

Regards,