From: Stefan Kangas <stefankangas@gmail.com>
Date: Fri, 18 Nov 2022 10:59:07 +0000 (+0100)
Subject: Avoid raw control characters in grm-wy-boot.el
X-Git-Tag: emacs-29.0.90~1616^2~53
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7571768c6c37d6202f65f18dff33f485a04729fb;p=emacs.git

Avoid raw control characters in grm-wy-boot.el

* lisp/cedet/semantic/grm-wy-boot.el
(semantic-grammar-wy--parse-table): Don't use raw control characters.
---

diff --git a/lisp/cedet/semantic/grm-wy-boot.el b/lisp/cedet/semantic/grm-wy-boot.el
index 376fab89c23..7fff36a3d02 100644
--- a/lisp/cedet/semantic/grm-wy-boot.el
+++ b/lisp/cedet/semantic/grm-wy-boot.el
@@ -396,12 +396,12 @@
 	      (let
 		  ((s $1))
 	        (if
-		    (string-match "^{[
\n	 ]*" s)
+                    (string-match "^{[\^M\n	 ]*" s)
 		    (setq s
 			  (substring s
 				     (match-end 0))))
 	        (if
-		    (string-match "[
\n	 ]*}$" s)
+                    (string-match "[\^M\n	 ]*}$" s)
 		    (setq s
 			  (substring s 0
 				     (match-beginning 0))))