      ; out
      ;
      (let [guided-output-out
-             (concat
-               out
-               (if fit?
-                 ; Note that newlines don't fit
-                 (if (not (zero? index))
-                   ; Separate from previous thing by one space.
-                   ; Of course, this might now not fit?  We did check
-                   ; before.
-                   #_(concat-no-nil [[" " :none :whitespace 15]] next-seq)
-                   ; spaces from align have precedence over just random spaces
-                   (concat-no-nil
-                     ; Ensure that despite alignment, we don't let two things
-                     ; run
-                     ; together!
-                     [[(blanks
-                         (max
-                           1
-                           (or
-                             (when align-spaces
+             (if fit?
+               ; Note that newlines don't fit
+               (if (not (zero? index))
+                 ; Separate from previous thing by one space.
+                 ; Of course, this might now not fit?  We did check
+                 ; before.
+                 #_(concat-no-nil [[" " :none :whitespace 15]] next-seq)
+                 ; spaces from align have precedence over just random spaces
+                 (concat-no-nil
+                   ; Ensure that despite alignment, we don't let two things
+                   ; run
+                   ; together!
+                   [[(blanks
+                       (max
+                         1
+                         (or (when align-spaces
                                (if previous-newline? align-ind align-spaces))
                              ; If spaces come after a newline, they are beyond
                              ; the indent, and do not replace the indent.

      (if (and (= caller (first debug-vector))
               (= (:depth options) (second debug-vector)))
        (nth debug-vector 2)))))

;;
;; # Use pmap when we have it

        (do (dbg-s options
                   :guide
                   "fzprint-guide: out:"
                   ((:dzprint options) {} (into [] (condense-depth 1 out))))
            #_(prn "fzprint-guide out:" out)
            out)
        (if (> index 50)
