From: Zajcev Evgeny <zevlg@yandex.ru>
Date: Thu, 17 Dec 2020 08:27:20 +0000 (+0300)
Subject: Make "Invalid modifier in string" ordinary invalid-read-syntax error
X-Git-Tag: emacs-28.0.90~4678
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=02c4f65a1ea5d55a569a559bb181c6df5171319b;p=emacs.git

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'
---

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