Skip to content

Commit 328fb6c

Browse files
authored
Speed up threading fns by turning off blink delay
The `delete-pair` function in lisp.el will intentionally wait to show a blink. There's no need for that when running `clojure-thread`.
1 parent e311868 commit 328fb6c

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

clojure-mode.el

+2-1
Original file line numberDiff line numberDiff line change
@@ -2311,7 +2311,8 @@ With universal argument \\[universal-argument], fully unwind thread."
23112311
(defun clojure--remove-superfluous-parens ()
23122312
"Remove extra parens from a form."
23132313
(when (looking-at "([^ )]+)")
2314-
(delete-pair)))
2314+
(let ((delete-pair-blink-delay 0))
2315+
(delete-pair))))
23152316

23162317
(defun clojure--thread-first ()
23172318
"Thread a nested sexp using ->."

0 commit comments

Comments
 (0)