bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Katsumi Yamaoka
Subject: Re: Bad value in file-coding-system-alist
Date: Sat, 07 Jul 2007 10:43:51 +0900
User-agent: Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50 (gnu/linux)

>>>>> "Lennart Borgman (gmail)" <address@hidden> wrote:

> But is this really the right fix? It looks to me like there is a more
> general bug in customize, please see the message I sent after the one
> you responded to hear.

I see.  Thanks.  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.  So, I think the right fix is to check whether the
value is not a function.  A new patch is below.  WDYT?

*** cus-start.el~       Tue Jul  3 14:41:31 2007
--- cus-start.el        Sat Jul  7 01:41:21 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,134 ----
                                  :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
!                                          (symbolp value)
!                                          (not (functionp value)))))
                            (function :value ignore))))
             (selection-coding-system mule coding-system)
             ;; dired.c

P.S. I'm sorry I'm inactive in the net every weekend.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]