Signal `invalid-read-syntax' for "trailing garbage"
* src/minibuf.c (string_to_object): Signal `invalid-read-syntax' instead of the generic `error' for "trailing garbage following expression" (bug#24649).
This commit is contained in:
parent
e8f3390dea
commit
4982fd95c7
1 changed files with 2 additions and 1 deletions
|
|
@ -169,7 +169,8 @@ string_to_object (Lisp_Object val, Lisp_Object defalt)
|
|||
{
|
||||
int c = SREF (val, i);
|
||||
if (c != ' ' && c != '\t' && c != '\n')
|
||||
error ("Trailing garbage following expression");
|
||||
xsignal1 (Qinvalid_read_syntax,
|
||||
build_string ("Trailing garbage following expression"));
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue