diff options
| author | Zajcev Evgeny <zevlg@yandex.ru> | 2020-12-17 11:27:20 +0300 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2020-12-17 10:40:51 -0500 |
| commit | 02c4f65a1ea5d55a569a559bb181c6df5171319b (patch) | |
| tree | f9caf7e5eaec35bdabaa4d2c5ad5659176f4719e /src/lread.c | |
| parent | 526abadd071e8c2cd67b91c2e282b44e01917fdb (diff) | |
| download | emacs-02c4f65a1ea5d55a569a559bb181c6df5171319b.tar.gz emacs-02c4f65a1ea5d55a569a559bb181c6df5171319b.tar.bz2 emacs-02c4f65a1ea5d55a569a559bb181c6df5171319b.zip | |
Make "Invalid modifier in string" ordinary invalid-read-syntax error
* src/lread.ec (read1): Raise "Invalid modifier in string" error as
`invalid-read-syntax'. This fixes raise of unhandled error in
`elisp--local-variables'
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lread.c b/src/lread.c index a3d5fd7bb81..3ef874039a6 100644 --- a/src/lread.c +++ b/src/lread.c @@ -3438,7 +3438,7 @@ read1 (Lisp_Object readcharfun, int *pch, bool first_in_list) /* Any modifiers remaining are invalid. */ if (modifiers) - error ("Invalid modifier in string"); + invalid_syntax ("Invalid modifier in string"); p += CHAR_STRING (ch, (unsigned char *) p); } else |