mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-20 20:50:53 -08:00
Code Issues Projects Releases Wiki Activity

(Vchar_coding_system_table, Qchar_coding_system):

Browse source 
Removed.
(Fset_coding_system_priority, Fset_coding_system_priority)
(Fdefine_coding_system_internal): Doc fix.
This commit is contained in:
Dave Love 2002-05-17 16:25:23 +00:00
parent 04c2f2c57c
commit 1fcd6c8b99
1 changed files with 4 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

21
src/coding.c
View file

@ -402,10 +402,6 @@ Lisp_Object Vdefault_process_coding_system;
to avoid infinite recursive call. */
static int inhibit_pre_post_conversion;
/* Char-table containing safe coding systems of each character. */
Lisp_Object Vchar_coding_system_table;
Lisp_Object Qchar_coding_system;
/* Two special coding systems. */
Lisp_Object Vsjis_coding_system;
Lisp_Object Vbig5_coding_system;
@ -7105,7 +7101,8 @@ usage: (find-operation-coding-system OPERATION ARGUMENTS ...) */)
DEFUN ("set-coding-system-priority", Fset_coding_system_priority,
Sset_coding_system_priority, 1, MANY, 0,
doc: /* Put higher priority to coding systems of the arguments. */)
doc: /* Assign higher priority to coding systems given as arguments.
usage: (set-coding-system-priority CODING-SYSTEM ...) */)
(nargs, args)
int nargs;
Lisp_Object *args;
@ -7200,7 +7197,8 @@ make_subsidiaries (base)
DEFUN ("define-coding-system-internal", Fdefine_coding_system_internal,
Sdefine_coding_system_internal, coding_arg_max, MANY, 0,
doc: /* For internal use only. */)
doc: /* For internal use only.
usage: (define-coding-system-internal ...) */)
(nargs, args)
int nargs;
Lisp_Object *args;
@ -7857,10 +7855,6 @@ syms_of_coding ()
DEFSYM (Qtranslation_table_for_decode, "translation-table-for-decode");
DEFSYM (Qtranslation_table_for_encode, "translation-table-for-encode");
DEFSYM (Qchar_coding_system, "char-coding-system");
Fput (Qchar_coding_system, Qchar_table_extra_slots, make_number (2));
DEFSYM (Qvalid_codes, "valid-codes");
DEFSYM (Qemacs_mule, "emacs-mule");
@ -8145,13 +8139,6 @@ coding system used in each operation can't encode the text.
The default value is `select-safe-coding-system' (which see). */);
Vselect_safe_coding_system_function = Qnil;
DEFVAR_LISP ("char-coding-system-table", &Vchar_coding_system_table,
doc: /*
Char-table containing safe coding systems of each characters.
Each element doesn't include such generic coding systems that can
encode any characters. They are in the first extra slot. */);
Vchar_coding_system_table = Fmake_char_table (Qchar_coding_system, Qnil);
DEFVAR_BOOL ("inhibit-iso-escape-detection",
&inhibit_iso_escape_detection,
doc: /*