Skip to content

Commit f59191d

Browse files
committed
Fix dangling parens in more scenarios
1 parent 618fe06 commit f59191d

File tree

2 files changed

+10
-1
lines changed

2 files changed

+10
-1
lines changed

clojure-mode.el

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1678,7 +1678,6 @@ Return nil if there are no more levels to unwind."
16781678
(newline-and-indent)
16791679
(clojure--remove-superfluous-parens)
16801680
;; cljr #255 Fix dangling parens
1681-
(backward-up-list)
16821681
(forward-sexp)
16831682
(when (looking-back "^\\s-*)+\\s-*" (line-beginning-position))
16841683
(join-line))

test/clojure-mode-refactor-threading-test.el

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -306,6 +306,16 @@
306306
(beginning-of-buffer)
307307
(clojure-thread-last-all nil))
308308

309+
(def-threading-test last-dangling-parens-2
310+
"(deftask dev []
311+
(comp (serve)
312+
(cljs)))"
313+
"(->> (cljs)
314+
(comp (serve))
315+
(deftask dev []))"
316+
(beginning-of-buffer)
317+
(clojure-thread-last-all nil))
318+
309319
;; fix for clojure-emacs/clj-refactor.el#259
310320
(def-threading-test last-leaves-multiline-sexp-alone
311321
"(->> [a b]

0 commit comments

Comments
 (0)