diff options
| author | Kenichi Handa | 2009-07-13 01:03:28 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2009-07-13 01:03:28 +0000 |
| commit | fb6b6049d8e787691e859a43f41ec85741f042fb (patch) | |
| tree | 00d02b744263c5958d577c29e48a024a09ddd514 /src/cmds.c | |
| parent | 7b607b7356756158f971497e7066e365c52bd664 (diff) | |
| download | emacs-fb6b6049d8e787691e859a43f41ec85741f042fb.tar.gz emacs-fb6b6049d8e787691e859a43f41ec85741f042fb.zip | |
(internal_self_insert): Check sym by SYMBOLP before
calling XSYMBOL (sym).
Diffstat (limited to 'src/cmds.c')
| -rw-r--r-- | src/cmds.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/cmds.c b/src/cmds.c index 60916705c97..33472b5710b 100644 --- a/src/cmds.c +++ b/src/cmds.c | |||
| @@ -492,7 +492,7 @@ internal_self_insert (c, noautofill) | |||
| 492 | /* If we expanded an abbrev which has a hook, | 492 | /* If we expanded an abbrev which has a hook, |
| 493 | and the hook has a non-nil `no-self-insert' property, | 493 | and the hook has a non-nil `no-self-insert' property, |
| 494 | return right away--don't really self-insert. */ | 494 | return right away--don't really self-insert. */ |
| 495 | if (! NILP (sym) && ! NILP (XSYMBOL (sym)->function) | 495 | if (SYMBOLP (sym) && ! NILP (sym) && ! NILP (XSYMBOL (sym)->function) |
| 496 | && SYMBOLP (XSYMBOL (sym)->function)) | 496 | && SYMBOLP (XSYMBOL (sym)->function)) |
| 497 | { | 497 | { |
| 498 | Lisp_Object prop; | 498 | Lisp_Object prop; |