From 5a8186bcbfc761e96021033850d8958b4367e27f Mon Sep 17 00:00:00 2001
From: Jackson Ray Hamilton <jackson@jacksonrayhamilton.com>
Date: Sat, 30 May 2015 14:53:13 -0700
Subject: [PATCH] Color comments and strings inside defuns.

---
 context-coloring.el           | 3 ++-
 test/context-coloring-test.el | 1 +
 test/fixtures/let.el          | 1 +
 3 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/context-coloring.el b/context-coloring.el
index 180752c60..9a5f02216 100644
--- a/context-coloring.el
+++ b/context-coloring.el
@@ -512,7 +512,8 @@ generated by `js2-mode'."
         ;; Skip it.
         (goto-char start)
         (forward-sexp)))))
-    (context-coloring-elisp-pop-scope)))
+    (context-coloring-elisp-pop-scope)
+    (context-coloring-elisp-colorize-comments-and-strings-in-region start end)))
 
 (defun context-coloring-elisp-colorize-lambda ()
   (context-coloring-elisp-colorize-defun t))
diff --git a/test/context-coloring-test.el b/test/context-coloring-test.el
index a4b31d512..85b700e8d 100644
--- a/test/context-coloring-test.el
+++ b/test/context-coloring-test.el
@@ -1139,6 +1139,7 @@ ssssssssssss0"))
   (lambda ()
     (context-coloring-test-assert-coloring "
 1111 11
+      cccccccccc
       11 01
       11 00001
       11 2222 22
diff --git a/test/fixtures/let.el b/test/fixtures/let.el
index 11637b133..5507b4731 100644
--- a/test/fixtures/let.el
+++ b/test/fixtures/let.el
@@ -1,4 +1,5 @@
 (let (a
+      ;; comment
       (b a)
       (c free)
       (d (let (a
-- 
2.39.2