diff options
| author | Gemini Lasswell <gazally@runbox.com> | 2017-02-10 11:35:20 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2017-02-10 11:35:20 +0200 |
| commit | c48f8fa51b51746ffd39f7b973c471cd60994c8e (patch) | |
| tree | a0ad4fa631fe43fb85d91844b06305d696ecfef2 /lisp/emacs-lisp | |
| parent | 2d284db5c9c5ff23269e2ec277f5348abdf1cd47 (diff) | |
| download | emacs-c48f8fa51b51746ffd39f7b973c471cd60994c8e.tar.gz | |
Fix instrumenting code with propertized strings in Edebug
* lisp/emacs-lisp/edebug.el (edebug-read-function): Allow
'read' to decide what is and isn't a syntax error. (Bug#25068)
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ec0f08de356..a8838046a4d 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -880,11 +880,9 @@ Maybe clear the markers and delete the symbol's edebug property?" (list (edebug-storing-offsets (- (point) 2) 'function) (edebug-read-storing-offsets stream))) - ((memq (following-char) '(?: ?B ?O ?X ?b ?o ?x ?1 ?2 ?3 ?4 ?5 ?6 - ?7 ?8 ?9 ?0)) + (t (backward-char 1) - (read stream)) - (t (edebug-syntax-error "Bad char after #")))) + (read stream)))) (defun edebug-read-list (stream) (forward-char 1) ; skip \( |