File tree Expand file tree Collapse file tree 2 files changed +7
-4
lines changed Expand file tree Collapse file tree 2 files changed +7
-4
lines changed Original file line number Diff line number Diff line change @@ -77,6 +77,7 @@ TESTS are lists of the form (content (start end expected-face)*). For each test
7777check that each `expected-face` is found in `content` between `start` and `end`.
7878
7979DESCRIPTION is the description of the spec."
80+ (declare (indent 1 ))
8081 `(it , description
8182 (dolist (test (quote , tests ))
8283 (apply #'expect-faces-at test))))
@@ -797,8 +798,8 @@ DESCRIPTION is the description of the spec."
797798 (" (def foo \" usage\" \" hello\" )"
798799 (18 24 font-lock-string-face ))
799800
800- (" (def foo \" usage\" \n \" hello\" )"
801- (21 27 font-lock-string-face ))
801+ (" (def foo \" usage\" \n \" hello\" )"
802+ (21 27 font-lock-string-face ))
802803
803804 (" (def foo \n \" usage\" \" hello\" )"
804805 (13 19 font-lock-doc-face ))
@@ -864,8 +865,8 @@ DESCRIPTION is the description of the spec."
864865
865866 (when-fontifying-it " should handle keyword-meta"
866867 (" ^:meta-data"
867- (1 1 nil )
868- (2 11 clojure-keyword-face)))
868+ (1 1 nil )
869+ (2 11 clojure-keyword-face)))
869870
870871 (when-fontifying-it " should handle a keyword with allowed characters"
871872 (" :aaa#bbb"
Original file line number Diff line number Diff line change 3434
3535(defmacro with-clojure-buffer (text &rest body )
3636 " Create a temporary buffer, insert TEXT, switch to clojure-mode and evaluate BODY."
37+ (declare (indent 1 ))
3738 `(with-temp-buffer
3839 (erase-buffer )
3940 (insert , text )
4950BODY should contain the refactoring that transforms BEFORE into AFTER.
5051
5152DESCRIPTION is the description of the spec."
53+ (declare (indent 1 ))
5254 `(it , description
5355 (with-clojure-buffer , before
5456 ,@body
You can’t perform that action at this time.
0 commit comments