More indentation fixes

Author: bbatsov

src/cider/nrepl/middleware/stacktrace.clj

@@ -237,13 +237,13 @@
 
 (def spec-abbrev
   (delay
-   (if (try (require 'clojure.spec) true
-            (catch Throwable _ false))
-     (resolve 'clojure.spec/abbrev)
-     (if (try (require 'clojure.spec.alpha) true
-              (catch Throwable _ false))
-       (resolve 'clojure.spec.alpha/abbrev)
-       #'identity))))
+    (if (try (require 'clojure.spec) true
+             (catch Throwable _ false))
+      (resolve 'clojure.spec/abbrev)
+      (if (try (require 'clojure.spec.alpha) true
+               (catch Throwable _ false))
+        (resolve 'clojure.spec.alpha/abbrev)
+        #'identity))))
 
 (defn prepare-spec-data
   "Prepare spec problems for display in user stacktraces.

src/cider/nrepl/middleware/util/error_handling.clj

@@ -14,15 +14,15 @@
 
 (def ^:private print-cause-trace
   (delay
-   (do
-     (require 'clojure.stacktrace)
-     (resolve 'clojure.stacktrace/print-cause-trace))))
+    (do
+      (require 'clojure.stacktrace)
+      (resolve 'clojure.stacktrace/print-cause-trace))))
 
 (def ^:private analyze-causes
   (delay
-   (do
-     (require 'cider.nrepl.middleware.stacktrace)
-     (resolve 'cider.nrepl.middleware.stacktrace/analyze-causes))))
+    (do
+      (require 'cider.nrepl.middleware.stacktrace)
+      (resolve 'cider.nrepl.middleware.stacktrace/analyze-causes))))
 
 ;;; UTILITY FUNCTIONS
 

src/cider/nrepl/pprint.clj

@@ -48,9 +48,9 @@
 
 (def ^:private fipp-printer
   (delay
-   (do
-     (require 'fipp.edn)
-     (resolve 'fipp.edn/pprint))))
+    (do
+      (require 'fipp.edn)
+      (resolve 'fipp.edn/pprint))))
 
 (defn fipp-pprint
   ([value writer]
@@ -61,9 +61,9 @@
 
 (def ^:private puget-printer
   (delay
-   (do
-     (require 'puget.printer)
-     (resolve 'puget.printer/pprint))))
+    (do
+      (require 'puget.printer)
+      (resolve 'puget.printer/pprint))))
 
 (defn puget-pprint
   ([value writer]
@@ -74,9 +74,9 @@
 
 (def ^:private zprint-printer
   (delay
-   (do
-     (require 'zprint.core)
-     (resolve 'zprint.core/zprint))))
+    (do
+      (require 'zprint.core)
+      (resolve 'zprint.core/zprint))))
 
 (defn zprint-pprint
   ([value writer]