diff options
| author | Dave Love <fx@gnu.org> | 2003-06-02 18:49:29 +0000 |
|---|---|---|
| committer | Dave Love <fx@gnu.org> | 2003-06-02 18:49:29 +0000 |
| commit | ecf488bc2597fb2c269d3d8481ed65e4c0b55b10 (patch) | |
| tree | de48185d3d94be4af97301ab795d15f0825738e8 | |
| parent | 3db9e31e5e0a140a67f5b8c6bc31205684c6d77d (diff) | |
| download | emacs-ecf488bc2597fb2c269d3d8481ed65e4c0b55b10.tar.gz emacs-ecf488bc2597fb2c269d3d8481ed65e4c0b55b10.tar.bz2 emacs-ecf488bc2597fb2c269d3d8481ed65e4c0b55b10.zip | |
(Qutf_8): New.
(syms_of_coding): Intern it.
| -rw-r--r-- | src/coding.c | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/coding.c b/src/coding.c index 2982dd3c86f..a7484b42711 100644 --- a/src/coding.c +++ b/src/coding.c @@ -399,6 +399,8 @@ Lisp_Object Qcoding_system_p, Qcoding_system_error; end-of-line format. */ Lisp_Object Qemacs_mule, Qraw_text; +Lisp_Object Qutf_8; + /* Coding-systems are handed between Emacs Lisp programs and C internal routines by the following three variables. */ /* Coding-system for reading files and receiving data from process. */ @@ -7584,6 +7586,9 @@ syms_of_coding () Qraw_text = intern ("raw-text"); staticpro (&Qraw_text); + Qutf_8 = intern ("utf-8"); + staticpro (&Qutf_8); + defsubr (&Scoding_system_p); defsubr (&Sread_coding_system); defsubr (&Sread_non_nil_coding_system); |