[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 67576b5 72/79: Skip all insignificant expression prefixes.
From: |
Jackson Ray Hamilton |
Subject: |
[elpa] master 67576b5 72/79: Skip all insignificant expression prefixes. |
Date: |
Sun, 14 Jun 2015 00:05:47 +0000 |
branch: master
commit 67576b5ed1b07e448ea13dedb613c4543c907caf
Author: Jackson Ray Hamilton <address@hidden>
Commit: Jackson Ray Hamilton <address@hidden>
Skip all insignificant expression prefixes.
---
context-coloring.el | 5 ++---
test/context-coloring-test.el | 2 +-
test/fixtures/ignored.el | 2 +-
3 files changed, 4 insertions(+), 5 deletions(-)
diff --git a/context-coloring.el b/context-coloring.el
index fc82548..a9bcdac 100644
--- a/context-coloring.el
+++ b/context-coloring.el
@@ -908,10 +908,9 @@ point. It could be a quoted or backquoted expression."
start
end)
(cond
- ((or (= char context-coloring-APOSTROPHE-CHAR)
- (= char context-coloring-OCTOTHORPE-CHAR))
+ ((/= char context-coloring-BACKTICK-CHAR)
(context-coloring-elisp-forward-sexp))
- ((= char context-coloring-BACKTICK-CHAR)
+ (t
(setq start (point))
(setq end (progn (forward-sexp)
(point)))
diff --git a/test/context-coloring-test.el b/test/context-coloring-test.el
index 56d072c..291b36a 100644
--- a/test/context-coloring-test.el
+++ b/test/context-coloring-test.el
@@ -1131,7 +1131,7 @@ ssssssssssss0"))
(lambda ()
(context-coloring-test-assert-coloring "
(xxxxx x ()
- (x x 1 11 11 111 111 11 11 1 111 (1 1 1)))")))
+ (x x 1 11 11 111 111 11 11 11 1 111 (1 1 1)))")))
(context-coloring-test-deftest-emacs-lisp sexp
(lambda ()
diff --git a/test/fixtures/ignored.el b/test/fixtures/ignored.el
index ce7774e..1f5fd42 100644
--- a/test/fixtures/ignored.el
+++ b/test/fixtures/ignored.el
@@ -1,2 +1,2 @@
(defun a ()
- (+ a 1 +1 -1 1.0 #x0 \a :a t nil (0 . 0)))
+ (+ a 1 +1 -1 1.0 #x0 ,a \a :a t nil (0 . 0)))
- [elpa] master f870598 59/79: Fix infinite loop when parsing let., (continued)
- [elpa] master f870598 59/79: Fix infinite loop when parsing let., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 3c7a00d 55/79: Add lazy coloring., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 08e2981 63/79: Swallow scan errors., Jackson Ray Hamilton, 2015/06/13
- [elpa] master ec9f04d 64/79: Update emacs lisp support in readme., Jackson Ray Hamilton, 2015/06/13
- [elpa] master d2e08e8 62/79: Improve and test lazy coloring., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 46a9193 65/79: Find the edges of the screen more efficiently., Jackson Ray Hamilton, 2015/06/13
- [elpa] master fd4bc95 66/79: Add dolist support., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 9edc6c3 69/79: Checkdoc cleanup., Jackson Ray Hamilton, 2015/06/13
- [elpa] master e2ceef9 57/79: Prepend function symbols with octothorpes., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 22403b7 61/79: Cover parsing edge cases., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 67576b5 72/79: Skip all insignificant expression prefixes.,
Jackson Ray Hamilton <=
- [elpa] master 306335e 71/79: Add defadvice support., Jackson Ray Hamilton, 2015/06/13
- [elpa] master acf15ae 70/79: Remove if., Jackson Ray Hamilton, 2015/06/13
- [elpa] master ed870d8 68/79: Refactor minor mode definition., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 72a0998 73/79: Add quote and backquote function support., Jackson Ray Hamilton, 2015/06/13
- [elpa] master a4a136c 74/79: Refactor defun / defadvice name handling., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 69ea835 67/79: Refactor elisp parsers using helper functions., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 9b436c0 76/79: Fully recolor later after a fast recolor., Jackson Ray Hamilton, 2015/06/13
- [elpa] master 40f67bf 78/79: Version 6.4.0., Jackson Ray Hamilton, 2015/06/13
- [elpa] master c81eecb 58/79: Update function names and docstrings., Jackson Ray Hamilton, 2015/06/13
- [elpa] master f7c6dcb 75/79: Refactor callee dispatching., Jackson Ray Hamilton, 2015/06/13