From 20e788ae73d52e5829cc82ef99bb597229dd73b8 Mon Sep 17 00:00:00 2001
From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Fri, 19 Jul 2024 14:18:29 -0400
Subject: [PATCH] * lisp/progmodes/peg.el (peg-syntax-classes): Typo
 (bug#72131)

(cherry picked from commit a478423d19fe320972fc319dd2cf7fdbca914754)
---
 lisp/progmodes/peg.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/peg.el b/lisp/progmodes/peg.el
index d19a48c3294..96334162195 100644
--- a/lisp/progmodes/peg.el
+++ b/lisp/progmodes/peg.el
@@ -698,7 +698,7 @@ rulesets defined previously with `define-peg-ruleset'."
 (cl-defmethod peg--translate ((_ (eql guard)) exp) exp)
 
 (defvar peg-syntax-classes
-  '((whitespace ?-) (word ?w) (symbol ?s) (punctuation ?.)
+  '((whitespace ?-) (word ?w) (symbol ?_) (punctuation ?.)
     (open ?\() (close ?\)) (string ?\") (escape ?\\) (charquote ?/)
     (math ?$) (prefix ?') (comment ?<) (endcomment ?>)
     (comment-fence ?!) (string-fence ?|)))
-- 
2.39.5