branch: master commit d146af86733a72ce098768f96fbb77f401bba06e Author: Jackson Ray Hamilton <jack...@jacksonrayhamilton.com> Commit: Jackson Ray Hamilton <jack...@jacksonrayhamilton.com>
Fix string coloring. --- context-coloring.el | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/context-coloring.el b/context-coloring.el index e566ce4..44f63dc 100644 --- a/context-coloring.el +++ b/context-coloring.el @@ -658,12 +658,13 @@ provide visually \"instant\" updates at 60 frames per second.") (defun context-coloring-elisp-colorize-string () (let ((start (point)) - (syntax-code (context-coloring-get-syntax-code))) + syntax-code) (context-coloring-elisp-increment-sexp-count) ;; Move past the opening string delimiter. (forward-char) (while (progn (skip-syntax-forward "^\\\"") + (setq syntax-code (context-coloring-get-syntax-code)) (cond ((= syntax-code context-coloring-ESCAPE-CODE) ;; If there was an escape char, keep going.