]> git.eshelyaron.com Git - emacs.git/commitdiff
Make "Invalid modifier in string" ordinary invalid-read-syntax error
authorZajcev Evgeny <zevlg@yandex.ru>
Thu, 17 Dec 2020 08:27:20 +0000 (11:27 +0300)
committerStefan Monnier <monnier@iro.umontreal.ca>
Thu, 17 Dec 2020 15:40:51 +0000 (10:40 -0500)
* src/lread.ec (read1): Raise "Invalid modifier in string" error as
  `invalid-read-syntax'.  This fixes raise of unhandled error in
  `elisp--local-variables'

src/lread.c

index a3d5fd7bb81b471d89a069bdcd6e7a719c8bfe89..3ef874039a6b695d7c19d102cca9b8bc27bc7ce5 100644 (file)
@@ -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