* lisp/progmodes/peg.el (peg-syntax-classes): Typo (bug#72131)

diff --git a/lisp/progmodes/peg.el b/lisp/progmodes/peg.el
index d19a48c3294d0407fc0b4be1602d5d16eff28684..963341621955fd835b9e9ff6f2c0367fd0507912 100644 (file)
--- 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 ?|)))