diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2022-06-19 14:25:37 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2022-06-19 14:25:44 +0200 |
| commit | d181e410fcb26a293e8345fad54507d275fc807c (patch) | |
| tree | ed07b0a79f74347164d1c87906177cb9e9d35e57 /lisp/emacs-lisp/edebug.el | |
| parent | d60d96ffa0d1992b0177a34ff09aa7efea279862 (diff) | |
| download | emacs-d181e410fcb26a293e8345fad54507d275fc807c.tar.gz | |
Fix edebug parsing of .,
* lisp/emacs-lisp/edebug.el (edebug-next-token-class): Parse .,
correctly (bug#37653).
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ad66cfc2b81..b05ec3a7683 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -675,7 +675,7 @@ Maybe clear the markers and delete the symbol's edebug property?" (or (and (eq (aref edebug-read-syntax-table (following-char)) 'symbol) (not (= (following-char) ?\;))) - (memq (following-char) '(?\, ?\.))))) + (eq (following-char) ?.)))) 'symbol (aref edebug-read-syntax-table (following-char)))) |