We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent ac53b3b commit 015cbf8Copy full SHA for 015cbf8
test/clojure-mode-indentation-test.el
@@ -422,11 +422,12 @@ x
422
`(with-temp-buffer
423
(clojure-mode)
424
(insert "\n" ,(replace-regexp-in-string " +" " " form))
425
+ ;; This is to check that we did NOT align anything. Run
426
+ ;; `indent-region' and then check that no extra spaces
427
+ ;; where inserted besides the start of the line.
428
(indent-region (point-min) (point-max))
- (should (equal (buffer-substring-no-properties
- (point-min) (point-max))
- ,(concat "\n" (replace-regexp-in-string
429
- "\\([a-z]\\) +" "\\1 " form))))))
+ (goto-char (point-min))
430
+ (should-not (search-forward-regexp "\\([^\s\n]\\) +" nil 'noerror))))
431
forms))))
432
433
(def-full-align-test basic
0 commit comments