From: Dave Love Date: Mon, 2 Jun 2003 18:49:29 +0000 (+0000) Subject: (Qutf_8): New. X-Git-Tag: ttn-vms-21-2-B4~9792 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ecf488bc2597fb2c269d3d8481ed65e4c0b55b10;p=emacs.git (Qutf_8): New. (syms_of_coding): Intern it. --- 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);