changeset 51406:3c675181c3d8

(Qutf_8): New. (syms_of_coding): Intern it.
author Dave Love <fx@gnu.org>
date Mon, 02 Jun 2003 18:49:29 +0000
parents c3e680aa1a51
children cb89e76907df
files src/coding.c
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/coding.c	Mon Jun 02 18:48:55 2003 +0000
+++ b/src/coding.c	Mon Jun 02 18:49:29 2003 +0000
@@ -399,6 +399,8 @@
    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 @@
   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);