ui/window-select: use use-package :when/:unless instead of cond
Appease the byte-compiler.
This commit is contained in:
parent
dd7a26352b
commit
fab6fb1270
1 changed files with 21 additions and 21 deletions
|
@ -1,24 +1,24 @@
|
|||
;;; 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"))))
|
||||
(def-package! switch-window
|
||||
:when (featurep! +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))))
|
||||
|
||||
(def-package! ace-window
|
||||
:unless (featurep! +switch-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))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue