Commit cfd70f33 authored by Dave Love's avatar Dave Love
Browse files

(Fchar_or_string_p): Doc fix. Use CHARACTERP.

parent 8f7e5042
......@@ -443,11 +443,11 @@ DEFUN ("byte-code-function-p", Fbyte_code_function_p, Sbyte_code_function_p,
}
DEFUN ("char-or-string-p", Fchar_or_string_p, Schar_or_string_p, 1, 1, 0,
doc: /* Return t if OBJECT is a character (an integer) or a string. */)
doc: /* Return t if OBJECT is a character or a string. */)
(object)
register Lisp_Object object;
{
if (INTEGERP (object) || STRINGP (object))
if (CHARACTERP (object) || STRINGP (object))
return Qt;
return Qnil;
}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment