# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1247446971 0
# Node ID 82a4881dbc9d08086177ea135d1e3af54621558c
# Parent  dc7bbd1d517e36880dd1887794e9907340a4cb8b
(internal_self_insert): Check sym by SYMBOLP before
calling XSYMBOL (sym).

diff -r dc7bbd1d517e -r 82a4881dbc9d src/cmds.c
--- a/src/cmds.c	Sun Jul 12 19:45:36 2009 +0000
+++ b/src/cmds.c	Mon Jul 13 01:02:51 2009 +0000
@@ -492,7 +492,7 @@
       /* If we expanded an abbrev which has a hook,
 	 and the hook has a non-nil `no-self-insert' property,
 	 return right away--don't really self-insert.  */
-      if (! NILP (sym) && ! NILP (XSYMBOL (sym)->function)
+      if (SYMBOLP (sym) && ! NILP (sym) && ! NILP (XSYMBOL (sym)->function)
 	  && SYMBOLP (XSYMBOL (sym)->function))
 	{
 	  Lisp_Object prop;