From 086b0123cf27a75f394b4c717233e9fc8e0adaf8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Mattias=20Engdeg=C3=A5rd?= Date: Fri, 10 May 2024 11:12:35 +0200 Subject: [PATCH] Adapt to changed invalid-read-syntax error in Emacs 30 --- relint.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/relint.el b/relint.el index 6bd82d2..7ca25f2 100644 --- a/relint.el +++ b/relint.el @@ -2500,7 +2500,8 @@ Return a list of (FORM . STARTING-POSITION)." (setq keep-going nil)) (invalid-read-syntax (cond - ((member (cadr err) '("#" "#=")) + ((let ((errstr (cadr err))) + (and (stringp errstr) (string-prefix-p "#" errstr))) (goto-char pos) (forward-sexp 1)) (t