   (when (not-empty @connection-info*) true))
 
 (defn- server-notifications-on
-  "Turn on notification messages from the audio server.  This lets us free
-  synth IDs when they are automatically freed with envelope triggers.  It also
-  lets us receive custom messages from various trigger ugens.
-
-  These messages are sent as notification of some event to all clients who have
-  registered via the /notify command .
+  "Turn on notification messages from the audio server.  This lets us
+  free synth IDs when they are automatically freed with envelope
+  triggers.  It also lets us receive custom messages from various
+  trigger ugens.
+
+  These messages are sent as notification of some event to all clients
+  who have registered via the /notify command .
 
   All of these have the same arguments:
    int - node ID

(defn connect
  "Connect to an externally running SC audio server.

  (connect 57710)                  ;=> connect to an external server on the
                                       localhost listening to port 57710
  (connect \"192.168.1.23\" 57110) ;=> connect to an external server with ip
                                       address 192.168.1.23 listening to port
                                       57110"
  ([port] (connect "127.0.0.1" port))
  ([host port]
     (.run (Thread. #(external-connection-runner host port)))))

  (server-snd "/notify" 1))

(defn- connect-jack-ports
  "Connect the jack input and output ports as best we can.  If jack
  ports are always different names with different drivers or hardware
  then we need to find a better strategy to auto-connect. (For Linux
  users)"
  ([] (connect-jack-ports 2))
  ([n-channels]
     (let [port-list (:out (sh "jack_lsp"))
