(name "Arranger")

(info "A session grid.")

(keys
  (layer-if :focus-message     "./keys_message.edn")
  (layer-if :focus-device-add  "./keys_device_add.edn")
  (layer-if :focus-browser     "./keys_browser.edn")
  (layer-if :focus-pool-rename "./keys_rename.edn")
  (layer-if :focus-pool-length "./keys_length.edn")
  (layer-if :focus-editor      "./keys_editor.edn")
  (layer-if :focus-clip        "./keys_clip.edn")
  (layer-if :focus-track       "./keys_track.edn")
  (layer-if :focus-scene       "./keys_scene.edn")
  (layer-if :focus-mix         "./keys_mix.edn")
  (layer                       "./keys_clock.edn")
  (layer                       "./keys_arranger.edn")
  (layer                       "./keys_global.edn"))

(view (bsp/a :view-dialog
  (bsp/e
    (fill/y (align/n (bsp/s :view-status-v (bsp/s
      (bsp/s :view-midi-ports-status :view-audio-ports-status)
      (bsp/n :view-editor-status :view-pool)))))
    :view-arranger)))