;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(byte-code "\300\301\302\303\304\305\306\307\310\311\310\312&\210\313\314\315\316\317DD\320\321\322%\210\313\323\315\316\324DD\325\321\326\306\327&\210\313\330\315\316\331DD\332\321\333%\210\334\330\335\336#\210\313\337\315\316\340DD\341\321\322\306\327&\207" [custom-declare-group windmove nil "Directional selection of windows in a frame." :prefix "windmove-" :version "21.1" :group windows convenience custom-declare-variable windmove-wrap-around funcall function #[0 "\300\207" [nil] 1 #1=""] "Whether movement off the edge of the frame wraps around.\nIf this variable is set to t, moving left from the leftmost window in\na frame will find the rightmost one, and similarly for the other\ndirections.  The minibuffer is skipped over in up/down movements if it\nis inactive." :type boolean windmove-create-window #[0 "\300\207" [nil] 1 #1#] "Whether movement off the edge of the frame creates a new window.\nIf this variable is set to t, moving left from the leftmost window in\na frame will create a new window on the left, and similarly for the other\ndirections.\nThis variable may also be a function to be called in this circumstance\nby `windmove-do-window-select'.  The function should accept then as\nargument the DIRECTION targeted, an interactive ARG and a WINDOW\ncorresponding to the currently selected window.  It should also return\na valid window that `windmove-do-window-select' will select,\nor the symbol `no-select' to ignore that final selection." (choice (const :tag "Don't create new windows" nil) (const :tag "Create new windows" t) (function :tag "Provide a function")) "28.1" windmove-window-distance-delta #[0 "\300\207" [1] 1 #1#] "How far away from the current window to look for an adjacent window.\nMeasured in characters either horizontally or vertically; setting this\nto a value larger than 1 may be useful in getting around window-\nplacement bugs in old versions of Emacs." number make-obsolete-variable "no longer used." "27.1" windmove-allow-all-windows #[0 "\300\207" [nil] 1 #1#] "Whether the windmove commands are allowed to target all type of windows.\nIf this variable is set to non-nil, all windmove commands will\nignore the `no-other-window' parameter applied by `display-buffer-alist'\nor `set-window-parameter'."] 12)
#@156 Add the two coordinates.
Both COORD1 and COORD2 are coordinate cons pairs, (HPOS . VPOS).  The
result is another coordinate cons pair.

(fn COORD1 COORD2)
(defalias 'windmove-coord-add #[514 "
@
@\\AA\\B\207" [] 5 (#$ . 2355)])
(make-obsolete 'windmove-coord-add "no longer used." "27.1")
#@165 Ensure that N is between MIN-N and MAX-N inclusive by constraining.
If N is less than MIN-N, return MIN-N; if greater than MAX-N, return
MAX-N.

(fn N MIN-N MAX-N)
(defalias 'windmove-constrain-to-range #[771 "
^]\207" [] 6 (#$ . 2653)])
(make-obsolete 'windmove-constrain-to-range "no longer used." "27.1")
#@161 Ensure that N is between MIN-N and MAX-N inclusive by wrapping.
If N is less than MIN-N, return MAX-N; if greater than MAX-N, return
MIN-N.

(fn N MIN-N MAX-N)
(defalias 'windmove-constrain-around-range #[771 "W\203\207
V\203
\207\207" [] 5 (#$ . 2970)])
(make-obsolete 'windmove-constrain-around-range "no longer used." "27.1")
#@434 Return (X-MIN Y-MIN X-MAX Y-MAX) for the frame containing WINDOW.
If WINDOW is nil, return the edges for the selected frame.
(X-MIN, Y-MIN) is the zero-based coordinate of the top-left corner
of the frame; (X-MAX, Y-MAX) is the zero-based coordinate of the
bottom-right corner of the frame.
For example, if a frame has 76 rows and 181 columns, the return value
from `windmove-frame-edges' will be the list (0 0 180 75).

(fn WINDOW)
(defalias 'windmove-frame-edges #[257 "\300\301!!\207" [window-edges frame-root-window] 4 (#$ . 3314)])
(make-obsolete 'windmove-frame-edges "no longer used." "27.1")
#@614 Constrain COORD so that it is reasonable for the given movement.
This involves two things: first, make sure that the "off" coordinate
-- the one not being moved on, e.g., y for horizontal movement -- is
within frame boundaries; second, if the movement is down and we're not
moving from the minibuffer, make sure that the y coordinate does not
exceed the frame max-y, so that we don't overshoot the minibuffer
accidentally.  WINDOW is the window that movement is relative to; DIR
is the direction of the movement, one of `left', `up', `right',
or `down'.
Returns the constrained coordinate.

(fn COORD WINDOW DIR)
(defalias 'windmove-constrain-loc-for-movement #[771 "\300!\301!
@A@\3028\3038\304>\203\"\305	@#\202%@\306>\2047\307=\203A\204A\305\nA#\202D	A

B\207" [windmove-frame-edges window-minibuffer-p 2 3 (up down) windmove-constrain-to-range (left right) down] 14 (#$ . 3922)])
(make-obsolete 'windmove-constrain-loc-for-movement "no longer used." "27.1")
#@367 Takes the constrained COORD and wraps it around for the movement.
This makes an out-of-range x or y coordinate and wraps it around the
frame, giving a coordinate (hopefully) in the window on the other edge
of the frame.  WINDOW is the window that movement is relative to (nil
means the currently selected window).  Returns the wrapped coordinate.

(fn COORD WINDOW)
(defalias 'windmove-wrap-loc-for-movement #[514 "\300
!\301\203\302!\202\303 !\304
!@A@\3058\204,\3068\307!Z\2020\3068\310	@#\310\nA#B\207" [windmove-frame-edges minibuffer-window window-frame selected-frame minibuffer-window-active-p 2 3 window-height windmove-constrain-around-range] 14 (#$ . 4918)])
(make-obsolete 'windmove-wrap-loc-for-movement "no longer used." "27.1")
#@432 Return the reference location for directional window selection.
Return a coordinate (HPOS . VPOS) that is frame-based.  If ARG is nil
or not supplied, the reference point is the buffer's point in the
currently-selected window, or WINDOW if supplied; otherwise, it is the
top-left or bottom-right corner of the selected window, or WINDOW if
supplied, if ARG is greater or smaller than zero, respectively.

(fn &optional ARG WINDOW)
(defalias 'windmove-reference-loc #[512 "
\204\300\202\301!\302!\211@
A@B\3038S\3048SB\300V\203%
\207\300W\203,\207\300U\205?\305\306\307\310	!	\"!\"\207" [0 prefix-numeric-value window-inside-edges 2 3 windmove-coord-add posn-col-row posn-at-point window-point] 12 (#$ . 5691)])
(make-obsolete 'windmove-reference-loc "no longer used." "27.1")
#@314 Return a location in the window to be moved to.
Return value is a frame-based (HPOS . VPOS) value that should be moved
to.  DIR is one of `left', `up', `right', or `down'; an optional ARG
is handled as by `windmove-reference-loc'; WINDOW is the window that
movement is relative to.

(fn DIR &optional ARG WINDOW)
(defalias 'windmove-other-window-loc #[769 "\301
!\302\"\303\267\2022
@Z
AB\207\211@A@ZB\207\3048S\\
AB\207\211@\3058S\\B\207\306\307\"\207" [windmove-window-distance-delta window-edges windmove-reference-loc #s(hash-table size 4 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (left 13 up 21 right 30 down 40)) 2 3 error "Invalid direction of movement: %s"] 8 (#$ . 6491)])
(make-obsolete 'windmove-other-window-loc "no longer used." "27.1")
#@399 Return the window object in direction DIR as seen from WINDOW.
DIR is one of `left', `up', `right', or `down'.
WINDOW must be a live window and defaults to the selected one.
Optional ARG, if negative, means to use the right or bottom edge of
WINDOW as reference position, instead of `window-point'; if positive,
use the left or top edge of WINDOW as reference point.

(fn DIR &optional ARG WINDOW)
(defalias 'windmove-find-other-window #[769 "\302	\303&\207" [windmove-allow-all-windows windmove-wrap-around window-in-direction t] 10 (#$ . 7283)])
#@374 Move to the window at direction DIR as seen from WINDOW.
DIR, ARG, and WINDOW are handled as by `windmove-find-other-window'.
If no window is at direction DIR, an error is signaled.
If `windmove-create-window' is a function, call that function with
DIR, ARG and WINDOW.  If it is non-nil, try to create a new window
in direction DIR instead.

(fn DIR &optional ARG WINDOW)
(defalias 'windmove-do-window-select #[769 "\301#\203/\211\203\302
!\203/\303
!\204/\304!\203'#\202-\305\306#\262
\211\2048\307\310\"\207\302
!\203H\303
!\204H\307\311!\207\211\312=\206Q\313
!\207" [windmove-create-window windmove-find-other-window window-minibuffer-p minibuffer-window-active-p functionp split-window nil user-error "No window %s from selected window" "Minibuffer is inactive" no-select select-window] 8 (#$ . 7843)])
#@449 Select the window to the left of the current one.
With no prefix argument, or with prefix argument equal to zero,
"left" is relative to the position of point in the window; otherwise
it is relative to the top edge (for positive ARG) or the bottom edge
(for negative ARG) of the current window.
If no window is at the desired location, an error is signaled
unless `windmove-create-window' is non-nil and a new window is created.

(fn &optional ARG)
(defalias 'windmove-left #[256 "\300\301\205	\302!\"\207" [windmove-do-window-select left prefix-numeric-value] 5 (#$ . 8683) "P"])
#@438 Select the window above the current one.
With no prefix argument, or with prefix argument equal to zero, "up"
is relative to the position of point in the window; otherwise it is
relative to the left edge (for positive ARG) or the right edge (for
negative ARG) of the current window.
If no window is at the desired location, an error is signaled
unless `windmove-create-window' is non-nil and a new window is created.

(fn &optional ARG)
(defalias 'windmove-up #[256 "\300\301\205	\302!\"\207" [windmove-do-window-select up prefix-numeric-value] 5 (#$ . 9273) "P"])
#@451 Select the window to the right of the current one.
With no prefix argument, or with prefix argument equal to zero,
"right" is relative to the position of point in the window;
otherwise it is relative to the top edge (for positive ARG) or the
bottom edge (for negative ARG) of the current window.
If no window is at the desired location, an error is signaled
unless `windmove-create-window' is non-nil and a new window is created.

(fn &optional ARG)
(defalias 'windmove-right #[256 "\300\301\205	\302!\"\207" [windmove-do-window-select right prefix-numeric-value] 5 (#$ . 9848) "P"])
#@440 Select the window below the current one.
With no prefix argument, or with prefix argument equal to zero,
"down" is relative to the position of point in the window; otherwise
it is relative to the left edge (for positive ARG) or the right edge
(for negative ARG) of the current window.
If no window is at the desired location, an error is signaled
unless `windmove-create-window' is non-nil and a new window is created.

(fn &optional ARG)
(defalias 'windmove-down #[256 "\300\301\205	\302!\"\207" [windmove-do-window-select down prefix-numeric-value] 5 (#$ . 10442) "P"])
#@42 Map used by `windmove-install-defaults'.
(defvar windmove-mode-map (make-sparse-keymap) (#$ . 11023))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313&	\207" [custom-declare-variable windmove-mode funcall function #[0 "\300\207" [t] 1 ""] "Non-nil if Windmove mode is enabled.\nSee the `windmove-mode' command\nfor a description of this minor mode." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean] 10)
#@620 Global minor mode for default windmove commands.

This is a minor mode.  If called interactively, toggle the `Windmove
mode' mode.  If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value \='windmove-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

(fn &optional ARG)
(defalias 'windmove-mode #[256 "\301 \302\303\304=\203\305\303!?\202!\247\203 \306W\203 \307\202!\310\"\210\311\300!\2038\312\303\"\305\303!\2038\303B\313\314\305\303!\203D\315\202E\316\"\210\317\320!\203m\321\303!\210\301 \203]\211\301 \232\203m\322\323\305\303!\203i\324\202j\325\326#\210\210\327 \210\305\303!\207" [global-minor-modes current-message set-default windmove-mode toggle default-value 1 nil t boundp delq run-hooks windmove-mode-hook windmove-mode-on-hook windmove-mode-off-hook called-interactively-p any customize-mark-as-set message "Windmove mode %sabled%s" "en" "dis" "" force-mode-line-update] 6 (#$ . 11478) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar windmove-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\310\211%\207" [windmove-mode-map windmove-mode-hook variable-documentation put "Hook run after entering or leaving `windmove-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" custom-type hook standard-value nil add-minor-mode windmove-mode] 6)
#@323 Install keys as specified by ALIST.
Every element of ALIST has the form (FN KEY), where KEY is
appended to MODIFIERS, adding PREFIX to the beginning, before
installing the key.  Previous bindings of FN are unbound.
If UNINSTALL is non-nil, just remove the keys from ALIST.

(fn PREFIX MODIFIERS ALIST &optional UNINSTALL)
(defalias 'windmove-install-defaults #[1027 "
\211\205m\211@\301
@\"\211\203\211@\302\303#\210
A\266\202\202\f\210\204f\304\305\232\2060\306=?\2056\307A\"C\"\310
!\311=\203L\312\313@\"\210\314\"\315
!\203]\312\316@#\210\210\302@#\266
A\266\202\202
\207" [windmove-mode-map where-is-internal define-key nil vconcat [ignore] none append key-binding self-insert-command warn "Command %S is shadowing self-insert-key" lookup-key functionp "Overriding %S with %S"] 12 (#$ . 13321)])
#@311 Set up keybindings for `windmove'.
Keybindings are of the form MODIFIERS-{left,right,up,down},
where MODIFIERS is either a list of modifiers or a single modifier.
If MODIFIERS is `none', the keybindings will be directly bound to
the arrow keys.
Default value of MODIFIERS is `shift'.

(fn &optional MODIFIERS)
(defalias 'windmove-default-keybindings #[256 "\211\204\300\262
\211\301=\203\302\262
\211<\204\211C\262
\303\302\304#\207" [shift none nil windmove-install-defaults ((windmove-left left) (windmove-right right) (windmove-up up) (windmove-down down))] 5 (#$ . 14160) nil])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable windmove-display-no-select funcall function #[0 "\300\207" [nil] 1 ""] "Whether the window should be selected after displaying the buffer in it.\nIf nil, then the new window where the buffer is displayed will be selected.\nIf `ignore', then don't select a window: neither the new nor the old window,\nthus allowing the next command to decide what window it selects.\nOther non-nil values will reselect the old window that was selected before.\n\nThe value of this variable can be overridden by the prefix arg of the\nwindmove-display-* commands that use `windmove-display-in-direction'.\n\nWhen `switch-to-buffer-obey-display-actions' is non-nil,\n`switch-to-buffer' commands are also supported." :type (choice (const :tag "Select new window" nil) (const :tag "Select old window" t) (const :tag "Don't select a window" ignore)) :version "27.1"] 8)
#@878 Display the next buffer in the window at direction DIR.
The next buffer is the buffer displayed by the next command invoked
immediately after this command (ignoring reading from the minibuffer).
Create a new window if there is no window in that direction.

By default, select the new window with a displayed buffer.
If `windmove-display-no-select' is `ignore', then allow the next command
to decide what window it selects.  With other non-nil values of
`windmove-display-no-select', this function reselects
a previously selected old window.

If prefix ARG is \[universal-argument], reselect a previously selected old window.
If `windmove-display-no-select' is non-nil, the meaning of
the prefix argument is reversed and it selects the new window.

When `switch-to-buffer-obey-display-actions' is non-nil,
`switch-to-buffer' commands are also supported.

(fn DIR &optional ARG)
(defalias 'windmove-display-in-direction #[513 "\211:
\204\f\262
\202\211?\205
\266\202\301\302\303#\302\304\"\305\306\"#\207" [windmove-display-no-select display-buffer-override-next-command make-closure #[514 "\306\300\307=\203\310\311 \210)\312\262
\313 \202X\300\314=\203>\315\236A\316
\"\317!\320\236A\2042\321
!\210\322\262\323
!)\266\202\202X\300\324=\203I\313 \202X\325\300\326\f\301\205T\327\301!
\330&\211\204f\331\326\211\300#\262
\332\262\211B\207" [V0 V1 tab-bar-new-tab-choice pop-up-frame-alist windmove-allow-all-windows windmove-wrap-around reuse new-tab t tab-bar-new-tab tab selected-window new-frame pop-up-frame-parameters append make-frame-on-current-monitor inhibit-switch-frame window--maybe-raise-frame frame frame-selected-window same-window window-in-direction nil prefix-numeric-value nomini split-window window] 10 "\n\n(fn BUFFER ALIST)"] #[514 "	\302=?\205 \303\300\203\202
!\205 \304\300\203\202
!\207" [V0 windmove-display-no-select ignore window-live-p select-window] 4 "\n\n(fn OLD-WINDOW NEW-WINDOW)"] format "[display-%s]"] 9 (#$ . 15691)])
#@188 Display the next buffer in window to the left of the current one.
See the logic of the prefix ARG and `windmove-display-no-select'
in `windmove-display-in-direction'.

(fn &optional ARG)
(defalias 'windmove-display-left #[256 "\300\301\"\207" [windmove-display-in-direction left] 4 (#$ . 17696) "P"])
#@179 Display the next buffer in window above the current one.
See the logic of the prefix ARG and `windmove-display-no-select'
in `windmove-display-in-direction'.

(fn &optional ARG)
(defalias 'windmove-display-up #[256 "\300\301\"\207" [windmove-display-in-direction up] 4 (#$ . 18005) "P"])
#@189 Display the next buffer in window to the right of the current one.
See the logic of the prefix ARG and `windmove-display-no-select'
in `windmove-display-in-direction'.

(fn &optional ARG)
(defalias 'windmove-display-right #[256 "\300\301\"\207" [windmove-display-in-direction right] 4 (#$ . 18301) "P"])
#@179 Display the next buffer in window below the current one.
See the logic of the prefix ARG and `windmove-display-no-select'
in `windmove-display-in-direction'.

(fn &optional ARG)
(defalias 'windmove-display-down #[256 "\300\301\"\207" [windmove-display-in-direction down] 4 (#$ . 18613) "P"])
#@65 Display the next buffer in the same window.

(fn &optional ARG)
(defalias 'windmove-display-same-window #[256 "\300\301\"\207" [windmove-display-in-direction same-window] 4 (#$ . 18912) "P"])
#@61 Display the next buffer in a new frame.

(fn &optional ARG)
(defalias 'windmove-display-new-frame #[256 "\300\301\"\207" [windmove-display-in-direction new-frame] 4 (#$ . 19111) "P"])
#@59 Display the next buffer in a new tab.

(fn &optional ARG)
(defalias 'windmove-display-new-tab #[256 "\300\301\"\207" [windmove-display-in-direction new-tab] 4 (#$ . 19302) "P"])
#@417 Set up keybindings for directional buffer display.
Keys are bound to commands that display the next buffer in the specified
direction.  Keybindings are of the form MODIFIERS-{left,right,up,down},
where MODIFIERS is either a list of modifiers or a single modifier.
If MODIFIERS is `none', the keybindings will be directly bound to
the arrow keys.
Default value of MODIFIERS is `shift-meta'.

(fn &optional MODIFIERS)
(defalias 'windmove-display-default-keybindings #[256 "\211\204\300\262
\211\301=\203\302\262
\211<\204\211C\262
\303\302\304#\207" [(shift meta) none nil windmove-install-defaults ((windmove-display-left left) (windmove-display-right right) (windmove-display-up up) (windmove-display-down down) (windmove-display-same-window 48) (windmove-display-new-frame 102) (windmove-display-new-tab 116))] 5 (#$ . 19488) nil])
#@320 Delete the window at direction DIR.
If prefix ARG is `\[universal-argument]', also kill the buffer in that window.
With `M-0' prefix, delete the selected window and
select the window at direction DIR.
When `windmove-wrap-around' is non-nil, takes the window
from the opposite side of the frame.

(fn DIR &optional ARG)
(defalias 'windmove-delete-in-direction #[513 "\302\303	\304&\211\204\305\306\"\207
\307\232\203\310\311!!\210
\312=\204(\313
!\207\313\314 !\210\315
!\207" [windmove-allow-all-windows windmove-wrap-around window-in-direction nil nomini user-error "No window %s from selected window" (4) kill-buffer window-buffer 0 delete-window selected-window select-window] 9 (#$ . 20335)])
#@201 Delete the window to the left of the current one.
If prefix ARG is \[universal-argument], delete the selected window and
select the window that was to the left of the current one.

(fn &optional ARG)
(defalias 'windmove-delete-left #[256 "\300\301\"\207" [windmove-delete-in-direction left] 4 (#$ . 21050) "P"])
#@183 Delete the window above the current one.
If prefix ARG is \[universal-argument], delete the selected window and
select the window that was above the current one.

(fn &optional ARG)
(defalias 'windmove-delete-up #[256 "\300\301\"\207" [windmove-delete-in-direction up] 4 (#$ . 21370) "P"])
#@203 Delete the window to the right of the current one.
If prefix ARG is \[universal-argument], delete the selected window and
select the window that was to the right of the current one.

(fn &optional ARG)
(defalias 'windmove-delete-right #[256 "\300\301\"\207" [windmove-delete-in-direction right] 4 (#$ . 21668) "P"])
#@183 Delete the window below the current one.
If prefix ARG is \[universal-argument], delete the selected window and
select the window that was below the current one.

(fn &optional ARG)
(defalias 'windmove-delete-down #[256 "\300\301\"\207" [windmove-delete-in-direction down] 4 (#$ . 21992) "P"])
#@502 Set up keybindings for directional window deletion.
Keys are bound to commands that delete windows in the specified
direction.  Keybindings are of the form PREFIX MODIFIERS-{left,right,up,down},
where PREFIX is a prefix key and MODIFIERS is either a list of modifiers or
a single modifier.
If PREFIX is `none', no prefix is used.  If MODIFIERS is `none',
the keybindings are directly bound to the arrow keys.
Default value of PREFIX is `C-x' and MODIFIERS is `shift'.

(fn &optional PREFIX MODIFIERS)
(defalias 'windmove-delete-default-keybindings #[512 "
\204\300\262
\301=\203\302\262
<\204
C\262\211\204 \303\262
\211\301=\203)\302\262
\211<\2042\211C\262
\304\305#\207" [(24) none nil (shift) windmove-install-defaults ((windmove-delete-left left) (windmove-delete-right right) (windmove-delete-up up) (windmove-delete-down down))] 6 (#$ . 22294) nil])
#@177 Swap the states of the selected window and the window at direction DIR.
When `windmove-wrap-around' is non-nil, takes the window
from the opposite side of the frame.

(fn DIR)
(defalias 'windmove-swap-states-in-direction #[257 "\302
\303\303	\304&\211\203\305
!\203\306\307\"\207\310\303\"\207" [windmove-allow-all-windows windmove-wrap-around window-in-direction nil nomini window-minibuffer-p user-error "No window %s from selected window" window-swap-states] 8 (#$ . 23172)])
#@67 Swap the states with the window on the left from the current one.
(defalias 'windmove-swap-states-left #[0 "\300\301!\207" [windmove-swap-states-in-direction left] 2 (#$ . 23665) nil])
#@61 Swap the states with the window above from the current one.
(defalias 'windmove-swap-states-up #[0 "\300\301!\207" [windmove-swap-states-in-direction up] 2 (#$ . 23856) nil])
#@61 Swap the states with the window below from the current one.
(defalias 'windmove-swap-states-down #[0 "\300\301!\207" [windmove-swap-states-in-direction down] 2 (#$ . 24037) nil])
#@68 Swap the states with the window on the right from the current one.
(defalias 'windmove-swap-states-right #[0 "\300\301!\207" [windmove-swap-states-in-direction right] 2 (#$ . 24222) nil])
#@453 Set up keybindings for directional window swap states.
Keys are bound to commands that swap the states of the selected window
with the window in the specified direction.  Keybindings are of the form
MODIFIERS-{left,right,up,down}, where MODIFIERS is either a list of modifiers
or a single modifier.
If MODIFIERS is `none', the keybindings will be directly bound to the
arrow keys.
Default value of MODIFIERS is `shift-super'.

(fn &optional MODIFIERS)
(defalias 'windmove-swap-states-default-keybindings #[256 "\211\204\300\262
\211\301=\203\302\262
\211<\204\211C\262
\303\302\304#\207" [(shift super) none nil windmove-install-defaults ((windmove-swap-states-left left) (windmove-swap-states-right right) (windmove-swap-states-up up) (windmove-swap-states-down down))] 5 (#$ . 24417) nil])
#@44 Customization type for windmove modifiers.
(defconst windmove--default-keybindings-type '(choice (const :tag "Don't bind" nil) (cons :tag "Bind using" (key-sequence :tag "Prefix") (set :tag "Modifier" :greedy t (const :tag "Meta" meta) (const :tag "Control" control) (const :tag "Shift" shift) (const :tag "Hyper" hyper) (const :tag "Super" super) (const :tag "Alt" alt)))) (#$ . 25222))
(byte-code "\301\302\303\304\305DD\306\307\310\311\312\313&	\210\301\314\303\304\315DD\316\307\317\311\312\313&	\210\301\320\303\304\321DD\322\307\323\311\312\313&	\210\301\324\303\304\325DD\326\307\327\311\312\313&	\210\330\331!\207" [windmove--default-keybindings-type custom-declare-variable windmove-default-keybindings funcall function #[0 "\300\207" [nil] 1 #1=""] "Default keybindings for regular windmove commands.\nSee `windmove-default-keybindings' for more detail." :set #[514 "\300
@A\301?$\210\302\"\207" [windmove-install-defaults ((windmove-left left) (windmove-right right) (windmove-up up) (windmove-down down)) set-default] 7 "\n\n(fn SYM VAL)"] :type :version "28.1" windmove-display-default-keybindings #[0 "\300\207" [nil] 1 #1#] "Default keybindings for windmove directional buffer display commands.\nSee `windmove-display-default-keybindings' for more detail." #[514 "\300
@A\301?$\210\302\"\207" [windmove-install-defaults ((windmove-display-left left) (windmove-display-right right) (windmove-display-up up) (windmove-display-down down) (windmove-display-same-window 48) (windmove-display-new-frame 102) (windmove-display-new-tab 116)) set-default] 7 "\n\n(fn SYM VAL)"] windmove-delete-default-keybindings #[0 "\300\207" [nil] 1 #1#] "Default keybindings for windmove directional window deletion commands.\nSee `windmove-delete-default-keybindings' for more detail." #[514 "\300
@A\301?$\210\302\"\207" [windmove-install-defaults ((windmove-delete-left left) (windmove-delete-right right) (windmove-delete-up up) (windmove-delete-down down)) set-default] 7 "\n\n(fn SYM VAL)"] windmove-swap-states-default-keybindings #[0 "\300\207" [nil] 1 #1#] "Default keybindings for windmove's directional window swap-state commands.\nSee `windmove-swap-states-default-keybindings' for more detail." #[514 "\300
@A\301?$\210\302\"\207" [windmove-install-defaults ((windmove-swap-states-left left) (windmove-swap-states-right right) (windmove-swap-states-up up) (windmove-swap-states-down down)) set-default] 7 "\n\n(fn SYM VAL)"] provide windmove] 10)