       (node-map-controls    [this names-busses]
         "Connect a node's controls to a control bus.")
       (node-map-n-controls  [this start-control start-bus n]
-        "Connect N controls of a node to a set of sequential control busses,
-    starting at the given control name."))
+        "Connect N controls of a node to a set of sequential control
+        busses, starting at the given control name."))
 
     (defprotocol IKillable
       (kill* [this] "Kill a synth element (node, or group, or ...)."))

  [node name-values]
  (ensure-connected!)
  (let [node-id (to-synth-id node)]
              (apply snd "/n_set" node-id (floatify (stringify (bus->id name-values))))
              node-id))

(defn node-get-control
  "Get one or more synth control values by name.  Returns a map of

      {:type     :group
       :id       id
       :name     (get-in @active-synth-nodes* [id :group] "Unknown Group")
       :children (doall (map (fn [i] (parse-node-tree-helper ctls?))
                             (range n-children)))})))

(defn- parse-node-tree
  [data]
