            system-outs    (re-seq #"system:playback_[0-9]*" port-list)
            interface-ins  (re-seq #"system:AC[0-9]*_dev[0-9]*_.*In.*" port-list)
            interface-outs (re-seq #"system:AP[0-9]*_dev[0-9]*_LineOut.*" port-list)
-           connections (partition 2 (concat
-                                     (interleave sc-outs system-outs)
-                                     (interleave sc-outs interface-outs)
-                                     (interleave system-ins sc-ins)
-                                     (interleave interface-ins sc-ins)))]
+           connections    (partition 2 (concat
+                                        (interleave sc-outs system-outs)
+                                        (interleave sc-outs interface-outs)
+                                        (interleave system-ins sc-ins)
+                                        (interleave interface-ins sc-ins)))]
        (doseq [[src dest] connections]
          (logged-sh "jack_connect" src dest)
          (log/info "jack_connect " src " " dest)))))

  "Pull audio server log data from a pipe and store for later printing."
  [stream read-buf]
  (while (pos? (.available stream))
    (let [n (min (count read-buf) (.available stream))
          _ (.read stream read-buf 0 n)
          msg (String. read-buf 0 n)]
      (swap! external-server-log* conj msg)
      (log/info (String. read-buf 0 n)))))

     (unsatisfy-all-dependencies))))

(defonce _shutdown-hook
  (.addShutdownHook (Runtime/getRuntime)
                    (Thread. (fn []
                               (log/info "Shutdown hook activated...")
                               (locking connection-info*
                                 (when (= :connected @connection-status*)
                                   (shutdown-server)))))))
