Skip to content

Commit 855bc2c

Browse files
committed
Clean up the indentation config logic
* Converted the type of `clojure-indent-style` to symbol for consistency with Emacs configuration practices. * Removed some legacy code related to clojure-defun-style-default-indent.
1 parent ec97912 commit 855bc2c

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

clojure-mode-indentation-test.el

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -58,7 +58,7 @@ values of customisable variables."
5858
(let ((fname (intern (format "indentation/%s" description))))
5959
`(ert-deftest ,fname ()
6060
(let* ((after ,after)
61-
(clojure-indent-style :always-align)
61+
(clojure-indent-style 'always-align)
6262
(expected-cursor-pos (1+ (s-index-of "|" after)))
6363
(expected-state (delete ?| after))
6464
,@var-bindings)
@@ -238,14 +238,14 @@ values of customisable variables."
238238
(declare (indent 1))
239239
(when (stringp style)
240240
(setq forms (cons style forms))
241-
(setq style :always-align))
241+
(setq style 'always-align))
242242
`(ert-deftest ,(intern (format "test-backtracking-%s" name)) ()
243243
(progn
244244
,@(mapcar (lambda (form)
245245
`(with-temp-buffer
246246
(clojure-mode)
247247
(insert "\n" ,(replace-regexp-in-string "\n +" "\n " form))
248-
(let ((clojure-indent-style ,style))
248+
(let ((clojure-indent-style (quote ,style)))
249249
(indent-region (point-min) (point-max)))
250250
(should (equal (buffer-string)
251251
,(concat "\n" form)))))
@@ -463,7 +463,7 @@ x
463463
3))")
464464

465465
(def-full-indent-test align-arguments
466-
:align-arguments
466+
'align-arguments
467467
"(some-function
468468
10
469469
1
@@ -473,7 +473,7 @@ x
473473
2)")
474474

475475
(def-full-indent-test always-indent
476-
:always-indent
476+
'always-indent
477477
"(some-function
478478
10
479479
1

0 commit comments

Comments
 (0)