;;; ui/window-select/config.el -*- lexical-binding: t; -*-

(cond
 ((featurep! +switch-window)
  (def-package! switch-window
    :commands (switch-window switch-window-then-maximize switch-window-then-split-below
                             switch-window-then-split-right switch-window-then-delete
                             switch-window-then-swap-buffer)
    :init
    (define-key global-map [remap other-window] #'switch-window)
    :config
    (setq switch-window-shortcut-style 'qwerty
          switch-window-qwerty-shortcuts '("a" "s" "d" "f" "g" "h" "j" "k" "l"))))

 ((or (featurep! +ace-window) t) ; default to ace-window
  (def-package! ace-window
    :commands (ace-window ace-swap-window ace-delete-window
                          ace-select-window ace-delete-other-windows)
    :init
    (define-key global-map [remap other-window] #'ace-window)
    :config
    (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l)
          aw-scope 'frame
          aw-background t))))