From 774b9a602e825a67746ab90cc42ac015e4a26da5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 5 May 2010 13:51:40 -0400 Subject: [PATCH] * syntax.c (Fchar_syntax): Check the arg is a character. Fixes: debbugs:6080 --- src/ChangeLog | 4 ++++ src/syntax.c | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/src/ChangeLog b/src/ChangeLog index 20c6034f06d..2178f219cf8 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2010-05-05 Stefan Monnier + + * syntax.c (Fchar_syntax): Check the arg is a character (bug#6080). + 2010-05-05 Lawrence Mitchell * m/sparc.h: Fix typo in earlier change. diff --git a/src/syntax.c b/src/syntax.c index a80f047e43c..4741fa260d2 100644 --- a/src/syntax.c +++ b/src/syntax.c @@ -858,7 +858,7 @@ are listed in the documentation of `modify-syntax-entry'. */) Lisp_Object character; { int char_int; - CHECK_NUMBER (character); + CHECK_CHARACTER (character); char_int = XINT (character); SETUP_BUFFER_SYNTAX_TABLE (); return make_number (syntax_code_spec[(int) SYNTAX (char_int)]); -- 2.39.2