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`.
clojure-emacs · Feb 2, 2022 · 328fb6c · 328fb6c
1 parent e311868
commit 328fb6c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/clojure-mode.el b/clojure-mode.el
@@ -2311,7 +2311,8 @@ With universal argument \\[universal-argument], fully unwind thread."
 (defun clojure--remove-superfluous-parens ()
   "Remove extra parens from a form."
   (when (looking-at "([^ )]+)")
-    (delete-pair)))
+    (let ((delete-pair-blink-delay 0))
+      (delete-pair))))
 
 (defun clojure--thread-first ()
   "Thread a nested sexp using ->."