changeset 46427:5360a8d2f694

* keyboard.c (Fevent_convert_list): Use SREF.
author Ken Raeburn <raeburn@raeburn.org>
date Tue, 16 Jul 2002 15:49:29 +0000
parents d7f3f0434d43
children 82755b55ec33
files src/keyboard.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/keyboard.c	Tue Jul 16 15:49:24 2002 +0000
+++ b/src/keyboard.c	Tue Jul 16 15:49:29 2002 +0000
@@ -6045,7 +6045,7 @@
 
   /* Let the symbol A refer to the character A.  */
   if (SYMBOLP (base) && SCHARS (SYMBOL_NAME (base)) == 1)
-    XSETINT (base, SDATA (SYMBOL_NAME (base))[0]);
+    XSETINT (base, SREF (SYMBOL_NAME (base), 0));
 
   if (INTEGERP (base))
     {