diff --git a/src/parsers/command-utils.lisp b/src/parsers/command-utils.lisp index 5a0073f..4383ab3 100644 --- a/src/parsers/command-utils.lisp +++ b/src/parsers/command-utils.lisp @@ -30,7 +30,7 @@ (defrule ignore-whitespace (* whitespace) (:constant nil)) -(defrule punct (or #\, #\- #\_) +(defrule punct (or #\, #\- #\_ #\$ #\%) (:text t)) (defrule namestring (and (or #\_ (alpha-char-p character))