martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(Fcoding_system_p): Return t for auto-loading coding system.

Browse Source
This commit is contained in:
Kenichi Handa
2003-10-07 23:35:01 +00:00
parent b2bd66f3e7
commit c2164d91db
2 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/ChangeLog
View File

@@ -1,3 +1,8 @@
2003-10-08 Kenichi Handa <handa@m17n.org>
* coding.c (Fcoding_system_p): Return t for auto-loading coding
system.
2003-10-07 Kenichi Handa <handa@m17n.org>
* coding.c (Qcoding_system_define_form): New variable.

2
src/coding.c
View File

@@ -6333,6 +6333,8 @@ about coding-system objects. */)
return Qt;
if (!SYMBOLP (obj))
return Qnil;
if (! NILP (Fget (obj, Qcoding_system_define_form)))
return Qt;
/* Get coding-spec vector for OBJ. */
obj = Fget (obj, Qcoding_system);
return ((VECTORP (obj) && XVECTOR (obj)->size == 5)