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.

Reply via email to