diff options
Diffstat (limited to 'elisp.el')
| -rw-r--r-- | elisp.el | 16 |
1 files changed, 10 insertions, 6 deletions
@@ -214,17 +214,21 @@ PARSE-START is the starting position of the parse." (any-quoted-p nil) (point nil)) (or - (when-let (char (char-before last)) - (or (char-equal char ?') - (char-equal char ?`))) + (let ((char (char-before point))) + (cond + (char + (or (char-equal char ?') + (char-equal char ?`))))) (progn (while (and rest (not any-quoted-p)) (setq point (pop rest)) (setq any-quoted-p (or - (when-let (char (char-before point)) - (or (char-equal char ?') - (char-equal char ?`))) + (let ((char (char-before point))) + (cond + (char + (or (char-equal char ?') + (char-equal char ?`))))) (save-excursion (goto-char (1+ point)) (looking-at-p |
