;ELC ;;; Compiled ;;; in Emacs version 30.2 ;;; with all optimizations. #@272 Move cursor to the right by COUNT characters. Movement is restricted to the current line unless CROSSLINES is non-nil. If NOERROR is non-nil, don't signal an error upon reaching the end of the line or the buffer; just return nil. (fn &optional COUNT CROSSLINES NOERROR) (byte-code "\300\301!\210\300\302!\210\300\303!\210\300\304!\210\300\305!\210\300\306!\210\300\307!\210\300\310!\210\300\311!\210\300\312!\210\313\314\315\"\207" [require evil-common evil-search evil-states evil-ex evil-types evil-command-window evil-jumps evil-vars cl-lib reveal eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-char] 2]] 3) (defalias 'evil-forward-char #[768 "\204\300\214edBBe`\206\304\\Td^}\210\3051\257\306``\"\211A\203.\211A\262\242\2025\307\310\311GD\"\211A\262\242\212\211b\210n)\203JS]\262 \204^\312 \204^\313 \204^S]\262\214edBB\206je\206od}\210\3141\226\3151\200u00\202\2500\307eU\203\214\316\202\216@A\"\262\202\250\307dU\203\241\317\202\243@A\"\262*\266\2030\202\276\n?\205\274\307@A\"\262*\207\211\203\320\3201\316\321\"0\207\322\207\206\325\304\211\323W\210\322\323U\204`\322u\210 \204\375\312 \204\375\313 \204\375l\203\375n\204\375\322u\210`U\204\323W\203 T\202S\262\202\332\211\262\207" [evil-restriction-stack evil-move-beyond-eol last-command this-command 1 (error) evil-line-expand signal wrong-number-of-arguments (beg end &rest) evil-visual-state-p evil-operator-state-p (end-of-buffer) (beginning-of-buffer) beginning-of-line end-of-line (error) evil-forward-char nil 0] 11 (#$ . 84) (byte-code "\205\305! \n\203 \306>\206\f\205 \307>E\207" [current-prefix-arg evil-cross-lines defining-kbd-macro evil-kbd-macro-suppress-motion-error executing-kbd-macro prefix-numeric-value (t record) (t replay)] 4)])#@277 Move cursor to the left by COUNT characters. Movement is restricted to the current line unless CROSSLINES is non-nil. If NOERROR is non-nil, don't signal an error upon reaching the beginning of the line or the buffer; just return nil. (fn &optional COUNT CROSSLINES NOERROR) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-forward-char :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-char] 2]] 8) (defalias 'evil-backward-char #[768 "\204\307\214edBB`\206\304Ze]`Td^}\210\3051\266\306``\"\211A\2030\211A\262\242\2027\307\310\311GD\"\211A\262\242\212\211b\210n)\203LS]\262 \204`\312 \204`\313 \204`S]\262\214edBB\206le\206qd}\210\3141\235\3151\207\206\200\304[u00\202\2570\307eU\203\223\316\202\225@A\"\262\202\257\307dU\203\250\317\202\252@A\"\262*\266\2030\202\305\n?\205\303\307@A\"\262*\207\211\203\327\3201\325\321\"0\207\322\207\206\334\304\211\323W\210\322\323U\204`\324u\210\312 \204\370\313 \204\370\325 \210`U\204\323W\203T\202\nS\262\202\341\211\262\207" [evil-restriction-stack evil-move-beyond-eol last-command this-command 1 (error) evil-line-expand signal wrong-number-of-arguments (beg end &rest) evil-visual-state-p evil-operator-state-p (end-of-buffer) (beginning-of-buffer) beginning-of-line end-of-line (error) evil-backward-char nil 0 -1 evil-adjust-cursor] 11 (#$ . 1944) (byte-code "\205\305! \n\203 \306>\206\f\205 \307>E\207" [current-prefix-arg evil-cross-lines defining-kbd-macro evil-kbd-macro-suppress-motion-error executing-kbd-macro prefix-numeric-value (t record) (t replay)] 4)])#@57 Move the cursor COUNT lines down. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-backward-char :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-line] 2]] 8) (defalias 'evil-next-line #[256 "\301\302\206\303!)\207" [line-move-visual nil evil-line-move 1] 3 (#$ . 3703) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@55 Move the cursor COUNT lines up. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-next-line :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-line] 2]] 8) (defalias 'evil-previous-line #[256 "\301\302\206\303[!)\207" [line-move-visual nil evil-line-move 1] 3 (#$ . 4229) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@64 Move the cursor COUNT screen lines down. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-previous-line :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-visual-line] 2]] 8) (defalias 'evil-next-visual-line #[256 "\301\302\206\303!)\207" [line-move-visual t evil-line-move 1] 3 (#$ . 4753) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@62 Move the cursor COUNT screen lines up. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-next-visual-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-visual-line] 2]] 8) (defalias 'evil-previous-visual-line #[256 "\301\302\206\303[!)\207" [line-move-visual t evil-line-move 1] 3 (#$ . 5293) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@50 Move COUNT - 1 lines down. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-previous-visual-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-line] 2]] 8) (defalias 'evil-line #[256 "\301\302\206\303S\304\")\207" [line-move-visual nil evil-line-move 1 t] 4 (#$ . 5848) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)]) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-line :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-line-or-visual-line] 2]] 8) (defalias 'evil-line-or-visual-line #[256 "\205 \303\206\f\304S\305\")\207" [evil-respect-visual-line-mode visual-line-mode line-move-visual evil-line-move 1 t] 4 (#$ . 5848) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@55 Move the cursor to the beginning of the current line. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-line-or-visual-line :repeat motion :type screen-line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-beginning-of-line] 2]] 8) (defalias 'evil-beginning-of-line #[0 "\300\301!\207" [move-beginning-of-line nil] 2 (#$ . 6899) nil])#@127 Move the cursor to the end of the current line. If COUNT is given, move COUNT - 1 lines downward first. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-beginning-of-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-end-of-line] 2]] 8) (defalias 'evil-end-of-line #[256 "\306!\210\203\f \307\310 \203\f?\202 \311 )\210l\205$\312\211 \207" [evil-track-eol most-positive-fixnum temporary-goal-column this-command evil-v$-excludes-newline evil-move-beyond-eol move-end-of-line next-line evil-visual-state-p evil-adjust-cursor exclusive evil-this-type] 3 (#$ . 7349) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@68 Move the cursor to the first character of the current screen line. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-end-of-line :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-beginning-of-visual-line] 2]] 8) (defalias 'evil-beginning-of-visual-line #[0 "\300 \207" [beginning-of-visual-line] 1 (#$ . 8175) nil])#@152 Move the cursor to the last character of the current screen line. If COUNT is given, move COUNT - 1 screen lines downward first. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-beginning-of-visual-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-end-of-visual-line] 2]] 8) (defalias 'evil-end-of-visual-line #[256 "\300!\210\301\302!\207" [end-of-visual-line evil-move-cursor-back t] 3 (#$ . 8636) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@232 Move the cursor to the last character of the current screen line if `visual-line-mode' is active and `evil-respect-visual-line-mode' is non-nil. If COUNT is given, move COUNT - 1 screen lines downward first. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-end-of-visual-line :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-end-of-line-or-visual-line] 2]] 8) (defalias 'evil-end-of-line-or-visual-line #[256 "\203\f \203\f\302!\207\303!\207" [evil-respect-visual-line-mode visual-line-mode evil-end-of-visual-line evil-end-of-line] 3 (#$ . 9289) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@59 Move the cursor to the middle of the current visual line. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-end-of-line-or-visual-line :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-middle-of-visual-line] 2]] 8) (defalias 'evil-middle-of-visual-line #[0 "\301 \210\214edBBe\212\302 \210`)}\210\303iS\304 \305\245\\!*\207" [evil-restriction-stack beginning-of-visual-line end-of-visual-line move-to-column window-body-width 2] 4 (#$ . 10089) nil])#@122 Move the cursor to COUNT % of the width of the current line. If no COUNT is given, default to 50%. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-middle-of-visual-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-percentage-of-line] 2]] 8) (defalias 'evil-percentage-of-line #[256 "\301 \302 Z\203 \303\202\304Z\305\306\206\307_\310\"!\207" [evil-move-beyond-eol line-end-position line-beginning-position -1 0 move-to-column truncate 50 100] 6 (#$ . 10686) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@71 Move the cursor to the first non-blank character of the current line. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-percentage-of-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-first-non-blank] 2]] 8) (defalias 'evil-first-non-blank #[0 "\302``\"\211A\203\211A\262\242\202\303\304\305GD\"\211A\262\242\212\211b\210n)\203.S]\262\204B\306 \204B\307 \204BS]\262\214edB B\206Ne\206Sd}\210\3101z\3111d\312 00\202\2140\303eU\203p\313\202r@A\"\262\202\214\303dU\203\205\314\202\207@A\"\262*\207" [evil-move-beyond-eol evil-restriction-stack evil-line-expand signal wrong-number-of-arguments (beg end &rest) evil-visual-state-p evil-operator-state-p (end-of-buffer) (beginning-of-buffer) back-to-indentation beginning-of-line end-of-line] 7 (#$ . 11404) nil])#@148 Move the cursor to the last non-blank character of the current line. If COUNT is given, move COUNT - 1 lines downward first. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-first-non-blank :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-last-non-blank] 2]] 8) (defalias 'evil-last-non-blank #[256 "\300!\210\301\302x\210n?\205\303u\207" [evil-move-end-of-line " " nil -1] 3 (#$ . 12354) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@78 Move the cursor to the first non blank character of the current screen line. (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-last-non-blank :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-first-non-blank-of-visual-line] 2]] 8) (defalias 'evil-first-non-blank-of-visual-line #[0 "\300 \210\301\302w\207" [evil-beginning-of-visual-line " " nil] 2 (#$ . 12994) nil])#@90 Move the cursor COUNT lines down on the first non-blank character. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-first-non-blank-of-visual-line :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-line-first-non-blank] 2]] 8) (defalias 'evil-next-line-first-non-blank #[256 "\301\206\302!)\210\303 \207" [this-command evil-next-line 1 evil-first-non-blank] 3 (#$ . 13508) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@92 Move the cursor COUNT-1 lines down on the first non-blank character. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-next-line-first-non-blank :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-line-1-first-non-blank] 2]] 8) (defalias 'evil-next-line-1-first-non-blank #[256 "\301\206\302S!)\210\303 \207" [this-command evil-next-line 1 evil-first-non-blank] 3 (#$ . 14136) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@88 Move the cursor COUNT lines up on the first non-blank character. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-next-line-1-first-non-blank :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-line-first-non-blank] 2]] 8) (defalias 'evil-previous-line-first-non-blank #[256 "\301\206\302!)\210\303 \207" [this-command evil-previous-line 1 evil-first-non-blank] 3 (#$ . 14761) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@67 Go to line COUNT. By default the last line. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-previous-line-first-non-blank :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-line] 2]] 8) (defalias 'evil-goto-line #[256 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\211\204Kdb\210p\310 =\203R`\311\312\313\"V\203R\314`!\210\315\316V\205F\317!\210\202Reb\210\211Sy\210\203Y\320 \207\321\206q :\203p\322\323 @! A\\]\202q !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) window-buffer window-end nil t overlay-recenter recenter 100 -1 evil-first-non-blank line-move-to-column 0 truncate scroll-conservatively goal-column] 5 (#$ . 15391) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@68 Go to line COUNT. By default the first line. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-goto-line :repeat motion :jump t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-first-line] 2]] 10) (defalias 'evil-goto-first-line #[256 "\300\206\301!\207" [evil-goto-line 1] 3 (#$ . 16396) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@555 Move the cursor to the beginning of the COUNT-th next word. If BIGWORD is non-nil, move by WORDS. If this command is called in operator-pending state it behaves differently. If point reaches the beginning of a word on a new line point is moved back to the end of the previous line. If called after a change operator, i.e. cw or cW, `evil-want-change-word-to-end' is non-nil and point is on a word, then both behave like ce or cE. If point is at the end of the buffer and cannot be moved then `end-of-buffer' is signaled. (fn &optional COUNT BIGWORD) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-goto-first-line :repeat motion :jump t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-word-begin] 2]] 10) (defalias 'evil-forward-word-begin #[512 "\211\203\303\202 \304`\206\305\306!\210\307 \204\310\"\207\2039 \n>\2039\311!\243\2060W\2039\312\"\207\310\"\313 V\203m\314\315\313 \"\203m\316\317!\210\314\320\313 \"\203f\313 X\204f\316\317!\210\202Pn\203m\321u\210\207" [evil-want-change-word-to-end evil-this-operator evil-change-commands evil-WORD evil-word 1 evil-signal-at-bob-or-eob evil-operator-state-p evil-forward-beginning bounds-of-thing-at-point forward-thing line-beginning-position looking-back "^[[:space:]]*" evil-move-end-of-line 0 "^[[:space:]]+$" nil] 9 (#$ . 16926) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@123 Move the cursor to the end of the COUNT-th next word. If BIGWORD is non-nil, move by WORDS. (fn &optional COUNT BIGWORD) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-forward-word-begin :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-word-end] 2]] 8) (defalias 'evil-forward-word-end #[512 "\211\203\300\202 \301\206\302\303!\210\304 \2058\211\302U\2058\305!\211\2050\211@`U\2050\211A`TU\262\2058\306\307!?\205@\310\"\207" [evil-WORD evil-word 1 evil-signal-at-bob-or-eob evil-operator-state-p bounds-of-thing-at-point looking-at "[[:word:]]" evil-forward-end] 7 (#$ . 18468) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@133 Move the cursor to the beginning of the COUNT-th previous word. If BIGWORD is non-nil, move by WORDS. (fn &optional COUNT BIGWORD) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-forward-word-end :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-word-begin] 2]] 8) (defalias 'evil-backward-word-begin #[512 "\211\203\300\202 \301\302\206\303[!\210\304\"\207" [evil-WORD evil-word evil-signal-at-bob-or-eob 1 evil-backward-beginning] 6 (#$ . 19300) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@127 Move the cursor to the end of the COUNT-th previous word. If BIGWORD is non-nil, move by WORDS. (fn &optional COUNT BIGWORD) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-backward-word-begin :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-word-end] 2]] 8) (defalias 'evil-backward-word-end #[512 "\211\203\300\202 \301\302\206\303[!\210\304\"\207" [evil-WORD evil-word evil-signal-at-bob-or-eob 1 evil-backward-end] 6 (#$ . 19992) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@83 Move the cursor to the beginning of the COUNT-th next WORD. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-backward-word-end :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-WORD-begin] 2]] 8) (defalias 'evil-forward-WORD-begin #[256 "\300\301\"\207" [evil-forward-word-begin t] 4 (#$ . 20670) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@77 Move the cursor to the end of the COUNT-th next WORD. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-forward-WORD-begin :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-WORD-end] 2]] 8) (defalias 'evil-forward-WORD-end #[256 "\300\301\"\207" [evil-forward-word-end t] 4 (#$ . 21222) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@87 Move the cursor to the beginning of the COUNT-th previous WORD. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-forward-WORD-end :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-WORD-begin] 2]] 8) (defalias 'evil-backward-WORD-begin #[256 "\300\301\"\207" [evil-backward-word-begin t] 4 (#$ . 21763) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@81 Move the cursor to the end of the COUNT-th previous WORD. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-backward-WORD-begin :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-WORD-end] 2]] 8) (defalias 'evil-backward-WORD-end #[256 "\300\301\"\207" [evil-backward-word-end t] 4 (#$ . 22321) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@86 Move the cursor to the beginning of the COUNT-th next section. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-backward-WORD-end :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-section-begin] 2]] 8) (defalias 'evil-forward-section-begin #[256 "\300!\210\301\302\"\207" [evil-signal-at-bob-or-eob evil-forward-beginning evil-defun] 4 (#$ . 22870) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@80 Move the cursor to the end of the COUNT-th next section. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-forward-section-begin :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-section-end] 2]] 10) (defalias 'evil-forward-section-end #[256 "\300!\210\301\302\"\210m?\205\303y\207" [evil-signal-at-bob-or-eob evil-forward-end evil-defun nil] 4 (#$ . 23475) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@90 Move the cursor to the beginning of the COUNT-th previous section. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-forward-section-end :repeat motion :jump t :type inclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-section-begin] 2]] 10) (defalias 'evil-backward-section-begin #[256 "\300\206\301[!\210\302\303\"\207" [evil-signal-at-bob-or-eob 1 evil-backward-beginning evil-defun] 4 (#$ . 24104) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@84 Move the cursor to the end of the COUNT-th previous section. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-backward-section-begin :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-section-end] 2]] 10) (defalias 'evil-backward-section-end #[256 "\300\206\301[!\210\302\210\303\304\"\210m?\205\305y\207" [evil-signal-at-bob-or-eob 1 -1 evil-backward-end evil-defun nil] 4 (#$ . 24746) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@96 Move to the next COUNT-th beginning of a sentence or end of a paragraph. (fn &optional COUNT)#@12 (fn CNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-backward-section-end :repeat motion :jump t :type inclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-sentence-begin] 2]] 10) (defalias 'evil-forward-sentence-begin #[256 "\300!\210\301\302\303#\207" [evil-signal-at-bob-or-eob evil-forward-nearest #[257 "\300\301!\207" [evil-forward-beginning evil-sentence] 3 (#$ . 25508)] evil-forward-paragraph] 5 (#$ . 25408) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@91 Move to the previous COUNT-th beginning of a sentence or paragraph. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-forward-sentence-begin :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-sentence-begin] 2]] 10) (defalias 'evil-backward-sentence-begin #[256 "\300\206\301[!\210\302\206\301[\303\304#\207" [evil-signal-at-bob-or-eob 1 evil-forward-nearest #[257 "\300\301!\207" [evil-backward-beginning evil-sentence] 3 (#$ . 25508)] #[257 "\300 \207" [evil-backward-paragraph] 2 (#$ . 25508)]] 5 (#$ . 26149) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@71 Move to the end of the COUNT-th next paragraph. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-backward-sentence-begin :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-forward-paragraph] 2]] 10) (defalias 'evil-forward-paragraph #[256 "\300!\210\301\302\"\210m?\205\303y\207" [evil-signal-at-bob-or-eob evil-forward-end evil-paragraph nil] 4 (#$ . 26935) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@81 Move to the beginning of the COUNT-th previous paragraph. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-forward-paragraph :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-backward-paragraph] 2]] 10) (defalias 'evil-backward-paragraph #[256 "\300\206\301[!\210m\204\302y\210\303\304\"\210o?\205\305y\207" [evil-signal-at-bob-or-eob 1 nil evil-backward-beginning evil-paragraph -1] 4 (#$ . 27557) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@116 Find the next item in this line after or under the cursor and jump to the corresponding one. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-backward-paragraph :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-jump-item] 2]] 10) (defalias 'evil-jump-item #[256 "\211\203k\204&\306\n\307>\203 \202%\f\203$l\203$n\204$ \202%ideZe\310V\2038\311\245_\202=_\311\245\\\262b\210\203L\312 \210\202f\313.\206d :\203c\314\315 @! A\\]\202d !\210\316\211/\207\317\320!\203\207`\321\322!\210n?\206\211b\210\323\262\203\207\324u\207l\204\225\325\320!\203\225\321\324!\2070\326>\203\353\327\330\323\320#\203\3531\331P2\332\3323\2604\212\333 \210\334 \206\276\335 )\203\327\336 \210\334 \203\323\337 \210\336 \210\202\305\320\202\345\212\333 \210\340 )\205\345\341 \210\320)\262\206\243dd\3421\212l\203\375n\204\375\324u\210\343`\322\324#S\262\344 W\205b\210\345 \210`S)0\202\210\323\3461G\212l\203+n\204+\324u\210\343`\322\211#S\262\344 W\205BTb\210\347 \210`)0\202I\210\323\204\226\211\204\226`\350\351!\211\203``AW\204d\352\353!\207\211A\212\211b\210\350\351!\211\205u`AW)\262\204\217\3541\212\211b\210\355 \210\3230\202\214\210\320\205\225b\210\352\353!\207W\203\237b\207\211b\266\204\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) 80000 100 evil-first-non-blank line-move-to-column 0 truncate line evil-looking-at-start-comment t forward-comment 1 nil -1 evil-looking-at-end-comment (c-mode c++-mode c-ts-mode c++-ts-mode) require hideif "\\(?:else\\|elif[ ]+\\)" "\\|" beginning-of-line hif-looking-at-ifX hif-looking-at-else hif-find-next-relevant hif-ifdef-to-endif hif-looking-at-endif hif-endif-to-ifdef (error) scan-lists line-end-position forward-list (error) backward-list bounds-of-thing-at-point evil-string user-error "No matching item found on the current line" (error) evil-jump-item goal-column evil-this-type major-mode hif-cpp-prefix hif-ifx-regexp hif-endif-regexp hif-ifx-else-endif-regexp] 11 (#$ . 28225) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@72 Go to the COUNT'th spelling mistake after point. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-jump-item :repeat motion :jump t :type inclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-flyspell-error] 2]] 10) (defalias 'evil-next-flyspell-error #[256 "\303\300!\203\n\204\304\305\306\"\210\211\206\307\310V``\306\311\206\307!\310\211W\203\257\306\2031d\2022e\306\203E\212b\210\312\313!\210`)\262\203QY\202UX\203\211\204` \204h\304\305\306\"\210\202\221\210\314\262\203we\202z\315d!\262\202\221\203\213\316!\202\217\315!\262\317\320\321 !\"\211\262\203E\211\203\251\306\322\323!)\210\266T\202!\266\324!b\207" [flyspell-mode evil-search-wrap message-log-max boundp signal search-failed nil 1 0 abs skip-syntax-forward "w" t previous-overlay-change next-overlay-change seq-find flyspell-overlay-p overlays-at message "Search wrapped" overlay-start] 14 (#$ . 30583) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@76 Go to the COUNT'th spelling mistake preceding point. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-next-flyspell-error :repeat motion :jump t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-prev-flyspell-error] 2]] 8) (defalias 'evil-prev-flyspell-error #[256 "\300\206\301[!\207" [evil-next-flyspell-error 1] 3 (#$ . 31746) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@59 Go to COUNT previous unmatched "(". (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-prev-flyspell-error :repeat motion :jump t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-open-paren] 2]] 8) (defalias 'evil-previous-open-paren #[256 "\300\301\302\206\303[#\207" [evil-up-paren 40 41 1] 5 (#$ . 32292) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@55 Go to COUNT next unmatched ")". (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-previous-open-paren :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-close-paren] 2]] 10) (defalias 'evil-next-close-paren #[256 "\300u\210\301\302\303\206 \304#\210\305u\207" [nil evil-up-paren 40 41 1 -1] 5 (#$ . 32824) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@59 Go to COUNT previous unmatched "{". (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-next-close-paren :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-open-brace] 2]] 10) (defalias 'evil-previous-open-brace #[256 "\300\301\302\206\303[#\207" [evil-up-paren 123 125 1] 5 (#$ . 33395) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@55 Go to COUNT next unmatched "}". (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-previous-open-brace :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-close-brace] 2]] 10) (defalias 'evil-next-close-brace #[256 "\300u\210\301\302\303\206 \304#\210\305u\207" [nil evil-up-paren 123 125 1 -1] 5 (#$ . 33951) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@28 Get all lowercase markers.#@10 (fn X) (evil-set-command-properties 'evil-next-close-brace :repeat 'motion :jump t :type 'exclusive :keep-visual t) (defalias 'evil--lowercase-markers #[0 "\301\302\"\207" [evil-markers-alist cl-remove-if-not #[257 "\300A!\205\211@\211\301Y\205\211\302X\262\207" [markerp 97 122] 4 (#$ . 34556)]] 3 (#$ . 34524)])#@166 Move to next lowercase mark. Move forward if FORWARDP is non-nil, and backward otherwise. Loop back to the beginning of buffer if the end is reached. (fn FORWARDP) (defalias 'evil--next-mark #[257 "\211\203 `T\202\n`\300\301 \206\302\303!\203\304\202\305\306\307\310\"$\211@Ab\207" [cl-sort evil--lowercase-markers user-error "No marks in this buffer" < > :key make-closure #[257 "\211A\300W\203 \302\202\f A\\\207" [V0 most-negative-fixnum 0] 3 (#$ . 34556)]] 9 (#$ . 34885)])#@56 Go to COUNT next lowercase mark. (fn &optional COUNT) (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-mark] 2]) (defalias 'evil-next-mark #[256 "\211\206\300\301\211W\205\302\303\304!\266T\202\207" [1 0 nil evil--next-mark t] 6 (#$ . 35383) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@83 Go to COUNT line of next lowercase mark after current line. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-next-mark :repeat nil :keep-visual t :type exclusive :jump eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-mark-line] 2]] 10) (defalias 'evil-next-mark-line #[256 "\300 \204 \301\302!\210\211\206\303\304\211W\203#\305\306\305!\210\307\310!\266T\202\266\311 \207" [evil--lowercase-markers user-error "No marks in this buffer" 1 0 nil move-end-of-line evil--next-mark t evil-first-non-blank] 6 (#$ . 35765) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@60 Go to COUNT previous lowercase mark. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-next-mark-line :repeat nil :keep-visual t :type exclusive :jump eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-mark] 2]] 10) (defalias 'evil-previous-mark #[256 "\211\206\300\301\211W\205\302\303\302!\266T\202\207" [1 0 nil evil--next-mark] 6 (#$ . 36503) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@88 Go to COUNT line of previous lowercase mark before current line. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-previous-mark :repeat nil :keep-visual t :type exclusive :jump eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-mark-line] 2]] 10) (defalias 'evil-previous-mark-line #[256 "\300 \204 \301\302!\210\211\206\303\304\211W\203#\305\306\305!\210\307\305!\266T\202\266\310 \207" [evil--lowercase-markers user-error "No marks in this buffer" 1 0 nil move-beginning-of-line evil--next-mark evil-first-non-blank] 6 (#$ . 37073) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@81 Set MARK at column 0 of line of END. Default is cursor line. (fn BEG END MARK) (evil-set-command-properties 'evil-previous-mark-line :repeat nil :keep-visual t :type 'exclusive :jump t) (defalias 'evil-set-col-0-mark #[771 "\211G\300V\203 \301\302!\207\212m\203\202Sb\210\303 \210\304\305!!)\207" [1 user-error "Trailing characters" evil-beginning-of-line evil-set-marker string-to-char] 6 (#$ . 37832) (byte-code "\302\303 \205 C\"\207" [evil-called-from-ex-p evil-ex-argument append evil-operator-range] 3)])#@155 Move to the next COUNT'th occurrence of CHAR. Movement is restricted to the current line unless `evil-cross-lines' is non-nil. (fn &optional COUNT CHAR) (byte-code "\300\301\302\303#\210\304\305\306\"\207" [evil-set-command-properties evil-set-col-0-mark :ex-arg t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-find-char] 2]] 4) (defalias 'evil-find-char #[512 "\206\305\262\306V\205 \307\310E\203\311\305\f\"\210\312\313!\f\203+\307\202T\203<\203<\212\314 \210`)\202T\203E\315 \202T\203R\212\316 \210`)\202T\317 \320$\203_\321u\210?\205g\322\323\")\207" [evil-respect-visual-line-mode visual-line-mode case-fold-search evil-last-find evil-cross-lines 1 0 nil evil-find-char evil-forward-char search-forward char-to-string end-of-visual-line line-end-position beginning-of-visual-line line-beginning-position t -1 user-error "Can't find `%c'"] 9 (#$ . 38361) (byte-code "\205\302!\303 \203 \214~\210 @@ @A}\210 A\304 *\202\"\304 D\207" [current-prefix-arg evil-restriction-stack prefix-numeric-value evil-operator-state-p evil-read-key] 3)])#@78 Move to the previous COUNT'th occurrence of CHAR. (fn &optional COUNT CHAR) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-find-char :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-find-char-backward] 2]] 8) (defalias 'evil-find-char-backward #[512 "\300\206\301[\"\207" [evil-find-char 1] 5 (#$ . 39494) (byte-code "\205\302!\303 \203 \214~\210 @@ @A}\210 A\304 *\202\"\304 D\207" [current-prefix-arg evil-restriction-stack prefix-numeric-value evil-operator-state-p evil-read-key] 3)])#@78 Move before the next COUNT'th occurrence of CHAR. (fn &optional COUNT CHAR) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-find-char-backward :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-find-char-to] 2]] 8) (defalias 'evil-find-char-to #[512 "\300\216\301\")\210\206 \302\303V\203\304u\207\305u\207" [#[0 "\301\240\207" [evil-last-find evil-find-char-to] 2] evil-find-char 1 0 -1 nil] 5 (#$ . 40143) (byte-code "\205\302!\303 \203 \214~\210 @@ @A}\210 A\304 *\202\"\304 D\207" [current-prefix-arg evil-restriction-stack prefix-numeric-value evil-operator-state-p evil-read-key] 3)])#@82 Move before the previous COUNT'th occurrence of CHAR. (fn &optional COUNT CHAR) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-find-char-to :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-find-char-to-backward] 2]] 8) (defalias 'evil-find-char-to-backward #[512 "\300\206\301[\"\207" [evil-find-char-to 1] 5 (#$ . 40894) (byte-code "\205\302!\303 \203 \214~\210 @@ @A}\210 A\304 *\202\"\304 D\207" [current-prefix-arg evil-restriction-stack prefix-numeric-value evil-operator-state-p evil-read-key] 3)])#@57 Repeat the last find COUNT times. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-find-char-to-backward :repeat motion :type exclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-repeat-find-char] 2]] 8) (defalias 'evil-repeat-find-char #[256 "\211\206\303\262\206\304\305!\211G\306U\203\211A\262\242\202%\307\310\311GD\"\211A\262\242\242\312W\2038[\262?\313=\203_ \203_\303U\203_\314\203S`Tf\202V`Sf\"\203_T\262\315\203j\202l[\"\210\3168?\205y\317\211)\207" [evil-last-find evil-repeat-find-to-skip-next evil-this-type 1 user-error "No previous search" 3 signal wrong-number-of-arguments (cmd char fwd) 0 evil-find-char-to eql nil 2 exclusive] 8 (#$ . 41559) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@83 Repeat the last find COUNT times in the opposite direction. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-repeat-find-char :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-repeat-find-char-reverse] 2]] 8) (defalias 'evil-repeat-find-char-reverse #[256 "\300\206\301[!\207" [evil-repeat-find-char 1] 3 (#$ . 42483) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@94 Go to column COUNT on the current line. Columns are counted from zero. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-repeat-find-char-reverse :repeat motion :type inclusive :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-column] 2]] 8) (defalias 'evil-goto-column #[256 "\300\206\301!\207" [move-to-column 0] 3 (#$ . 43050) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@66 Go to the marker specified by CHAR. (fn CHAR &optional NOERROR) (evil-set-command-properties 'evil-goto-column :repeat 'motion :type 'exclusive :keep-visual t) (defalias 'evil-goto-mark #[513 "\300!\301!\203\302\303!!\210\211b\207\211\247\203\211b\207\211:\203;\304@!\2047\305\306\307@\"!\205P\310@!\205P\211Ab\207?\205P\311\312\313!\203N\314\202O\315#\207" [evil-get-marker markerp switch-to-buffer marker-buffer find-buffer-visiting y-or-n-p format "Visit file %s again? " find-file user-error "Marker `%c' is not set%s" evil-global-marker-p "" " in this buffer"] 8 (#$ . 43602) (byte-code "\300 C\207" [read-char] 1)])#@78 Go to the line of the marker specified by CHAR. (fn CHAR &optional NOERROR) (evil-set-command-properties 'evil-goto-mark :keep-visual t :repeat nil :type 'exclusive :jump t) (defalias 'evil-goto-mark-line #[513 "\300\"\210\301 \207" [evil-goto-mark evil-first-non-blank] 5 (#$ . 44251) (byte-code "\300 C\207" [read-char] 1)])#@85 Like `goto-last-change' but takes a COUNT rather than a span. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\303& \210\311\312\313\"\207" [evil-set-command-properties evil-goto-mark-line :keep-visual t :repeat nil :type line :jump eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-last-change] 2]] 10) (defalias 'evil-goto-last-change #[256 "\301\211\206\302\303\211W\205\304\301\304!\266T\202\207" [this-command goto-last-change 1 0 nil] 6 (#$ . 44586) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@93 Like `goto-last-change-reverse' but takes a COUNT rather than a span. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-goto-last-change :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-last-change-reverse] 2]] 6) (defalias 'evil-goto-last-change-reverse #[256 "\301\211\206\302\303\211W\205\304\301\304!\266T\202\207" [this-command goto-last-change-reverse 1 0 nil] 6 (#$ . 45201) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@131 Go to older position in jump list. To go the other way, press \\[evil-jump-forward]. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-goto-last-change-reverse :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-jump-backward] 2]] 6) (defalias 'evil-jump-backward #[256 "\300!\207" [evil--jump-backward] 3 (#$ . 45819) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@132 Go to newer position in jump list. To go the other way, press \\[evil-jump-backward]. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-jump-backward :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-jump-forward] 2]] 6) (defalias 'evil-jump-forward #[256 "\300!\207" [evil--jump-forward] 3 (#$ . 46381) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@114 Go to the previous position in jump list. The current position is placed in the jump list. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-jump-forward :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-jump-backward-swap] 2]] 6) (defalias 'evil-jump-backward-swap #[256 "`\300\301!\210\302!\207" [evil--jump-backward 1 evil-set-jump] 4 (#$ . 46930) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@121 Jump to tag under point. If called with a prefix argument, provide a prompt for specifying the tag. (fn &optional ARG) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-jump-backward-swap :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-jump-to-tag] 2]] 6) (defalias 'evil-jump-to-tag #[256 "\303\304!\203 \211\305\304!)\207\303\306!\2052\211\203\305\306!\207 \206&\n\301N\206&\307 \306\206/\310\311!!\262\207" [xref-prompt-for-identifier find-tag-default-function major-mode fboundp xref-find-definitions call-interactively find-tag find-tag-default user-error "No tag found around point"] 5 (#$ . 47503) (list current-prefix-arg)])#@57 Look up the keyword at point. Calls `evil-lookup-func'. (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-jump-to-tag :repeat motion :jump t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-lookup] 2]] 8) (defalias 'evil-lookup #[0 " \207" [evil-lookup-func] 1 (#$ . 48268) nil])#@22 (fn COUNT INDENT?) (evil-set-command-properties 'evil-lookup :repeat 'motion :keep-visual t) (defalias 'evil-ret-gen #[514 "\302`\303\"\206\302`\304\"\206\302`\305\"\211\203K\306\307!\203K\306\310!\203K\2119\203-\211\307N\204:\211:\203K\307!\307N\203K\311 \203A\312\306\310!\205\213\310`!\207\306\313!\203g\306\314!\203g\313`!\203g\311 \203d\312\314 \207\315 \204u\316 \203\210 \204\210\204}\317!\207\320\312!\210\317!\210\321 \207\322!\207" [evil-inhibit-operator buffer-read-only get-char-property field button widget-doc fboundp widget-type widget-button-press evil-operator-state-p t button-at push-button evil-emacs-state-p evil-insert-state-p newline delete-horizontal-space indent-according-to-mode evil-next-line-first-non-blank] 5 (#$ . 48661)])#@142 Move the cursor COUNT lines down. If point is on a widget or a button, click on it. In Insert state, insert a newline. (fn &optional COUNT) (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ret] 2]) (defalias 'evil-ret #[256 "\300\301\"\207" [evil-ret-gen nil] 4 (#$ . 49452) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@153 Move the cursor COUNT lines down. If point is on a widget or a button, click on it. In Insert state, insert a newline and indent. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-ret :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ret-and-indent] 2]] 8) (defalias 'evil-ret-and-indent #[256 "\300\301\"\207" [evil-ret-gen t] 4 (#$ . 49856) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@81 Move the cursor to line COUNT from the top of the window. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-ret-and-indent :repeat motion :type line :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-window-top] 2]] 8) (defalias 'evil-window-top #[256 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\310\206(\311\311U\204Ae\312 U\204A\313\312 `\"W\203E\311\202G]!\210\203Q\314 \207\315\206i :\203h\311\316 @! A\\]\202i !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) move-to-window-line 0 window-start count-screen-lines evil-first-non-blank line-move-to-column truncate scroll-margin goal-column] 6 (#$ . 50440) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@51 Move the cursor to the middle line in the window. (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-window-top :repeat motion :jump t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-window-middle] 2]] 10) (defalias 'evil-window-middle #[0 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\310\311!\210\203-\312 \207\313\206E :\203D\314\315 @! A\\]\202E !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) move-to-window-line nil evil-first-non-blank line-move-to-column 0 truncate goal-column] 4 (#$ . 51397) nil])#@84 Move the cursor to line COUNT from the bottom of the window. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-window-middle :repeat motion :jump t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-window-bottom] 2]] 10) (defalias 'evil-window-bottom #[256 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\310\206(\311\312U\204:\313`\314 \"W\203>\311\202AT][!\210\203L\315 \207\316\206d :\203c\312\317 @! A\\]\202d !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) move-to-window-line 1 0 count-screen-lines window-end evil-first-non-blank line-move-to-column truncate scroll-margin goal-column] 6 (#$ . 52157) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@52 Scroll the window COUNT lines upwards. (fn COUNT) (evil-set-command-properties 'evil-window-bottom :repeat 'motion :jump t :type 'line :keep-visual t) (defalias 'evil-scroll-line-up #[257 "\301\302!)\207" [scroll-preserve-screen-position nil scroll-down] 3 (#$ . 53126) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@54 Scroll the window COUNT lines downwards. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-up :repeat nil :keep-visual t) (defalias 'evil-scroll-line-down #[257 "\301\302!)\207" [scroll-preserve-screen-position nil scroll-up] 3 (#$ . 53476) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@125 Set `evil-scroll-count' to 0. `evil-scroll-up' and `evil-scroll-down' will then scroll by half of the screen (the default). (evil-set-command-properties 'evil-scroll-line-down :repeat nil :keep-visual t) (defalias 'evil-scroll-count-reset #[0 "\301\211\207" [evil-scroll-count 0] 2 (#$ . 53806) nil])#@63 Given a user-supplied COUNT, return scroll count. (fn COUNT) (evil-set-command-properties 'evil-scroll-count-reset :repeat nil :keep-visual t) (defalias 'evil--get-scroll-count #[257 "\301\211!\206\211!\206\302 \303\245\207" [evil-scroll-count #[257 "\300!\205 \211\301V\205 \211\207" [natnump 0] 3 (#$ . 34556)] window-body-height 2] 4 (#$ . 54113)])#@239 Scroll the window and the cursor COUNT lines upwards. If COUNT is not specified the function scrolls up `evil-scroll-count' lines, which is the last used count. If the scroll count is zero the command scrolls half the screen. (fn COUNT) (defalias 'evil-scroll-up #[257 "\306 eU\203\f\307\310\311\"\210\312!\262\2043\313\n\314>\203! \2022\f\2031l\2031n\2041 \2022i`\3151_\316=\205C\317!*0\210\320 eX\203e\211b\210\321[!\266\202f\210\321[!\210\210\203m\322 \207\323\206\205 :\203\204\324\325 @! A\\]\202\205 !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum line-beginning-position signal beginning-of-buffer nil evil--get-scroll-count next-line (next-line previous-line) (beginning-of-buffer) always scroll-down window-start vertical-motion evil-first-non-blank line-move-to-column 0 truncate real-last-command real-this-command scroll-preserve-screen-position goal-column] 5 (#$ . 54481) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@243 Scroll the window and the cursor COUNT lines downwards. If COUNT is not specified the function scrolls down `evil-scroll-count' lines, which is the last used count. If the scroll count is zero the command scrolls half the screen. (fn COUNT) (byte-code "\300\301\302\303\304\305%\210\306\301\307\305#\207" [evil-set-command-properties evil-scroll-up :repeat nil :keep-visual t put scroll-command] 6) (defalias 'evil-scroll-down #[257 "\306 dU\203\f\307\310\311\"\210\312!\262\2043\313\n\314>\203! \2022\f\2031l\2031n\2041 \2022id\315 X\203A\316!\210\202\3171w\320=\205P\321!*0\210\212\322 b\210\316\323\324 SZ]!\210d`X\205r\325\326!)\210\202\210db\210\325\326!\210\203\206\327 \207\330\206\236 :\203\235\323\331 @! A\\]\202\236 !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum line-end-position signal end-of-buffer nil evil--get-scroll-count next-line (next-line previous-line) window-end vertical-motion (end-of-buffer) always scroll-up window-start 0 window-height recenter -1 evil-first-non-blank line-move-to-column truncate real-last-command real-this-command scroll-preserve-screen-position scroll-margin goal-column] 5 (#$ . 55548) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@52 Scroll the window COUNT pages upwards. (fn COUNT) (byte-code "\300\301\302\303\304\305%\210\306\301\307\305#\207" [evil-set-command-properties evil-scroll-down :repeat nil :keep-visual t put scroll-command] 6) (defalias 'evil-scroll-page-up #[257 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\310\211W\203R\31115\312\313!0\210\202No\203J\310U\203J\314@A\"\266\202Neb\266T\202#\210\203Z\315 \207\316\206r :\203q\310\317 @! A\\]\202r !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) 0 (beginning-of-buffer) scroll-down nil signal evil-first-non-blank line-move-to-column truncate goal-column] 6 (#$ . 56870) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@54 Scroll the window COUNT pages downwards. (fn COUNT) (evil-set-command-properties 'evil-scroll-page-up :repeat nil :keep-visual t) (defalias 'evil-scroll-page-down #[257 "\204\"\306\n\307>\203 \202!\f\203 l\203 n\204 \202!i\310\211W\203R\31115\312\313!0\210\202Nm\203J\310U\203J\314@A\"\266\202Ndb\266T\202#\210\203Z\315 \207\316\206r :\203q\310\317 @! A\\]\202r !\207" [evil-start-of-line this-command last-command temporary-goal-column track-eol most-positive-fixnum next-line (next-line previous-line) 0 (end-of-buffer) scroll-up nil signal evil-first-non-blank line-move-to-column truncate goal-column] 6 (#$ . 57687) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@85 Scroll line number COUNT (or the cursor line) to the top of the window. (fn COUNT) (evil-set-command-properties 'evil-scroll-page-down :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-top #[257 "\211\203i eb\210Sy\210\302!*\266\303\304!\207" [goal-column temporary-goal-column move-to-column recenter 0] 4 (#$ . 58418) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@153 Scroll line number COUNT (or the cursor line) to the top of the window. Then move the cursor to the first non-blank character of that line. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-top :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-top-first-non-blank #[257 "\300!\210\301 \207" [evil-scroll-line-to-top evil-first-non-blank] 3 (#$ . 58841) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@88 Scroll line number COUNT (or the cursor line) to the center of the window. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-top-first-non-blank :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-center #[257 "\211\203i eb\210Sy\210\302!*\266\303 \207" [goal-column temporary-goal-column move-to-column recenter] 4 (#$ . 59300) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@156 Scroll line number COUNT (or the cursor line) to the center of the window. Then move the cursor to the first non-blank character of that line. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-center :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-center-first-non-blank #[257 "\300!\210\301 \207" [evil-scroll-line-to-center evil-first-non-blank] 3 (#$ . 59741) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@88 Scroll line number COUNT (or the cursor line) to the bottom of the window. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-center-first-non-blank :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-bottom #[257 "\211\203i eb\210Sy\210\302!*\266\303\304!\207" [goal-column temporary-goal-column move-to-column recenter -1] 4 (#$ . 60212) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@156 Scroll line number COUNT (or the cursor line) to the bottom of the window. Then move the cursor to the first non-blank character of that line. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-bottom :repeat nil :keep-visual t) (defalias 'evil-scroll-line-to-bottom-first-non-blank #[257 "\300!\210\301 \207" [evil-scroll-line-to-bottom evil-first-non-blank] 3 (#$ . 60663) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@93 Scroll the line right below the window, or line COUNT to the top of the window. (fn COUNT) (evil-set-command-properties 'evil-scroll-line-to-bottom-first-non-blank :repeat nil :keep-visual t) (defalias 'evil-scroll-bottom-line-to-top #[257 "\211\204 \300 b\210\301 \210\302!\207" [window-end evil-first-non-blank evil-scroll-line-to-top] 3 (#$ . 61134) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@96 Scroll the line right above the window, or line COUNT to the bottom of the window. (fn COUNT) (evil-set-command-properties 'evil-scroll-bottom-line-to-top :repeat nil :keep-visual t) (defalias 'evil-scroll-top-line-to-bottom #[257 "\211\204 \300 b\210\301 \210\302!\207" [window-start evil-first-non-blank evil-scroll-line-to-bottom] 3 (#$ . 61574) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@68 Scroll the window COUNT half-screenwidths to the left. (fn COUNT) (evil-set-command-properties 'evil-scroll-top-line-to-bottom :repeat nil :keep-visual t) (defalias 'evil-scroll-left #[257 "\203 T\202\n\302\303\304\305 \306\245_!\210\307 \\\310\307 \305 [\311$\312i]^!)\207" [auto-hscroll-mode hscroll-margin 0 nil scroll-right window-width 2 window-hscroll + -1 move-to-column] 8 (#$ . 62010) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@69 Scroll the window COUNT half-screenwidths to the right. (fn COUNT) (evil-set-command-properties 'evil-scroll-left :repeat nil :keep-visual t) (defalias 'evil-scroll-right #[257 "\203 T\202\n\302\303\304\305 \306\245_!\210\307 \\\310\307 \305 [\311$\312i]^!)\207" [auto-hscroll-mode hscroll-margin 0 nil scroll-left window-width 2 window-hscroll + -1 move-to-column] 8 (#$ . 62492) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@58 Scroll the window COUNT columns to the left. (fn COUNT) (evil-set-command-properties 'evil-scroll-right :repeat nil :keep-visual t) (defalias 'evil-scroll-column-left #[257 "\203 T\202\n\302\303\304!\210\305 \\\306\305 \307 [\310$\311i]^!)\207" [auto-hscroll-mode hscroll-margin 0 nil scroll-right window-hscroll + window-width -1 move-to-column] 8 (#$ . 62961) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@59 Scroll the window COUNT columns to the right. (fn COUNT) (evil-set-command-properties 'evil-scroll-column-left :repeat nil :keep-visual t) (defalias 'evil-scroll-column-right #[257 "\203 T\202\n\302\303\304!\210\305 \\\306\305 \307 [\310$\311i]^!)\207" [auto-hscroll-mode hscroll-margin 0 nil scroll-left window-hscroll + window-width -1 move-to-column] 8 (#$ . 63411) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@173 Scroll the window to position the cursor at the end (right side) of the screen. Warn if `hscroll-margin' > 0, as cursor will be `hscroll-margin' chars from the right edge. (evil-set-command-properties 'evil-scroll-column-right :repeat nil :keep-visual t) (defalias 'evil-scroll-end-column #[0 "i\302 Z\303 Z\304V\203\305\306 #\210\307\310\311_!Z!\207" [hscroll-margin this-command window-hscroll window-width 0 evil-echo "%s: hscroll-margin = %d" evil-scroll-column-left abs 2] 7 (#$ . 63869) nil])#@173 Scroll the window to position the cursor at the start (left side) of the screen. Warn if `hscroll-margin' > 0, as cursor will be `hscroll-margin' chars from the left edge. (evil-set-command-properties 'evil-scroll-end-column :repeat nil :keep-visual t) (defalias 'evil-scroll-start-column #[0 "i\302 \303V\203\304\305 #\210\306\307\310$!\207" [hscroll-margin this-command window-hscroll 0 evil-echo "%s: hscroll-margin = %d" evil-scroll-column-right - 1] 8 (#$ . 64381) nil])#@51 Select a word. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-scroll-start-column :repeat nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-word] 2]] 6) (defalias 'evil-a-word #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-word evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-a-restricted-object evil-word evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 64869) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@55 Select inner word. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-word :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-word] 2]] 8) (defalias 'evil-inner-word #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-word evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-inner-restricted-object evil-word evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 66485) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@51 Select a WORD. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-inner-word :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-WORD] 2]] 8) (defalias 'evil-a-WORD #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-WORD evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-a-restricted-object evil-WORD evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 68138) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@55 Select inner WORD. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-WORD :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-WORD] 2]] 8) (defalias 'evil-inner-WORD #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-WORD evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-inner-restricted-object evil-WORD evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 69775) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@53 Select a symbol. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-inner-WORD :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-symbol] 2]] 8) (defalias 'evil-a-symbol #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-symbol evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-an-object evil-symbol evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 71428) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@57 Select inner symbol. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-symbol :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-symbol] 2]] 8) (defalias 'evil-inner-symbol #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-symbol evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-inner-object evil-symbol evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 73065) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@55 Select a sentence. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-inner-symbol :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-sentence] 2]] 8) (defalias 'evil-a-sentence #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-sentence evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-an-object evil-sentence evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 74719) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@59 Select inner sentence. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-sentence :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-sentence] 2]] 8) (defalias 'evil-inner-sentence #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\244\315\316!\203\244 \262\n_\262 \317\320  \n%\262\321!\205\376\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203n\202p\327 !\262\330=\203\221\306!=\204\221\331!\325!\262\326!\262\210\305W\203\235\262\262\332 #\207\317\320  \n%\262\321!\204\311\n[\262 \317\320  \n%\262\321!\205\376\333`` #\262\203\344\334\"\262\202\355\323\306\n\"\"\210 \330=\203\370\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-sentence evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-inner-object evil-sentence evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 76368) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@56 Select a paragraph. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-inner-sentence :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-paragraph] 2]] 8) (defalias 'evil-a-paragraph #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\246\315\316!\203\246 \262\n_\262 \317\320  \n\313&\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\317\320  \n\313&\262\321!\204\317\n[\262 \317\320  \n\313&\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-paragraph evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-an-object evil-paragraph evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 78034) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@60 Select inner paragraph. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-a-paragraph :repeat motion :extend-selection t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-paragraph] 2]] 10) (defalias 'evil-inner-paragraph #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\246\315\316!\203\246 \262\n_\262 \317\320  \n\313&\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\317\320  \n\313&\262\321!\204\317\n[\262 \317\320  \n\313&\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-paragraph evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-inner-object evil-paragraph evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 79699) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@58 Select a parenthesis. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-inner-paragraph :repeat motion :extend-selection t :type line :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-paren] 2]] 10) (defalias 'evil-a-paren #[1024 "\206\304\262\305U?\205 \306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\247\314\315!\203\247 \262\n_\262 \316\317\320\f\f \321&\262\322!\205\323!\262\324\306\n\"\"\210\325!\262\326!\262\327!\262\306\n\203q\202s\330 !\262\331=\203\224\306!=\204\224\332!\326!\262\327!\262\210\305W\203\240\262\262\333 #\207\316\317\320\f\f \321&\262\322!\204\322\n[\262 \316\317\320\f\f \321&\262\322!\205\334`` #\262\203\355\335\"\262\202\366\324\306\n\"\"\210 \331=\203\332!\262\336\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-paren evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 40 41 t evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 19 (#$ . 81400) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@62 Select inner parenthesis. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-a-paren :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-paren] 2]] 8) (defalias 'evil-inner-paren #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\246\314\315!\203\246 \262\n_\262 \316\317\320\f\f &\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\316\317\320\f\f &\262\321!\204\317\n[\262 \316\317\320\f\f &\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-paren evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 40 41 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 83075) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@61 Select a square bracket. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-paren :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-bracket] 2]] 8) (defalias 'evil-a-bracket #[1024 "\206\304\262\305U?\205 \306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\247\314\315!\203\247 \262\n_\262 \316\317\320\f\f \321&\262\322!\205\323!\262\324\306\n\"\"\210\325!\262\326!\262\327!\262\306\n\203q\202s\330 !\262\331=\203\224\306!=\204\224\332!\326!\262\327!\262\210\305W\203\240\262\262\333 #\207\316\317\320\f\f \321&\262\322!\204\322\n[\262 \316\317\320\f\f \321&\262\322!\205\334`` #\262\203\355\335\"\262\202\366\324\306\n\"\"\210 \331=\203\332!\262\336\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-bracket evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 91 93 t evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 19 (#$ . 84731) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@65 Select inner square bracket. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-a-bracket :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-bracket] 2]] 8) (defalias 'evil-inner-bracket #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\246\314\315!\203\246 \262\n_\262 \316\317\320\f\f &\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\316\317\320\f\f &\262\321!\204\317\n[\262 \316\317\320\f\f &\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-bracket evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 91 93 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 86395) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@70 Select a curly bracket ("brace"). (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-bracket :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-curly] 2]] 8) (defalias 'evil-a-curly #[1024 "\206\304\262\305U?\205 \306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\247\314\315!\203\247 \262\n_\262 \316\317\320\f\f \321&\262\322!\205\323!\262\324\306\n\"\"\210\325!\262\326!\262\327!\262\306\n\203q\202s\330 !\262\331=\203\224\306!=\204\224\332!\326!\262\327!\262\210\305W\203\240\262\262\333 #\207\316\317\320\f\f \321&\262\322!\204\322\n[\262 \316\317\320\f\f \321&\262\322!\205\334`` #\262\203\355\335\"\262\202\366\324\306\n\"\"\210 \331=\203\332!\262\336\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-curly evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 123 125 t evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 19 (#$ . 88062) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@74 Select inner curly bracket ("brace"). (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-a-curly :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-curly] 2]] 8) (defalias 'evil-inner-curly #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\246\314\315!\203\246 \262\n_\262 \316\317\320\f\f &\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\316\317\320\f\f &\262\321!\204\317\n[\262 \316\317\320\f\f &\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-curly evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 123 125 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 89733) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@61 Select an angle bracket. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-curly :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-an-angle] 2]] 8) (defalias 'evil-an-angle #[1024 "\206\304\262\305U?\205 \306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\247\314\315!\203\247 \262\n_\262 \316\317\320\f\f \321&\262\322!\205\323!\262\324\306\n\"\"\210\325!\262\326!\262\327!\262\306\n\203q\202s\330 !\262\331=\203\224\306!=\204\224\332!\326!\262\327!\262\210\305W\203\240\262\262\333 #\207\316\317\320\f\f \321&\262\322!\204\322\n[\262 \316\317\320\f\f \321&\262\322!\205\334`` #\262\203\355\335\"\262\202\366\324\306\n\"\"\210 \331=\203\332!\262\336\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-an-angle evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 60 62 t evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 19 (#$ . 91403) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@64 Select inner angle bracket. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-an-angle :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-angle] 2]] 8) (defalias 'evil-inner-angle #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\246\314\315!\203\246 \262\n_\262 \316\317\320\f\f &\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\316\317\320\f\f &\262\321!\204\317\n[\262 \316\317\320\f\f &\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-angle evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-paren 60 62 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 93064) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@71 Select a single-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-angle :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-single-quote] 2]] 8) (defalias 'evil-a-single-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\246\315\316!\203\246 \262\n_\262 \317\320  \n\313&\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\317\320  \n\313&\262\321!\204\317\n[\262 \317\320  \n\313&\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-single-quote evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-quote 39 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 94723) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@75 Select inner single-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-single-quote :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-single-quote] 2]] 8) (defalias 'evil-inner-single-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\244\314\315!\203\244 \262\n_\262 \316\317  \n%\262\320!\205\376\321!\262\322\306\n\"\"\210\323!\262\324!\262\325!\262\306\n\203n\202p\326 !\262\327=\203\221\306!=\204\221\330!\324!\262\325!\262\210\305W\203\235\262\262\331 #\207\316\317  \n%\262\320!\204\311\n[\262 \316\317  \n%\262\320!\205\376\332`` #\262\203\344\333\"\262\202\355\322\306\n\"\"\210 \327=\203\370\330!\262\334\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-single-quote evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-quote 39 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 96397) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@71 Select a double-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-single-quote :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-double-quote] 2]] 8) (defalias 'evil-a-double-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\246\315\316!\203\246 \262\n_\262 \317\320  \n\313&\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\317\320  \n\313&\262\321!\204\317\n[\262 \317\320  \n\313&\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-double-quote evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-quote 34 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 98075) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@75 Select inner double-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-double-quote :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-double-quote] 2]] 8) (defalias 'evil-inner-double-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\244\314\315!\203\244 \262\n_\262 \316\317  \n%\262\320!\205\376\321!\262\322\306\n\"\"\210\323!\262\324!\262\325!\262\306\n\203n\202p\326 !\262\327=\203\221\306!=\204\221\330!\324!\262\325!\262\210\305W\203\235\262\262\331 #\207\316\317  \n%\262\320!\204\311\n[\262 \316\317  \n%\262\320!\205\376\332`` #\262\203\344\333\"\262\202\355\322\306\n\"\"\210 \327=\203\370\330!\262\334\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-double-quote evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-quote 34 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 99756) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@69 Select a back-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-double-quote :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-back-quote] 2]] 8) (defalias 'evil-a-back-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\246\315\316!\203\246 \262\n_\262 \317\320  \n\313&\262\321!\205\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203p\202r\327 !\262\330=\203\223\306!=\204\223\331!\325!\262\326!\262\210\305W\203\237\262\262\332 #\207\317\320  \n\313&\262\321!\204\317\n[\262 \317\320  \n\313&\262\321!\205\333`` #\262\203\352\334\"\262\202\363\323\306\n\"\"\210 \330=\203\376\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-back-quote evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-select-quote 96 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 18 (#$ . 101434) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@73 Select inner back-quoted expression. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-a-back-quote :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-back-quote] 2]] 8) (defalias 'evil-inner-back-quote #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\244\314\315!\203\244 \262\n_\262 \316\317  \n%\262\320!\205\376\321!\262\322\306\n\"\"\210\323!\262\324!\262\325!\262\306\n\203n\202p\326 !\262\327=\203\221\306!=\204\221\330!\324!\262\325!\262\210\305W\203\235\262\262\331 #\207\316\317  \n%\262\320!\204\311\n[\262 \316\317  \n%\262\320!\205\376\332`` #\262\203\344\333\"\262\202\355\322\306\n\"\"\210 \327=\203\370\330!\262\334\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-back-quote evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-quote 96 evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 103108) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@56 Select a tag block. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-inner-back-quote :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-a-tag] 2]] 8) (defalias 'evil-a-tag #[1024 "\206\304\262\305U?\205\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\244\314\315!\203\244 \262\n_\262 \316\n\n \317%\262\320!\205\376\321!\262\322\306\n\"\"\210\323!\262\324!\262\325!\262\306\n\203n\202p\326 !\262\327=\203\221\306!=\204\221\330!\324!\262\325!\262\210\305W\203\235\262\262\331 #\207\316\n\n \317%\262\320!\204\311\n[\262 \316\n\n \317%\262\320!\205\376\332`` #\262\203\344\333\"\262\202\355\322\306\n\"\"\210 \327=\203\370\330!\262\334\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-a-tag evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-xml-tag t evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 17 (#$ . 104777) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@60 Select inner tag block. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\"\207" [evil-set-command-properties evil-a-tag :repeat motion :extend-selection nil :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-inner-tag] 2]] 8) (defalias 'evil-inner-tag #[1024 "\206\304\262\305U?\205\375\306\307\"\310 \205\311\307\312\313# \313\211\211\211\310 \203\243\314\315!\203\243 \262\n_\262 \316\n\n $\262\317!\205\373\320!\262\321\306\n\"\"\210\322!\262\323!\262\324!\262\306\n\203m\202o\325 !\262\326=\203\220\306!=\204\220\327!\323!\262\324!\262\210\305W\203\234\262\262\330 #\207\316\n\n $\262\317!\204\306\n[\262 \316\n\n $\262\317!\205\373\331`` #\262\203\341\332\"\262\202\352\321\306\n\"\"\210 \326=\203\365\327!\262\333\313\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-inner-tag evil-visual-state-p evil-get-command-property :extend-selection nil called-interactively-p any evil-select-xml-tag evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 16 (#$ . 106408) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@61 Find COUNTth next match in DIRECTION. (fn DIRECTION COUNT) (evil-set-command-properties 'evil-inner-tag :repeat 'motion :extend-selection nil :keep-visual t) (defalias 'evil-match #[514 "\304=\204\n\305\306!\210`\307!\310\311 \312\211\211\212m\204\312u\210\313\314!\210\nU\262\n S X\2056X\266\202\262 SU\262\203[\203[\310=\203[\313!\210\202\213\203r\211\203r\315=\203r\313!\210\202\213\204}\310=\203\206\313S!\210\202\213\313!\210`)\262b\210\316 \203\265\317\n \320\f\321\267\202\253\314\202\254\322\202\254\312\323%\210\n D\202\331\203\306\315=\203\306 Sb\202\331\203\326\310=\203\326\nb\202\331\n D)\207" [evil-search-module evil-ex-search-direction evil-ex-search-match-beg evil-ex-search-match-end evil-search user-error "Match text objects only work with Evil search module" abs backward evil-visual-state-p nil evil-ex-search 1 forward evil-normal-state-p evil-visual-select inclusive #s(hash-table test eq purecopy t data (forward 163 backward 167)) -1 t] 15 (#$ . 108033)])#@55 Select next match. (fn &optional COUNT BEG END TYPE) (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-next-match] 2]) (defalias 'evil-next-match #[1024 "\206\304\262\305U?\205\356\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\236\315\316!\203\236 \262\n_\262 \317\320\f\"\262\321!\205\354\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203h\202j\327 !\262\330=\203\213\306!=\204\213\331!\325!\262\326!\262\210\305W\203\227\262\262\332 #\207\317\320\f\"\262\321!\204\267\n[\262 \317\320\f\"\262\321!\205\354\333`` #\262\203\322\334\"\262\202\333\323\306\n\"\"\210 \330=\203\346\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-next-match evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-match forward evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 16 (#$ . 109094) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@59 Select previous match. (fn &optional COUNT BEG END TYPE) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-next-match :repeat motion :extend-selection t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-previous-match] 2]] 8) (defalias 'evil-previous-match #[1024 "\206\304\262\305U?\205\356\306\307\"\310 \205\311\307\312\313# \314\211\211\211\310 \203\236\315\316!\203\236 \262\n_\262 \317\320\f\"\262\321!\205\354\322!\262\323\306\n\"\"\210\324!\262\325!\262\326!\262\306\n\203h\202j\327 !\262\330=\203\213\306!=\204\213\331!\325!\262\326!\262\210\305W\203\227\262\262\332 #\207\317\320\f\"\262\321!\204\267\n[\262 \317\320\f\"\262\321!\205\354\333`` #\262\203\322\334\"\262\202\333\323\306\n\"\"\210 \330=\203\346\331!\262\335\314\"\210\266\207\207" [evil-visual-char evil-visual-direction evil-text-object-change-visual-type evil-this-type-modified 1 0 evil-type evil-previous-match evil-visual-state-p evil-get-command-property :extend-selection t nil called-interactively-p any evil-match backward evil-range-p evil-expand-range evil-set-type evil-contract-range evil-range-beginning evil-range-end evil-visual-range line evil-text-object-make-linewise evil-visual-make-selection evil-range evil-range-union evil-set-range-properties] 16 (#$ . 110549) (byte-code "\205\301!\302 \203\303 \211@A@\304!E\262\202 \305\211\211EB\207" [current-prefix-arg prefix-numeric-value evil-visual-state-p evil-visual-range evil-type nil] 6)])#@102 Save the characters in motion into the kill-ring. (fn BEG END &optional TYPE REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-previous-match :repeat 'motion :extend-selection t :keep-visual t) (defalias 'evil-yank #[1282 "\303\216\304 \211\305\223\210 \203\306\307!\204k\n\205?\310\311!\2039\310\312!\2039\311 \2039\312\"\210\202j\313\267\202[\314$\210\202j\315$\210\202j\316$\210b\210)\317\320\206sd\"\210\317\321\206}d\322!\206\204dS]\"\210\211\305\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-was-yanked-without-register #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any fboundp cua--global-mark-active cua-copy-region-to-global-mark #s(hash-table test eq purecopy t data (block 63 line 77 screen-line 77)) evil-yank-rectangle evil-yank-lines evil-yank-characters evil-set-marker 91 93 marker-position] 12 (#$ . 112186) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\321 D\"\f\320\322 \203D\323\324!\210\202R\313\325\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-yank plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@157 Expand to line when in visual mode possibly changing BEG, END and TYPE. Avoids double expansion for line-based commands like "V" or "D". (fn BEG END TYPE) (evil-set-command-properties 'evil-yank :move-point nil :repeat nil :keep-visual t :suppress-operator t) (defalias 'evil-expand-line-for-line-based-operators #[771 "\302 \203>\211\303>\204;\206`Sf\304=\203S\262\305\203* \203*\306\202+\307#\310!\262\311!\262\312!\266\202\313 \210E\207" [evil-respect-visual-line-mode visual-line-mode evil-visual-state-p (line block screen-line) 10 evil-expand screen-line line evil-range-beginning evil-range-end evil-type evil-exit-visual-state] 7 (#$ . 113810)])#@76 Save whole lines into the kill-ring. (fn BEG END &optional TYPE REGISTER) (defalias 'evil-yank-line #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204F\307#\211G\310U\203.\211A\262\242\2025\311\312\313GD\"\211A\262\242\242\314\n$\266\315\316\206Nd\"\210\315\317\206Xd\320!\206_dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-expand-line-for-line-based-operators 3 signal wrong-number-of-arguments (beg end type) evil-yank evil-set-marker 91 93 marker-position] 15 (#$ . 114493) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-yank-line plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@147 Delete text from BEG to END with TYPE. Save in REGISTER or in the kill-ring with YANK-HANDLER. (fn BEG END &optional TYPE REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-yank-line :move-point nil :motion 'evil-line-or-visual-line :keep-visual t :suppress-operator t) (defalias 'evil-delete #[1282 "\306\216\307 \211\310\223\210 \203\311\312!\204\313>\203Y\314 \204Y\n\315=\203Y\212b\210n)\203Y\212b\210l)\203Y\316\"\317Y\203Y\320\"\211@\262\211A@\262\321\262\210\204w\322\"\323\310\324\325$\266\203\204v\326\327\"\210\210\310\330%)\210\331=\203\231\332\333\310$\210\202\335\321=\203\327dU\203\327U\204\271\206\262`Sf\334U\204\327eU\204\327\206\306`Sf\334U\203\327S|\210\202\335|\210\321=\203\311\312!\203\335 \210\f\204 \203%\336>\204\337&'=\203(\340>\203'\202 !\210\341\342\206d\"\210\341\343\206%d\344!\206,dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-this-operator evil-was-yanked-without-register evil-start-of-line evil-operator-start-col #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any (inclusive exclusive) evil-visual-state-p evil-delete evil-count-lines 1 evil-line-expand line filter-buffer-substring "\n" string-match t evil-set-register 45 evil-yank block evil-apply-on-block delete-region 10 evil-first-non-blank (evil-forward-word-begin evil-forward-WORD-begin) move-to-column (next-line previous-line) evil-set-marker 91 93 marker-position evil-this-motion most-positive-fixnum temporary-goal-column last-command] 16 (#$ . 115791) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\321 D\"\f\320\322 \203D\323\324!\210\202R\313\325\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-delete plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@75 Delete to end of line. (fn BEG END &optional TYPE REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-delete :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-delete-line #[1282 "\306\216\307 \211\310\223\210 \203\311\312!\204\212\313#\211G\314U\203/\211A\262\242\2026\315\316\317GD\"\211A\262\242\242\211\320=\203W\n\321\322\320  %*\266\202\212\322  %\210\211\323=\203\210\324 \210 \204\210\203\210\325\n\f=\203\204 \326>\203\204\f\202\206!\210\266\327\330\206\222d\"\210\327\331\206\234d\332!\206\243dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator most-positive-fixnum last-command temporary-goal-column evil-start-of-line #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-expand-line-for-line-based-operators 3 signal wrong-number-of-arguments (beg end type) block next-line evil-delete line evil-first-non-blank move-to-column (next-line previous-line) evil-set-marker 91 93 marker-position evil-operator-start-col] 17 (#$ . 118121) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-delete-line plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@71 Delete whole line. (fn BEG END &optional TYPE REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-delete-line :move-point t :motion 'evil-end-of-line-or-visual-line :keep-visual t :suppress-operator t) (defalias 'evil-delete-whole-line #[1282 "\302\216\303 \211\304\223\210 \203\305\306!\204$\307%\210\310\311\206,d\"\210\310\312\2066d\313!\206=dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-delete evil-set-marker 91 93 marker-position] 13 (#$ . 119868) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-delete-whole-line plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@62 Delete next character. (fn BEG END &optional TYPE REGISTER) (evil-set-command-properties 'evil-delete-whole-line :move-point t :motion 'evil-line-or-visual-line :keep-visual t :suppress-operator t) (defalias 'evil-delete-char #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204!\307$\210\310\311\206)d\"\210\310\312\2063d\313!\206:dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-delete evil-set-marker 91 93 marker-position] 11 (#$ . 121144) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-delete-char plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@66 Delete previous character. (fn BEG END &optional TYPE REGISTER) (evil-set-command-properties 'evil-delete-char :move-point t :motion 'evil-forward-char :keep-visual t :suppress-operator t) (defalias 'evil-delete-backward-char #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204!\307$\210\310\311\206)d\"\210\310\312\2063d\313!\206:dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-delete evil-set-marker 91 93 marker-position] 11 (#$ . 122395) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-delete-backward-char plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@198 Delete previous character and join lines. If point is at the beginning of a line then the current line will be joined with the previous line if and only if `evil-backspace-join-lines'. (fn COUNT) (evil-set-command-properties 'evil-delete-backward-char :move-point t :motion 'evil-backward-char :keep-visual t :suppress-operator t) (defalias 'evil-delete-backward-char-and-join #[257 "\204n\204\f\301\302!\207\303\304\305\"\207" [evil-backspace-join-lines call-interactively delete-backward-char signal beginning-of-line nil] 4 (#$ . 123656) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@23 Delete previous word. (evil-set-command-properties 'evil-delete-backward-char-and-join) (defalias 'evil-delete-backward-word #[0 "\212\301 \210`)`\302 \203`W\2053\303 \210\202\fn\203 o\203'\304 ]|\207\203/\305\306!\207\307\310\311\"\207" [evil-backspace-join-lines evil-backward-word-begin evil-replace-state-p evil-replace-backspace line-beginning-position delete-char -1 signal beginning-of-line nil] 5 (#$ . 124279) nil])#@281 Delete back to the first non-whitespace character. If point is before the first non-whitespace character of a current line then delete from the point to the beginning of the current line. If point is on the beginning of the line, behave according to `evil-backspace-join-lines'. (evil-set-command-properties 'evil-delete-backward-word) (defalias 'evil-delete-back-to-indentation #[0 "i\300 X\203\f\301 \202\212\302 \210`)n\203\303 \203\304 \207n\203&\305\306!\207\303 \2037\211`W\205:\304 \210\202+\211`|\207" [current-indentation line-beginning-position evil-first-non-blank evil-replace-state-p evil-replace-backspace evil-delete-backward-char-and-join 1] 3 (#$ . 124721) nil])#@262 Execute evil-delete or evil-yank on the given region. If SHOULD-DELETE is t, evil-delete will be executed, otherwise evil-yank. The region specified by BEG and END will be adjusted if COUNT is given. (fn SHOULD-DELETE BEG END TYPE REGISTER COUNT YANK-HANDLER) (evil-set-command-properties 'evil-delete-back-to-indentation) (defalias 'evil-ex-delete-or-yank #[1799 "\203\212b\210\300\301!)\262\212b\210\300!)\262\302\262\203$\303\202%\304%\207" [line-beginning-position 0 line evil-delete evil-yank] 13 (#$ . 125419)])#@116 The Ex delete command. [BEG,END]delete [REGISTER] [COUNT] (fn BEG END &optional TYPE REGISTER COUNT YANK-HANDLER) (defalias 'evil-ex-delete #[1538 "\302\216\303 \211\304\223\210 \203\305\306!\204(\307\310      &\210\311\312 \2060d\"\210\311\313 \206:d\314!\206AdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-ex-delete-or-yank t evil-set-marker 91 93 marker-position] 16 (#$ . 125966) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\2056\321!\322 C#\f\320\323 \203K\324\325!\210\202Y\313\326\"\203Y\n\203Y\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-delete plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-ex-get-optional-register-and-count evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@112 The Ex yank command. [BEG,END]yank [REGISTER] [COUNT] (fn BEG END &optional TYPE REGISTER COUNT YANK-HANDLER) (evil-set-command-properties 'evil-ex-delete :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-ex-yank #[1538 "\302\216\303 \211\304\223\210 \203\305\306!\204(\307\304      &\210\310\311 \2060d\"\210\310\312 \206:d\313!\206AdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-ex-delete-or-yank evil-set-marker 91 93 marker-position] 16 (#$ . 127248) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\2056\321!\322 C#\f\320\323 \203K\324\325!\210\202Y\313\326\"\203Y\n\203Y\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-yank plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-ex-get-optional-register-and-count evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@39 (fn BEG END EX-ARG &optional FORCE) (evil-set-command-properties 'evil-ex-yank :move-point t :restore-point t :keep-visual t :suppress-operator t) (defalias 'evil-ex-put #[1027 "\301\302\303\304\"\262\"\211@\206\305G\306V\203#\211\307U\204#\310\311!\202B\211\307=\203?\312G\306U\2035\202;\306\304O\211!\202B\313!\211\204K\310\314\"\210\315!\210dU\203Z\202\\Sb\210\203h\316 \210\202k\317 \210\320\321`\"\210\211G\322V\203\212\211GSH\323=\203\212\211\322GSO\202\213\211c\210\320\324`S\"\210\325 \210\326 \207" [evil-last-=-register-input remove 32 append nil 34 1 61 user-error "Trailing characters" evil--eval-expr evil-get-register "Nothing in register %c" evil-remove-yank-excluded-properties evil-insert-newline-above evil-insert-newline-below evil-set-marker 91 0 10 93 back-to-indentation evil-normal-state] 10 (#$ . 128615) (byte-code "\303\304 \205 \nD\"\207" [evil-called-from-ex-p evil-ex-argument evil-ex-bang append evil-operator-range] 4)])#@355 Change text from BEG to END with TYPE. Save in REGISTER or the kill-ring with YANK-HANDLER. DELETE-FUNC is a function for deleting text, default `evil-delete'. If TYPE is `line', insertion starts on an empty line. If TYPE is `block', the inserted text in inserted at each line of the block. (fn BEG END &optional TYPE REGISTER YANK-HANDLER DELETE-FUNC) (evil-set-command-properties 'evil-ex-put :ex-arg t :ex-bang t) (defalias 'evil-change #[1538 "\306\216\307 \211\310\223\210 \203\311\312!\204\205\206\313\314  \"T\310\211\212 b\210\315 \262\316\315 *\262 \316=\204>\317 \210\f\f\f\f\f%\210 \320\267\202}\321U\204a\322\323!\210\202\201`U\203n\324\323!\210\202\201\325\323!\210\202\201\322\323\"\210\202\201\322\323!\210\310\266\326\327 \206\215d\"\210\326\330 \206\227d\331!\206\236dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator inhibit-field-text-motion evil-want-fine-undo this-command evil-this-register #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-delete evil-count-lines line-beginning-position t evil-start-undo-step #s(hash-table test eq purecopy t data (line 82 block 117)) evil-change-whole-line evil-insert 1 evil-open-above evil-open-below evil-set-marker 91 93 marker-position] 18 (#$ . 129613) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\321 D\"\f\320\322 \203D\323\324!\210\202R\313\325\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-change plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@126 Change to end of line, or change whole line if characterwise visual mode. (fn BEG END &optional TYPE REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-change :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-change-line #[1282 "\302\216\303 \211\304\223\210 \203\305\306!\204d\307 \203U\310=\203U\311#\211G\312U\203:\211A\262\242\202A\313\314\315GD\"\211A\262\242\304\316\n\n$\266\202d\317\320&\210\321\322\206ld\"\210\321\323\206vd\324!\206}dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-visual-state-p inclusive evil-expand-line-for-line-based-operators 3 signal wrong-number-of-arguments (beg end _type) evil-change-whole-line evil-change evil-delete-line evil-set-marker 91 93 marker-position] 16 (#$ . 131624) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\321 D\"\f\320\322 \203D\323\324!\210\202R\313\325\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-change-line plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-yank-handler evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@66 Change whole line. (fn BEG END &optional REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-change-line :move-point t :motion 'evil-end-of-line-or-visual-line :keep-visual t :suppress-operator t) (defalias 'evil-change-whole-line #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204\"\307\310%\210\311\312\206*d\"\210\311\313\2064d\314!\206;dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-change line evil-set-marker 91 93 marker-position] 12 (#$ . 133219) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 C\"\f\320\321 \203A\322\323!\210\202O\313\324\"\203O\n\203O\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-change-whole-line plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@74 Copy lines in BEG END below line given by ADDRESS. (fn BEG END ADDRESS) (evil-set-command-properties 'evil-change-whole-line :move-point t :motion 'evil-line-or-visual-line :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-copy #[771 "eb\210\211y\210\300\"\211G\211\301U\204SH\302U\204 \303P\262m\203+n\204+\304 \210c\210\305y\207" [buffer-substring-no-properties 0 10 "\n" newline -1] 7 (#$ . 134493) (byte-code "\303\304 \205*\305 \206 \306!\211@\307=\203%\212\nb\210\310A@\311\")\262\202*\312\313!\262C\"\207" [evil-called-from-ex-p evil-ex-argument evil-ex-point append evil-operator-range evil-ex-parse "" evil-goto-line eval t user-error "Invalid address"] 6)])#@81 Move lines in BEG .. END below the line given by ADDRESS. (fn BEG END ADDRESS) (evil-set-command-properties 'evil-copy :motion 'evil-line-or-visual-line) (defalias 'evil-move #[771 "\211T\302!U?\205veb\210\211y\210\303 `\304\223\305\"\211Gdb\210n|\210\211\2044db\210n\2034\306\307!\210b\210\304\211\223\210\310U\204KSH\311U\204P\312P\262m\203[n\204[\313 \210\314 \203e`\304\223\210c\210\307y\210\314 \205t `\304\223\266\204\207" [evil-visual-mark evil-visual-point line-number-at-pos make-marker nil buffer-substring-no-properties delete-char -1 0 10 "\n" newline evil-visual-state-p] 10 (#$ . 135202) (byte-code "\303\304 \205*\305 \206 \306!\211@\307=\203%\212\nb\210\310A@\311\")\262\202*\312\313!\262C\"\207" [evil-called-from-ex-p evil-ex-argument evil-ex-point append evil-operator-range evil-ex-parse "" evil-goto-line eval t user-error "Invalid address"] 6)]) (evil-set-command-properties 'evil-move :motion 'evil-line-or-visual-line) (defalias 'evil--check-undo-system #[0 "\302=\205\303\301!\205 ?\205\304\305!\207" [evil-undo-system undo-tree-mode undo-tree boundp user-error "Enable `global-undo-tree-mode' to use undo-tree commands.\nAdd (add-hook 'evil-local-mode-hook 'turn-on-undo-tree-mode) to your init file for undo in non-file buffers."] 2])#@70 Undo COUNT changes in buffer using `evil-undo-function'. (fn COUNT) (defalias 'evil-undo #[257 "\302 \210\211\303>\204 \304 \210 !\210\211\305>?\205\306!\207" [evil-state evil-undo-function evil--check-undo-system (normal visual) evil-normal-state (normal visual) evil-change-state] 4 (#$ . 136510) (byte-code "\302\205 \303\300\304\"\305 !C\"\207" [buffer-read-only current-prefix-arg append signal nil prefix-numeric-value] 4)])#@70 Undo COUNT changes in buffer using `evil-redo-function'. (fn COUNT) (evil-set-command-properties 'evil-undo :repeat 'abort :jump t) (defalias 'evil-redo #[257 "\301 \210!\207" [evil-redo-function evil--check-undo-system] 3 (#$ . 136955) (byte-code "\302\205 \303\300\304\"\305 !C\"\207" [buffer-read-only current-prefix-arg append signal nil prefix-numeric-value] 4)])#@59 Change a character. (fn BEG END &optional TYPE REGISTER) (evil-set-command-properties 'evil-redo :repeat 'abort) (defalias 'evil-substitute #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204!\307$\210\310\311\206)d\"\210\310\312\2063d\313!\206:dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-change evil-set-marker 91 93 marker-position] 11 (#$ . 137334) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!C\"\f\320\321 \203B\322\323!\210\202P\313\324\"\203P\n\203P\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-substitute plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-this-register deactivate-mark] 6)])#@58 Convert text to upper case. (fn BEG END &optional TYPE) (evil-set-command-properties 'evil-substitute :move-point t :motion 'evil-forward-char :keep-visual t :suppress-operator t) (defalias 'evil-upcase #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204-\307=\203(\310\311\304$\210\202-\312\"\210\313\314\2065d\"\210\313\315\206?d\316!\206FdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-block evil-upcase upcase-region evil-set-marker 91 93 marker-position] 10 (#$ . 138498) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317!\f\317\320 \203=\321\322!\210\202K\313\323\"\203K\n\203K\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-upcase plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@58 Convert text to lower case. (fn BEG END &optional TYPE) (evil-set-command-properties 'evil-upcase :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-downcase #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204-\307=\203(\310\311\304$\210\202-\312\"\210\313\314\2065d\"\210\313\315\206?d\316!\206FdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-block evil-downcase downcase-region evil-set-marker 91 93 marker-position] 10 (#$ . 139759) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317!\f\317\320 \203=\321\322!\210\202K\313\323\"\203K\n\203K\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-downcase plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@51 Invert case of text. (fn BEG END &optional TYPE) (evil-set-command-properties 'evil-downcase :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-invert-case #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204Q\307=\203(\310\311\304$\210\202Q\212b\210W\203Pg\312\313!\210\314\226=\203D\227\202F\226!\266T\262\202,)\315\316\206Yd\"\210\315\317\206cd\320!\206jdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-block evil-invert-case delete-char 1 insert-char evil-set-marker 91 93 marker-position] 10 (#$ . 140997) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317!\f\317\320 \203=\321\322!\210\202K\313\323\"\203K\n\203K\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-invert-case plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@56 Invert case of character. (fn BEG END &optional TYPE) (evil-set-command-properties 'evil-invert-case :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-invert-char #[770 "\305\216\306 \211\307\223\210 \203\310\311!\204U\312=\203(\313\314\307$\210\202U\314\"\210\n\203Ub\210 \203U\f\204U\315 \204U\316 \204Ul\203Um\204Un\204U\307u\210\317\320\206]d\"\210\317\321\206gd\322!\206ndS]\"\210\211\307\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-this-motion evil-cross-lines evil-move-beyond-eol #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-block evil-invert-case evil-visual-state-p evil-operator-state-p evil-set-marker 91 93 marker-position] 10 (#$ . 142323) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317!\f\317\320 \203=\321\322!\210\202K\313\323\"\203K\n\203K\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-invert-char plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@50 ROT13 encrypt text. (fn BEG END &optional TYPE) (evil-set-command-properties 'evil-invert-char :move-point t :motion 'evil-forward-char :keep-visual t :suppress-operator t) (defalias 'evil-rot13 #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204-\307=\203(\310\311\304$\210\202-\311\"\210\312\313\2065d\"\210\312\314\206?d\315!\206FdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-block rot13-region evil-set-marker 91 93 marker-position] 10 (#$ . 143735) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317!\f\317\320 \203=\321\322!\210\202K\313\323\"\203K\n\203K\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-rot13 plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@40 Join the selected lines. (fn BEG END) (evil-set-command-properties 'evil-rot13 :move-point t :keep-visual t :suppress-operator t) (defalias 'evil-join #[514 "\302\216\303 \211\304\223\210 \203\305\306!\204P\307\"\304\310V\203%S\262b\210\311\211W\203F\211TU\203>\312 \210\313\314!\262\315\310!\210T\202)\210\211\203N\316 \210\266\317\320\206Wd\"\210\317\321\206`d\322!\206gdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any count-lines 1 0 evil-move-beginning-of-line looking-at "[ ]*$" join-line indent-according-to-mode evil-set-marker 91 93 marker-position] 9 (#$ . 144974) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-join plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@152 Join the selected lines without changing whitespace. \Like \[evil-join], but doesn't insert or remove any spaces. (fn BEG END) (evil-set-command-properties 'evil-join :move-point t :motion 'evil-line :keep-visual t :suppress-operator t) (defalias 'evil-join-whitespace #[514 "\302\216\303 \211\304\223\210 \203\305\306!\204?\307\"\211\310V\203!Sb\210\311\211W\203=\304\312\310!\210m\2048\313\310!\210\210T\202%\266\314\315\206Fd\"\210\314\316\206Od\317!\206VdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any count-lines 1 0 evil-move-end-of-line delete-char evil-set-marker 91 93 marker-position] 9 (#$ . 146308) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-join-whitespace plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@90 Join the selected lines with optional COUNT and BANG. (fn BEG END &optional COUNT BANG) (evil-set-command-properties 'evil-join-whitespace :move-point t :motion 'evil-line :keep-visual t :suppress-operator t) (defalias 'evil-ex-join #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204T\203\307\202\310\204.\211\"\266\202T\311\304\312\313$\266\203\204@\314\315!\210\212b\210\316\317!\316\320!!\")\266\321\322\206\\d\"\210\321\323\206fd\324!\206mdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-join-whitespace evil-join "^[1-9][0-9]*$" string-match t user-error "Invalid count" line-beginning-position 0 string-to-number evil-set-marker 91 93 marker-position] 15 (#$ . 147706) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053D\"\f\320\321 \203H\322\323!\210\202V\313\324\"\203V\n\203V\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-join plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument evil-ex-bang deactivate-mark] 6)])#@252 Return a string to be printed by :print etc. Starts at line of BEG and end at line of END. Include line number at the start of each line if LINUMP is non-nil. Surround line denoted by BORDERLINE with dashes if non-nil. (fn BEG END LINUMP BORDERLINE) (evil-set-command-properties 'evil-ex-join :move-point t :ex-arg t :ex-bang t :keep-visual t :suppress-operator t) (defalias 'evil--ex-string-for-print #[1028 "\301\302\303\212b\210\211\203\204\304 \305!\205U\306\307!\211\310\303O\311\230\203'\211\202*\211\311P\211G\312 ^S\203>\313\314\"\311Q\262\203Q\315\316\304 !\317\320#\321Q\262m\204[P\262\203i\313\314\"\311Q\262`\322\323\302\"\210`U\204|\324 \nV\203\303\262\266\202)\325\311\")\207" [line-move-visual "" t nil line-number-at-pos natnump thing-at-point line -1 "\n" frame-width make-string 45 propertize number-to-string face line-number-current-line " " evil-line-move 1 line-end-position string-trim-right] 16 (#$ . 149243)])#@69 Print STRING to the minibuffer for better persistence. (fn STRING) (defalias 'evil--ex-print-to-minibuffer #[257 "\301 \302\303A@\304\305#\210\211\306\307\310\311\304#\")\207" [minibuffer-local-map make-keymap nil set-char-table-range t abort-recursive-edit read-from-minibuffer "" propertize read-only] 8 (#$ . 150226)])#@266 Print lines in range to the minibuffer. Starting at BEG and ending at END + COUNT lines. Include line number at the start of each line if LINUMP is non-nil. Surround line denoted by BORDERLINE with dashes if non-nil. (fn BEG END COUNT &optional LINUMP BORDERLINE) (defalias 'evil--ex-print #[1283 ";\203 \302!\202\303!\203\202\304\212dU\203!\202#Sb\210\305!)\306$\304W\203<\307\310!\207\203S \311\230\203L P\202P \312Q\211\207\313!\210\312\314\315\316$\266\203\205jb\210\317 \207" [evil--ex-global-active-p evil--ex-print-accumulator string-to-number natnump 1 line-end-position evil--ex-string-for-print user-error "Positive count required" "" "\n" evil--ex-print-to-minibuffer nil string-match t evil-beginning-of-line] 16 (#$ . 150559)])#@63 Print accumulated print output from :global print, and clear. (defalias 'evil--global-print+clear #[0 "\211\301\230?\205 \301\302!\207" [evil--ex-print-accumulator "" evil--ex-print-to-minibuffer] 3 (#$ . 151346)])#@32 (fn BEG END &optional COUNT) (add-hook 'evil-after-global-hook 'evil--global-print+clear) (defalias 'evil-ex-print #[770 "\300#\207" [evil--ex-print] 7 (#$ . 151570) (byte-code "\302\303 \205 C\"\207" [evil-called-from-ex-p evil-ex-argument append evil-operator-range] 3)]) (evil-set-command-properties 'evil-ex-print :ex-arg t) (defalias 'evil-ex-numbered-print #[770 "\300\301$\207" [evil--ex-print t] 8 (#$ . 151570) (byte-code "\302\303 \205 C\"\207" [evil-called-from-ex-p evil-ex-argument append evil-operator-range] 3)])#@1103 Display several lines of text surrounding the line specified by range. BEG and END represent the range, ZMARKS represents the args in string form. With a count supplied in the args, display that number of lines. Without a count, display `evil-scroll-count' number of lines, or half the window height. This table explains what each mark argument does. mark | first line | last line | new cursor line -----+-------------------------+----------------------------+---------------- + | current line | 1 scr (or 1 count) forward | last line - | 1 scr (or 1 count) back | current line | last line ^ | 2 scr (or 2 count) back | 1 scr (or 1 count) back | last line . | ½ scr (or ½ count) back | ½ scr (or ½ count) forward | last line = | ½ scr (or ½ count) back | ½ scr (or ½ count) forward | current line Specifying no mark at all is the same as `+'. If the mark is `=' a line of dashes is printed around the current line. If a `#' is included before the mark args, the lines are numbered. (fn BEG END &optional ZMARKS BANG) (evil-set-command-properties 'evil-ex-numbered-print :ex-arg t) (defalias 'evil-ex-z #[1026 "S\211\262b\210\301 \302\303\"\216\304\305\206\306\"\210\301 \211G\307U\203$A\202,\310\311\312GD\"\210\313A\262\313\211A\262\242\211A\262\242\211A\262\242\211A\262\242\211A\262\242\242U?U\203b\314\202g\fOU\203q\306\202v O\315\316!!\317Z\320V\203\225\321 \210\322\323\nZ\"\202;\314\230\203\257\3241\243\325!0\210\326\211$\202;\327\230\203\307\321 \210\326\330\331Z!\320$\202;\332\230\203\350\333\320Z!\210`\330\331Z!\321 \210\326\320 $\266\202\202;\334\230\203 \330\320\335\331\"Z!\333\336\331\"!\210`\321 \210\326\320 $\266\202\202;\337\230\2034\330\320\335\331\"Z!\340\336\331\"!\321 \210\326\320 \341!%\266\202\202;\321 \210\322\342\"*\207" [max-mini-window-height match-data make-closure #[0 "\301\300\302\"\207" [V0 set-match-data t] 3] string-match "\\(#?\\)\\([^0-9]*\\)\\([0-9]*\\)" "" 8 signal wrong-number-of-arguments (_ _ hs he ms me cs ce) nil "+" evil--get-scroll-count string-to-number 0.5 1 evil-beginning-of-line user-error "Too many mark args (got %d, expected 1)" (error) beginning-of-line evil--ex-print "-" line-beginning-position 2 "^" move-end-of-line "." floor ceiling "=" line-end-position line-number-at-pos "Invalid mark arg: %s"] 27 (#$ . 152119) (byte-code "\303\304 \205 \nD\"\207" [evil-called-from-ex-p evil-ex-argument evil-ex-bang append evil-operator-range] 4)])#@26 Fill text. (fn BEG END) (evil-set-command-properties 'evil-ex-z :ex-arg t :ex-bang t) (defalias 'evil-fill #[514 "\302\216\303 \211\304\223\210 \203\305\306!\204\"\212\3071 \310\"0)\210\311\312\206)d\"\210\311\313\2062d\314!\2069dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any (error) fill-region evil-set-marker 91 93 marker-position] 9 (#$ . 154714) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-fill plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@73 Fill text and move point to the end of the filled region. (fn BEG END) (evil-set-command-properties 'evil-fill :move-point nil :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-fill-and-move #[514 "\302\216\303 \211\304\223\210 \203\305\306!\2044\303 \211S\304\223\210\30712\310\"\210\211b\210\311 0\266\2024\266\312\313\206;d\"\210\312\314\206Dd\315!\206KdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any (error) fill-region evil-first-non-blank evil-set-marker 91 93 marker-position] 9 (#$ . 155813) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-fill-and-move plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@28 Indent text. (fn BEG END) (evil-set-command-properties 'evil-fill-and-move :move-point nil :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-indent #[514 "\306\216\307 \211\310\223\210 \203\311\312!\204\252\n\204:\313\f\314>\203& \2029\2038l\2038n\2048\2029i\214}\210\212b\210\315\316!U)\203U\317 \210\202]b\210\320\"\210\203\205 \203k\321\202l\322\212eb\210l\204\203\211`\323\310w\210`\"\210\310y\210\202p)\210)\n\203\220\324 \210\202\252\325!\206\250 :\203\247\326\327 @! A\\]\202\250 !\210\330\331\206\261d\"\210\330\332\206\272d\333!\206\301dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-start-of-line this-command last-command temporary-goal-column #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any next-line (next-line previous-line) line-beginning-position 2 indent-according-to-mode indent-region tabify untabify " " evil-first-non-blank line-move-to-column 0 truncate evil-set-marker 91 93 marker-position track-eol most-positive-fixnum real-this-command evil-indent-convert-tabs indent-tabs-mode goal-column] 9 (#$ . 157088) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-indent plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@32 Indent the line. (fn BEG END) (evil-set-command-properties 'evil-indent :move-point nil :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-indent-line #[514 "\302\216\303 \211\304\223\210 \203\305\306!\204\307\"\210\310\311\206\"d\"\210\310\312\206+d\313!\2062dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-indent evil-set-marker 91 93 marker-position] 9 (#$ . 158880) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-indent-line plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@508 Shift text from BEG to END to the left. The text is shifted to the nearest multiple of `evil-shift-width' (the rounding can be disabled by setting `evil-shift-round'). If PRESERVE-EMPTY is non-nil, lines that contain only spaces are indented, too, otherwise they are ignored. Location of point is preserved relative to text when called from insert state. Otherwise, it is determined by `evil-start-of-line' and/or `evil-track-eol'. See also `evil-shift-right'. (fn BEG END &optional COUNT PRESERVE-EMPTY) (evil-set-command-properties 'evil-indent-line :move-point t :motion 'evil-line :keep-visual t :suppress-operator t) (defalias 'evil-shift-left #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204&\307\206!\310[$\210\311\312\206.d\"\210\311\313\2068d\314!\206?dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-shift-right 1 evil-set-marker 91 93 marker-position] 11 (#$ . 160024) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \320 \205:\205:\321!C\"\f\322\320 \203M\323\324!\210\202[\313\325\"\203[\n\203[\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-shift-left plist-member :motion undefined plist-get :type nil append evil-operator-range evil-visual-state-p prefix-numeric-value t evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col current-prefix-arg deactivate-mark] 6)])#@520 Shift text from BEG to END to the right. The text is shifted to the nearest multiple of `evil-shift-width' (the rounding can be disabled by setting `evil-shift-round'). If PRESERVE-EMPTY is non-nil, lines that contain only spaces are indented, too, otherwise they are ignored. Location of point is preserved relative to text when called from insert or replace states. Otherwise, it is determined by `evil-start-of-line' and/or `evil-track-eol'. See also `evil-shift-left'. (fn BEG END &optional COUNT PRESERVE-EMPTY) (evil-set-command-properties 'evil-shift-left :move-point t :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-shift-right #[1026 "\306\216\307 \211\310\223\210 \203\311\312!\204\352\206\313\262\307 \310\223\307 \310\223i\310\212b\210`W\203\224\314 \315\n\204E\n _\\\202g \245\n\\\n\315V\203V\315\202d\316 \"\315U\203c\315\202d\313\\ _]\204q\211Z\262\204\200\212\317\310w\210l)\204\205\320\315\"\210`\317\310w\210`|\210\313y\266\202/)\211\204\256\315W\203\245\210\315\202\256 _\262\211j\210\321 \204\270\322 \203\304\323\315\\]!\266\202\352\f\203\317\324 \266\202\352\325 \203\334\326\313!\266\202\352\323 \206\347\206\347!\266\327\330\206\362d\"\210\327\331\206\374d\332!\206dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-shift-round evil-shift-width evil-start-of-line goal-column #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any 1 current-indentation 0 mod " " indent-to evil-insert-state-p evil-replace-state-p move-to-column evil-first-non-blank evil--stick-to-eol-p move-end-of-line evil-set-marker 91 93 marker-position evil-operator-start-col] 16 (#$ . 161758) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \320 \205:\205:\321!C\"\f\322\320 \203M\323\324!\210\202[\313\325\"\203[\n\203[\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-shift-right plist-member :motion undefined plist-get :type nil append evil-operator-range evil-visual-state-p prefix-numeric-value t evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col current-prefix-arg deactivate-mark] 6)])#@41 Delete all indentation on current line. (evil-set-command-properties 'evil-shift-right :move-point nil :type 'line :keep-visual t :suppress-operator t) (defalias 'evil-delete-indentation #[0 "\212\300\301!\210`\302\301w\210`|)\207" [move-beginning-of-line nil " "] 3 (#$ . 164211) nil])#@191 Shift the current line COUNT times to the right. The text is shifted to the nearest multiple of `evil-shift-width'. Like `evil-shift-right' but always works on the current line. (fn COUNT) (defalias 'evil-shift-right-line #[257 "\300\301 \301\302!\303$\207" [evil-shift-right line-beginning-position 2 t] 6 (#$ . 164505) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@189 Shift the current line COUNT times to the left. The text is shifted to the nearest multiple of `evil-shift-width'. Like `evil-shift-left' but always works on the current line. (fn COUNT) (evil-set-command-properties 'evil-shift-right-line) (defalias 'evil-shift-left-line #[257 "\301=\203`Sf\302=\203\303\304!\210\305 \207\306\307 \307\310!\311$\207" [last-command self-insert-command 48 delete-char -1 evil-delete-indentation evil-shift-left line-beginning-position 2 t] 6 (#$ . 164913) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@138 Left-align lines in the region at WIDTH columns. The default for width is the value of `fill-column'. (fn BEG END &optional TYPE WIDTH) (evil-set-command-properties 'evil-shift-left-line) (defalias 'evil-align-left #[1026 "\302\216\303 \211\304\223\210 \203\305\306!\204+\307\310\203(\311!\202)\312$\210\313\314\2063d\"\210\313\315\206=d\316!\206DdS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-justify-lines left string-to-number 0 evil-set-marker 91 93 marker-position] 12 (#$ . 165493) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\2054C\"\f\320\321 \203G\322\323!\210\202U\313\324\"\203U\n\203U\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-align-left plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@139 Right-align lines in the region at WIDTH columns. The default for width is the value of `fill-column'. (fn BEG END &optional TYPE WIDTH) (evil-set-command-properties 'evil-align-left :move-point t :motion 'evil-line :type 'line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-align-right #[1026 "\303\216\304 \211\305\223\210 \203\306\307!\204+\310\311\203(\312!\202)\n$\210\313\314\2063d\"\210\313\315\206=d\316!\206DdS]\"\210\211\305\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator fill-column #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-justify-lines right string-to-number evil-set-marker 91 93 marker-position] 12 (#$ . 166817) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\2054C\"\f\320\321 \203G\322\323!\210\202U\313\324\"\203U\n\203U\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-align-right plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@139 Center lines in the region between WIDTH columns. The default for width is the value of `fill-column'. (fn BEG END &optional TYPE WIDTH) (evil-set-command-properties 'evil-align-right :move-point t :motion 'evil-line :type 'line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-align-center #[1026 "\303\216\304 \211\305\223\210 \203\306\307!\204+\310\311\203(\312!\202)\n$\210\313\314\2063d\"\210\313\315\206=d\316!\206DdS]\"\210\211\305\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator fill-column #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-justify-lines center string-to-number evil-set-marker 91 93 marker-position] 12 (#$ . 168239) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\2054C\"\f\320\321 \203G\322\323!\210\202U\313\324\"\203U\n\203U\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-align-center plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@75 Replace text from BEG to END with CHAR. (fn BEG END &optional TYPE CHAR)#@27 (fn BEGCOL ENDCOL CHAR) (evil-set-command-properties 'evil-align-center :move-point t :motion 'evil-line :type 'line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-replace #[1026 "\303\216\304 \211\305\223\210 \203\306\307!\204n\203n\310=\203/\212\311\312$)\210\202nb\210\313=\203I|\210\314 \210\n\203n\315 \210\202n`W\203h\305f\313=\203\\\305u\210\202I\316\317!\210\320\317\"\210\202IS]b\210\321\322\206vd\"\210\321\323\206\200d\324!\206\207dS]\"\210\211\305\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-auto-indent #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any block evil-apply-on-rectangle #[771 "\300\301 !W\205'^\262\302\303\304#\302\303\304#|\210\305Z\"c\266\202\207" [evil-column line-end-position evil-move-to-column nil t make-string] 9 (#$ . 169743)] 10 newline indent-according-to-mode delete-char 1 insert-char evil-set-marker 91 93 marker-position] 11 (#$ . 169664) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!\321\216\322\323 \210\324 *C\"\f\320\325 \203K\326\327!\210\202Y\313\330\"\203Y\n\203Y\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-replace plist-member :motion undefined plist-get :type nil append evil-operator-range t #[0 "\300 \207" [evil-refresh-cursor] 1] replace evil-refresh-cursor evil-read-key evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-force-cursor deactivate-mark] 6)])#@139 Paste the latest yanked text before the cursor position. The return value is the yanked text. (fn COUNT &optional REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-replace :move-point t :motion 'evil-forward-char :keep-visual t :suppress-operator t) (defalias 'evil-paste-before #[769 "\306!\262\307 \203?\310\")\207 \n\211\311=\203 \312\211\313\314\"\216\315\2030\316!\2023\317\320!!\206C\211;\205C\321\320\322#\242` \203M\323 \210\312\203\300\324!\203i\325\326\311\"\210\327!*\210\202\300\330!\203t\331!\262\332\320G\312$\210\326\311\"\210\206\210\333\320\211W\203\232\312\327!\266T\202\211\266\325\211`\257$\334\335\"\210\334\336`S\"\210%\203\300G\320V\203\300\337u\210&\203\343\340=\203\332\3411\326\342 0\210\202\340\210\202\340\343\333\312\311#\210\312&\203\352\312$G\320V\205\362*\207" [evil-kill-on-visual-paste buffer-undo-list evil-undo-system evil-paste-clear-minibuffer-first this-command evil-paste-count prefix-numeric-value evil-visual-state-p evil-visual-paste t nil make-closure #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] copy-sequence evil-get-register current-kill 0 get-text-property yank-handler delete-minibuffer-contents functionp evil-paste-before push-mark insert-for-yank vectorp evil-vector-to-string set-text-properties 1 evil-set-marker 91 93 -1 evil-yank-line-handler (error) evil-next-line-first-non-blank evil-forward-char evil-last-paste evil-move-cursor-back evil--cursor-after] 13 (#$ . 171521) (byte-code "\303\205 \304\300\305\" \nD\"\207" [buffer-read-only current-prefix-arg evil-this-register append signal nil] 4)])#@125 Paste the latest yanked text behind point. The return value is the yanked text. (fn COUNT &optional REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-paste-before :suppress-operator t) (defalias 'evil-paste-after #[769 "\306!\262\307 \203\310\"\207 \211\311=\203\312\211\313\314\"\216\315\203,\316!\202/\317\320!!\206?\211;\205?\321\320\322#\242`\203\257\323!\203W\324\325!*\210\202\257\326!\203b\327!\262\330\320G\312$\210l\204r\312u\210\331`\311\"\210`\206~\332\320\211W\203\220\312\325!\266T\202\266\324`\257\333\334\"\210\333\335`S\"\210\336 \203\256\337 \210\210 \203\321\340=\203\311\3411\305\342\332!0\210\202\317\210\202\317\343\332\312\311#\210\312\203\327\312G\320V\205\337*\207" [buffer-undo-list evil-undo-system this-command evil-paste-count evil-last-paste evil--cursor-after prefix-numeric-value evil-visual-state-p evil-visual-paste t nil make-closure #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] copy-sequence evil-get-register current-kill 0 get-text-property yank-handler functionp evil-paste-after insert-for-yank vectorp evil-vector-to-string set-text-properties push-mark 1 evil-set-marker 91 93 evil-normal-state-p evil-move-cursor-back evil-yank-line-handler (error) evil-next-line-first-non-blank evil-forward-char] 14 (#$ . 173247) (byte-code "\303\205 \304\300\305\" \nD\"\207" [buffer-read-only current-prefix-arg evil-this-register append signal nil] 4)])#@123 The same as `evil-paste-before' but leave the cursor just after the new text. (fn COUNT &optional REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-paste-after :suppress-operator t) (defalias 'evil-paste-before-cursor-after #[769 "\301!\262\302\303#\207" [evil--cursor-after prefix-numeric-value t evil-paste-before] 7 (#$ . 174794) (byte-code "\303\205 \304\300\305\" \nD\"\207" [buffer-read-only current-prefix-arg evil-this-register append signal nil] 4)])#@122 The same as `evil-paste-after' but leave the cursor just after the new text. (fn COUNT &optional REGISTER YANK-HANDLER) (evil-set-command-properties 'evil-paste-before-cursor-after :suppress-operator t) (defalias 'evil-paste-after-cursor-after #[769 "\301!\262\302\303#\207" [evil--cursor-after prefix-numeric-value t evil-paste-after] 7 (#$ . 175277) (byte-code "\303\205 \304\300\305\" \nD\"\207" [buffer-read-only current-prefix-arg evil-this-register append signal nil] 4)])#@63 Insert STRING at STARTCOL. (fn STARTCOL ENDCOL STRING COUNT) (evil-set-command-properties 'evil-paste-after-cursor-after :suppress-operator t) (defalias 'evil-insert-for-yank-at-col #[1028 "\300!\210\211\206 \301\302\211W\203\303\304!\266T\202\n\266\305\306`S\"\207" [move-to-column 1 0 nil insert-for-yank evil-set-marker 93] 9 (#$ . 175770)])#@61 Paste over Visual selection. (fn COUNT &optional REGISTER)#@16 (fn &rest _) (defalias 'evil-visual-paste #[513 "\306!\262\307\211\203\310!\202\311\312!\313\312\314#\242\315 \316\211\211 \n\211\317=\203,\316\211\320\321\"\216 \2059\311\312!C\322 \203\231 \2620\262\323 \262\203h\203h\324=\203h\211GSH\325=\204hS\262\326\327!\210\3301?\205w\331$\210\332=\203\216\333>\204\216dU\204\216\334c\210\335 \210 \203\231\311\336!\210\320\337\"\310K\320\340\"\216\310M\210\341\267\202\274dU\202\275\332=\202\275\316\203\315b\210\342  \"\210\202\343=\203\372\344=\204\372\334 \316\345\317$\266\203\204\372\346\347\317 &\210\202\350  \"\210*\2661\203 \311\351!\2102\352\312W\203\353\202\354\317\"\316\223\2103\352\312W\203/\354\2020\353\317\"\316\223\2104@4A@\35548\35648\35748\317\257\2114*\207" [this-command buffer-undo-list evil-undo-system kill-ring kill-ring-yank-pointer evil-visual-beginning prefix-numeric-value evil-visual-paste evil-get-register current-kill 0 get-text-property yank-handler evil-visual-direction nil t make-closure #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] evil-visual-state-p evil-visual-type line 10 evil-visual-rotate upper-left evil-delete 95 evil-yank-line-handler (line block) "\n" evil-normal-state 1 #[128 "\300\207" [V0] 2 (#$ . 176195)] #[0 "\301\300M\207" [V0 evil-get-register] 2] #s(hash-table test eq purecopy t data (line 175 block 181)) evil-paste-after block evil-yank-block-handler string-match evil-apply-on-block evil-insert-for-yank-at-col evil-paste-before -1 evil-get-marker 91 93 2 3 4 evil-visual-end evil-kill-on-visual-paste evil-visual-point evil-visual-mark evil-last-paste] 20 (#$ . 176130) (byte-code "\303\205 \304\300\305\" \nD\"\207" [buffer-read-only current-prefix-arg evil-this-register append signal nil] 4)])#@37 Paste from REGISTER. (fn REGISTER) (evil-set-command-properties 'evil-visual-paste :suppress-operator t) (defalias 'evil-paste-from-register #[257 "`\301\302\301\303#\210\304 \205#`Z\305 `Z^\306`\211$\210\307!\266\202)\207" [evil-move-cursor-back nil evil-paste-before t evil-replace-state-p line-end-position evil-update-replace-alist delete-char] 9 (#$ . 178088) (byte-code "\301``\302 \203\f\303\202 \304\\\"\305\306\"\216\307\310\311#\210\307\312\313#\210\206&\314 )C\207" [evil-this-register make-overlay evil-replace-state-p 1 0 make-closure #[0 "\301\300!\207" [V0 delete-overlay] 2] overlay-put invisible t after-string #("\"" 0 1 (face minibuffer-prompt cursor 1)) read-char] 5)])#@23 Paste last insertion. (defalias 'evil-paste-last-insertion #[0 "\300\301!\207" [evil-paste-from-register 46] 2 (#$ . 178799) nil])#@50 Paste last insertion and change to normal state. (defalias 'evil-paste-last-insertion-and-stop-insert #[0 "\300 \210\301 \207" [evil-paste-last-insertion evil-normal-state] 1 (#$ . 178935) nil])#@51 Use REGISTER for the next command. (fn REGISTER) (defalias 'evil-use-register #[257 "\211\211\207" [evil-this-register] 3 (#$ . 179135) (byte-code "\301 \203\214~\210@@@A}\210A\302 *\202\302 C\207" [evil-restriction-stack evil-operator-state-p evil-read-key] 2)])#@53 The buffer that has been active on macro recording. (evil-set-command-properties 'evil-use-register :keep-visual t :repeat 'ignore :suppress-operator t) (defvar evil-macro-buffer nil (#$ . 179414))#@222 The keys used to invoke the current `evil-execute-in-normal-state'. Can be used to detect if we are currently in that quasi-state. With current bindings, it will be \\[evil-execute-in-normal-state] (defvar evil-execute-normal-keys nil (#$ . 179618))#@129 Like `kmacro-end-macro' but also return the macro. Remove \\[evil-execute-in-normal-state] from the end. (defalias 'evil-end-and-return-macro #[0 "\302\303\304\"\210\305\303\"\305 \303\"\211\204\303\203$\211\203$\306\307\310G\"\"\207 \207" [evil-execute-normal-keys last-kbd-macro end-kbd-macro nil kmacro-loop-setup-function append apply vector butlast] 7 (#$ . 179897)])#@144 Record a keyboard macro into REGISTER. If REGISTER is :, /, or ?, the corresponding command line window will be opened instead. (fn REGISTER) (defalias 'evil-record-macro #[257 "\304\305=\203\n\306 \207\2030 \2030\304\3071 \310 0\262\202#\266\304\211\203,\311\"\210\304\211\207\312\267\202?\313 \207\314 \207\315 \207\316Y\203K\317X\204c\320Y\203W\321X\204c\322Y\203{\323X\203{ \203j\324 \210\311\304\"\210\325\304!\210p\211\207\326\327\"\207" [evil-this-macro defining-kbd-macro evil-macro-buffer evil-last-recorded-register nil 7 keyboard-quit (error) evil-end-and-return-macro evil-set-register #s(hash-table test eq purecopy t data (58 54 47 57 63 60)) evil-command-window-ex evil-command-window-search-forward evil-command-window-search-backward 48 57 97 122 65 90 end-kbd-macro kmacro-start-macro error "Invalid register `%s'"] 5 (#$ . 180308) (byte-code "\205 ?\205\n\206\303 C\207" [evil-this-macro defining-kbd-macro evil-this-register evil-read-key] 1)])#@147 Called to record a macro execution. FLAG is either `pre' or `post' if the function is called before resp. after executing the command. (fn FLAG) (evil-set-command-properties 'evil-record-macro :keep-visual t :suppress-operator t) (defalias 'evil-repeat-execute-macro #[257 "\211\301\267\202\302\303 !\207\302\304!!\207\305\207" [evil-last-register #s(hash-table test eq purecopy t data (pre 6 post 11)) evil-repeat-record this-command-keys string nil] 4 (#$ . 181323)])#@211 Execute keyboard macro MACRO, COUNT times. When called with a non-numerical prefix (such as \[universal-argument]), COUNT is infinite. MACRO is read from a register when called interactively. (fn COUNT MACRO) (defalias 'evil-execute-macro #[514 "\306!\203+\307 \210\310U\203\211 \210\202\206\311\310\211W\205*\312 \266T\202\207\211;\2046\313!\203<\211\314\235\203E?\205\210\315\316!\207\3171}\312\n \211\320=\203X\312\211\321\322\"\216\323 \210\324\216\320\312\211\325\216\320\326\"\210\327\211. \2620\207\330 \210\331@A\"\262\207" [evil-this-macro evil-undo-list-pointer buffer-undo-list evil-undo-system evil-in-single-undo post-command-hook functionp evil-repeat-abort 0 1 nil vectorp ("" []) user-error "No previous macro" (error) t make-closure #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] evil-start-undo-step #[0 "\300 \207" [evil-end-undo-step] 1] #[0 "\300 \207" [combine-after-change-execute] 1] execute-kbd-macro evil-execute-macro evil-normal-state signal pre-command-hook combine-after-change-calls this-command] 7 (#$ . 181803) (byte-code "\303\211\211\204 \304\202\247\203\202\305\262 \206\306 \262\211\307=\2041\211\310=\2039\n\307=\2039\311\262\307\202X\211\310=\203P\n\204G\312\313!\210\314\n\315\"\262\202X\314\315\"\262\211D\207" [current-prefix-arg evil-this-register evil-last-register nil 1 0 read-char 58 64 evil-ex-repeat user-error "No previously executed keyboard macro." evil-get-register t] 6)])#@155 Execute last recorded keyboard macro COUNT times. When called with a non-numerical prefix (such as \[universal-argument]), COUNT is infinite. (fn COUNT) (evil-set-command-properties 'evil-execute-macro :keep-visual t :suppress-operator t :repeat 'evil-repeat-execute-macro) (defalias 'evil-execute-last-recorded-macro #[257 "\203\302\303\304\"\"\210\202\305\306!\210\211\207" [evil-last-recorded-register evil-last-register evil-execute-macro evil-get-register t user-error "No previous macro"] 6 (#$ . 183381) (byte-code "\203 \247\203 \202\203\301\202\302C\207" [current-prefix-arg 0 1] 1)])#@29 Restore previous selection. (byte-code "\300\301\302\303\304\303%\210\305\306\307\"\207" [evil-set-command-properties evil-execute-last-recorded-macro :keep-visual t :suppress-operator eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-visual-restore] 2]] 6) (defalias 'evil-visual-restore #[0 "\306 \203-\203- \203-\n\203-\307 !\307\f! \310 \n\311$\210\312\223\210 \312\223\210\211\211\207 \205@ \205@\f\205@\310 \f\313 \311$\207" [evil-prev-visual-mark evil-prev-visual-point evil-prev-visual-selection evil-visual-mark evil-visual-point evil-visual-selection evil-visual-state-p marker-position evil-visual-make-selection t nil evil-visual-type] 8 (#$ . 184002) nil])#@291 Rearrange corners in Visual Block mode. M---+ +---M | | <=> | | +---P P---+ For example, if mark is in the upper left corner and point in the lower right, this function puts mark in the upper right corner and point in the lower left. (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-visual-restore :repeat motion :keep-visual t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-visual-exchange-corners] 2]] 6) (defalias 'evil-visual-exchange-corners #[0 "\301=\203-`\302\303!\206\211\304!\304!\212b\210\305!\210`)\212b\210\305!\210`)\306\"\207\307 \210\306 \207" [evil-visual-selection block mark t evil-column evil-move-to-column evil-visual-refresh evil-exchange-point-and-mark] 9 (#$ . 184730) nil])#@317 Move point to CORNER of the Visual selection. Corner may be one of `upper-left', `upper-right', `lower-left' and `lower-right': upper-left +---+ upper-right | | lower-left +---+ lower-right When called interactively, the selection is rotated clockwise. (fn CORNER &optional BEG END TYPE) (evil-set-command-properties 'evil-visual-exchange-corners :repeat 'motion :keep-visual t) (defalias 'evil-visual-rotate #[1025 "\206`\206\301\302!\206\211\206\303\304>\203^\305\306 $\262\211A\262\242\262\211A\262\242\262\307 #=\204I\262\262b\210\310 \205\204\311!\210\312\303\211\211\306\f%\207\313>\203u]b\210\310 \205\204\311^!\207^b\210\310 \205\204\311]!\207" [evil-this-type mark t nil (rectangle block) evil-block-rotate :corner evil-visual-block-corner evil-visual-state-p evil-move-mark evil-visual-refresh (upper-right lower-right)] 14 (#$ . 185592) (byte-code "\300 \301>A@C\207" [evil-visual-block-corner (upper-left upper-right lower-right lower-left upper-left)] 2)])#@389 Switch to Insert state just before point. The insertion will be repeated COUNT times on the next VCOUNT lines, starting at the same column. If SKIP-EMPTY-LINES is non-nil, the insertion will not be performed on lines on which the insertion point would be after the end of the lines. This is the default behaviour for Visual-state insertion. (fn COUNT &optional VCOUNT SKIP-EMPTY-LINES) (evil-set-command-properties 'evil-visual-rotate :keep-visual t) (defalias 'evil-insert #[769 "\203 \203 \305 \210\306 \203\307 \310=\203\311\"\207\312\205/\313V\205/\314 iE\211\315\313!\207" [evil-want-fine-undo evil-insert-count evil-insert-lines evil-insert-vcount evil-insert-skip-empty-lines evil-start-undo-step evil-visual-state-p evil-visual-type line evil-insert-line nil 1 line-number-at-pos evil-insert-state] 6 (#$ . 186649) (byte-code "\303 \204\n\304!C\207\305\306!\210\304!\307 \310>\205\311 \n\"T\312E\207" [current-prefix-arg evil-visual-point evil-visual-mark evil-visual-state-p prefix-numeric-value evil-visual-rotate upper-left evil-visual-type (line block) evil-count-lines t] 4)])#@352 Switch to Insert state just after point. The insertion will be repeated COUNT times and repeated once for the next VCOUNT - 1 lines starting at the same column. If SKIP-EMPTY-LINES is non-nil, the insertion will not be performed on lines on which the insertion point would be after the end of the lines. (fn COUNT &optional VCOUNT SKIP-EMPTY-LINES) (defalias 'evil-append #[769 "\305\306!\203V\307 \203V\310 \311=\204%\310 \312=\203.\313>\203. \n=\203.\314\315!\210\316\"\207\310 \312=\203K\317 !\317\f!]\314\315!\210\320\321\"\210\322#\207\314\323!\210\324u\210\325!\207l\204]\326u\210\322#\210\327\330\331\"\207" [last-command temporary-goal-column most-positive-fixnum evil-visual-beginning evil-visual-end called-interactively-p any evil-visual-state-p evil-visual-type line block (next-line previous-line) evil-visual-rotate upper-left evil-append-line evil-column move-to-column t evil-insert lower-right -1 evil-append nil add-hook post-command-hook evil-maybe-remove-spaces] 8 (#$ . 187772) (byte-code "\303!\304 \205\305 \306>\205\307 \n\"TD\207" [current-prefix-arg evil-visual-point evil-visual-mark prefix-numeric-value evil-visual-state-p evil-visual-type (line block) evil-count-lines] 4)])#@225 Switch to Insert state at previous insertion point. The insertion will be repeated COUNT times. If called from visual state, only place point at the previous insertion position but do not switch to insert state. (fn COUNT) (defalias 'evil-insert-resume #[257 "\300\301\302\"\210\303 ?\205\304!\207" [evil-goto-mark 94 t evil-visual-state-p evil-insert] 4 (#$ . 189009) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@122 Like `quoted-insert' but delete COUNT chars forward in replace state. Adds a "^" overlay as an input prompt. (fn COUNT) (evil-set-command-properties 'evil-insert-resume :keep-visual t :type 'exclusive :jump t) (defalias 'evil-quoted-insert #[257 "`\301\302 \204\303\211\"\202\"\304 Z^\262\305#\210\303\\\"\306\307\"\216\310\311\312#\210\310\313\314#\210\301\315!)\210\205A\316!)\207" [overwrite-mode nil evil-replace-state-p make-overlay line-end-position evil-update-replace-alist make-closure #[0 "\301\300!\207" [V0 delete-overlay] 2] overlay-put invisible t after-string #("^" 0 1 (face escape-glyph cursor 1)) quoted-insert delete-char] 8 (#$ . 189460) "p"])#@115 Insert a new line above point and switch to Insert state. The insertion will be repeated COUNT times. (fn COUNT) (defalias 'evil-open-above #[257 "\305=\204 \306 \210\307 \210\211\305\310\311\216\f\205\312 )\207" [evil-want-fine-undo evil-insert-count evil-insert-lines evil-insert-vcount evil-auto-indent t evil-start-undo-step evil-insert-newline-above nil #[0 "\300\301!\207" [evil-insert-state 1] 2] indent-according-to-mode] 3 (#$ . 190152) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@115 Insert a new line below point and switch to Insert state. The insertion will be repeated COUNT times. (fn COUNT) (evil-set-command-properties 'evil-open-above :suppress-operator t) (defalias 'evil-open-below #[257 "\306=\204 \307 \210` B\310 \210\211\306\311\312\216 \205\313 )\207" [evil-want-fine-undo buffer-undo-list evil-insert-count evil-insert-lines evil-insert-vcount evil-auto-indent t evil-start-undo-step evil-insert-newline-below nil #[0 "\300\301!\207" [evil-insert-state 1] 2] indent-according-to-mode] 3 (#$ . 190684) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@450 Switch to insert state at the beginning of the current line. If NON-BLANK-P is non-nil, point is placed at the first non-blank character on the current line. If NON-BLANK-P is nil, point is placed at column 0, or the beginning of visual line. The insertion will be repeated COUNT times. If VCOUNT is non nil it should be number > 0. The insertion will be repeated in the next VCOUNT - 1 lines below the current one. (fn COUNT VCOUNT NON-BLANK-P) (evil-set-command-properties 'evil-open-below :suppress-operator t) (defalias 'evil--insert-line #[771 "`B\211\203\f\306\202 \307 \203'\n\203'\212\211 \210`)\212\310 \210`)]b\210\202*\211 \210\311\205=\312V\205=\313 E\210\314\312!\207" [buffer-undo-list visual-line-mode evil-respect-visual-line-mode evil-insert-count evil-insert-lines evil-insert-vcount evil-first-non-blank evil-beginning-of-line beginning-of-visual-line nil 1 line-number-at-pos evil-insert-state] 7 (#$ . 191304)])#@328 Switch to insert state at beginning of current line. Point is placed at the first non-blank character on the current line. The insertion will be repeated COUNT times. If VCOUNT is non nil it should be number > 0. The insertion will be repeated in the next VCOUNT - 1 lines below the current one. (fn COUNT &optional VCOUNT) (defalias 'evil-insert-line #[513 "\300\301#\207" [evil--insert-line t] 6 (#$ . 192263) "p"])#@323 Switch to insert state at beginning of current line. Point is placed at column 0, or the beginning of the visual line. The insertion will be repeated COUNT times. If VCOUNT is non nil it should be number > 0. The insertion will be repeated in the next VCOUNT - 1 lines below the current one. (fn COUNT &optional VCOUNT) (defalias 'evil-insert-0-line #[513 "\300 \203\301 \207\302\303#\207" [evil-visual-state-p evil-beginning-of-line evil--insert-line nil] 6 (#$ . 192692) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@259 Switch to Insert state at the end of the current line. The insertion will be repeated COUNT times. If VCOUNT is non nil it should be number > 0. The insertion will be repeated in the next VCOUNT - 1 lines below the current one. (fn COUNT &optional VCOUNT) (evil-set-command-properties 'evil-insert-0-line :keep-visual t :type 'exclusive) (defalias 'evil-append-line #[513 "\203 \203\305 \210\202\306 \210\307\211\205$\211\310V\205$\311 \312E\313\310!\207" [visual-line-mode evil-respect-visual-line-mode evil-insert-count evil-insert-lines evil-insert-vcount end-of-visual-line evil-move-end-of-line nil 1 line-number-at-pos end-of-line evil-insert-state] 5 (#$ . 193249) "p"])#@36 Insert COUNT digraphs. (fn COUNT) (defalias 'evil-insert-digraph #[257 "`\300\211\301 \203!\302 Z^\262\303\\\"\262\304#\210\202'\303\211\"\262\305\306!\"\210\2055\307!\207" [nil evil-replace-state-p line-end-position make-overlay evil-update-replace-alist insert-char evil-read-digraph-char-with-overlay delete-char] 8 (#$ . 193948) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@40 Show a list of all available digraphs. (evil-set-command-properties 'evil-insert-digraph :repeat 'change) (defalias 'evil-ex-show-digraphs #[0 "\306\307!\210\310\311\312!\203\313\312!\210\314\312!r\211q\210\315\316S\211\262\317Y\203,\320\321\"\262\202\262\322\n \"\323\203\315\316S\211\262\317Y\203s\320\211A\262\242\206P\324\211\203]\211A\262\242\202d\325\326\327GD\"\330!\260D\266\202\"\262\202:\323D\266\202B\262\2024\266\201\237\323\331 \210\332\333 )\210\334!)\207" [inhibit-read-only tabulated-list-format evil-digraphs-table-user evil-digraphs-table tabulated-list-entries evil-list-view-select-action require evil-digraphs t get-buffer "*evil-digraphs*" kill-buffer get-buffer-create 3 [] 0 vconcat [("Digraph" 8 nil) ("Sequence" 16 nil)] append nil (nil . 32) signal wrong-number-of-arguments (chars . digraph) char-to-string evil-list-view-mode "Evil Digraphs" evil-motion-state switch-to-buffer-other-window mode-name] 12 (#$ . 194378) nil])#@55 Insert STRING as if typed interactively. (fn STRING) (evil-set-command-properties 'evil-ex-show-digraphs :repeat nil) (defalias 'evil--self-insert-string #[257 "\301\302\"\211\211\205\211@\211\303\304!)\266A\202\207" [last-command-event append nil self-insert-command 1] 6 (#$ . 195377)])#@203 Copy characters from preceding non-blank line. The copied text is inserted before point. ARG is the number of lines to move backward. See also \\[evil-copy-from-below]. (fn ARG) (defalias 'evil-copy-from-above #[257 "\300\301\302\"!\207" [evil--self-insert-string evil-copy-chars-from-line -1] 5 (#$ . 195680) (byte-code "\204 \303=\203\n\304!C\207\304!C\207" [current-prefix-arg last-command last-prefix-arg evil-copy-from-above prefix-numeric-value] 2)])#@202 Copy characters from following non-blank line. The copied text is inserted before point. ARG is the number of lines to move forward. See also \\[evil-copy-from-above]. (fn ARG) (defalias 'evil-copy-from-below #[257 "\300\301\302\"!\207" [evil--self-insert-string evil-copy-chars-from-line 1] 5 (#$ . 196176) (byte-code "\204 \303=\203\n\304!C\207\304!C\207" [current-prefix-arg last-command last-prefix-arg evil-copy-from-below prefix-numeric-value] 2)])#@179 Return N characters from line NUM, starting at column COL. NUM is relative to the current line and can be negative. COL defaults to the current column. (fn N NUM &optional COL) (defalias 'evil-copy-chars-from-line #[770 "\211\206i\300\212y\210\301\302!\203!\303W\203\304\300x\210\202!\304\300w\210\305 \210\306!\210iW\203Kh\307=\203HiZ^\310\311\"\262Z\262\210\202K\312u\210\211`\313 `\\^{P)\207" [nil looking-at "[[:space:]]*$" 0 " \n" evil-move-beginning-of-line move-to-column 9 make-string 32 -1 line-end-position] 10 (#$ . 196670) "p"])#@91 Switch to Replace state at point. The insertion will be repeated COUNT times. (fn COUNT) (defalias 'evil-enter-replace-state #[257 "\211\211\303\211\304\305!\207" [evil-insert-count evil-insert-lines evil-insert-vcount nil evil-replace-state 1] 4 (#$ . 197240) "p"])#@134 Complete to the nearest following word. Search backward if a match isn't found. Calls `evil-complete-next-func'. (fn &optional ARG) (defalias 'evil-complete-next #[256 "\302 \203 \207 !\207" [evil-complete-next-minibuffer-func evil-complete-next-func minibufferp] 3 (#$ . 197518) (list current-prefix-arg)])#@137 Complete to the nearest preceding word. Search forward if a match isn't found. Calls `evil-complete-previous-func'. (fn &optional ARG) (evil-set-command-properties 'evil-complete-next :repeat 'change) (defalias 'evil-complete-previous #[256 "\302 \203 \207 !\207" [evil-complete-previous-minibuffer-func evil-complete-previous-func minibufferp] 3 (#$ . 197837) (list current-prefix-arg)])#@82 Complete a whole line. Calls `evil-complete-next-line-func'. (fn &optional ARG) (evil-set-command-properties 'evil-complete-previous :repeat 'change) (defalias 'evil-complete-next-line #[256 "\302 \203 \207 !\207" [evil-complete-next-minibuffer-func evil-complete-next-line-func minibufferp] 3 (#$ . 198236) (list current-prefix-arg)])#@86 Complete a whole line. Calls `evil-complete-previous-line-func'. (fn &optional ARG) (evil-set-command-properties 'evil-complete-next-line :repeat 'change) (defalias 'evil-complete-previous-line #[256 "\302 \203 \207 !\207" [evil-complete-previous-minibuffer-func evil-complete-previous-line-func minibufferp] 3 (#$ . 198582) (list current-prefix-arg)])#@146 Called to record a search command. FLAG is either `pre' or `post' if the function is called before resp. after executing the command. (fn FLAG) (evil-set-command-properties 'evil-complete-previous-line :repeat 'change) (defalias 'evil-repeat-search #[257 "\303 \203\211\304=\203\305\306 !\210\307 \207\303 \203,\211\310=\203,\305\203( \242\202*\n\242!\207\311!\207" [evil-regexp-search regexp-search-ring search-ring evil-operator-state-p pre evil-repeat-record this-command-keys evil-clear-command-keys post evil-repeat-motion] 3 (#$ . 198946)]) (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-forward] 2]) (defalias 'evil-search-forward #[0 "\301\302\"\207" [evil-regexp-search evil-search-incrementally t] 3 nil nil]) (byte-code "\300\301\302\303\304\305\306!\203\307\306!\203\303\310\307\306!\"\202\311\"#\210\312\301\313\314\315\316\317\320\321\316& \210\322\323\324\"\207" [put evil-search-forward function-documentation format "Search forward for user-entered text.\nSearches for regular expression if `evil-regexp-search' is t.%s" fboundp isearch-forward documentation "\n\nBelow is the documentation string for `isearch-forward',\nwhich lists available keys:\n\n%s" "" evil-set-command-properties :repeat evil-repeat-search :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-backward] 2]] 10) (defalias 'evil-search-backward #[0 "\301\302\"\207" [evil-regexp-search evil-search-incrementally nil] 3 nil nil])#@47 Repeat the last search. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306!\203\307\306!\203\303\310\307\306!\"\202\311\"#\210\312\301\313\314\315\316\317\320\321\316& \210\322\323\324\"\207" [put evil-search-backward function-documentation format "Search backward for user-entered text.\nSearches for regular expression if `evil-regexp-search' is t.%s" fboundp isearch-forward documentation "\n\nBelow is the documentation string for `isearch-forward',\nwhich lists available keys:\n\n%s" "" evil-set-command-properties :repeat evil-repeat-search :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-next] 2]] 10) (defalias 'evil-search-next #[256 "`\203\n \242\202\f\n\242\212\304 #\210`V\203*\212\305 \210`U)\203*\304 #\210`)b\210\205O\306V\205OS\307\211W\205M\310\304 #\266T\202;\266\202\207" [evil-regexp-search regexp-search-ring search-ring isearch-forward evil-search evil-adjust-cursor 1 0 nil] 10 (#$ . 200520) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@73 Repeat the last search in the opposite direction. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-search-next :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-previous] 2]] 10) (defalias 'evil-search-previous #[256 "\211\206\304\305\211W\205#\306\307\203 \242\202\n\242 ?#\266T\202\207" [evil-regexp-search regexp-search-ring search-ring isearch-forward 1 0 nil evil-search] 8 (#$ . 201645) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@70 Search backward for symbol under point. (fn &optional COUNT SYMBOL) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-search-previous :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-word-backward] 2]] 10) (defalias 'evil-search-word-backward #[512 "\206\300\301\211W\205\302\303\302\211#\266T\202\207" [1 0 nil evil-search-word] 9 (#$ . 202318) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)])#@69 Search forward for symbol under point. (fn &optional COUNT SYMBOL) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-search-word-backward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-word-forward] 2]] 10) (defalias 'evil-search-word-forward #[512 "\206\300\301\211W\205\302\303\304\302#\266T\202\207" [1 0 nil evil-search-word t] 9 (#$ . 202939) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)])#@140 Search backward for symbol under point. The search is unbounded, i.e., the pattern is not wrapped in \<...\>. (fn &optional COUNT SYMBOL) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-search-word-forward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-unbounded-word-backward] 2]] 10) (defalias 'evil-search-unbounded-word-backward #[512 "\206\300\301\211W\205\302\303\302\304#\266T\202\207" [1 0 nil evil-search-word t] 9 (#$ . 203565) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)])#@139 Search forward for symbol under point. The search is unbounded, i.e., the pattern is not wrapped in \<...\>. (fn &optional COUNT SYMBOL) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-search-unbounded-word-backward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-search-unbounded-word-forward] 2]] 10) (defalias 'evil-search-unbounded-word-forward #[512 "\206\300\301\211W\205\302\303\304\211#\266T\202\207" [1 0 nil evil-search-word t] 9 (#$ . 204283) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)])#@62 Find definition for STRING with imenu. (fn STRING POSITION) (evil-set-command-properties 'evil-search-unbounded-word-forward :repeat 'motion :jump t :type 'exclusive :keep-visual t) (defalias 'evil-goto-definition-imenu #[514 "\300\301\302\303#\210\302\211\304\305!\205G\3061\305 \211\2620\210\307\"\266\202\211A\310!\205G\311!p=\205G\312!\262\211\247\205G\313\314\315\316!\"\303\211$\210\303\207" [require imenu nil t fboundp imenu--make-index-alist (error) imenu--in-alist markerp marker-buffer marker-position evil-search format "\\_<%s\\_>" regexp-quote] 9 (#$ . 205008)])#@67 Find definition for POSITION with semantic. (fn STRING POSITION) (defalias 'evil-goto-definition-semantic #[514 "\300\301!\205\3021\301!0\207\210\303\207" [fboundp semantic-ia-fast-jump (error) nil] 4 (#$ . 205607)])#@62 Find definition at POSITION with xref. (fn STRING POSITION) (defalias 'evil-goto-definition-xref #[514 "\300\301!\205\212\211b\210\302\303 !)\3041\301!\210\3050\207\266\306\207" [fboundp xref-find-definitions xref-backend-identifier-at-point xref-find-backend (user-error) t nil] 5 (#$ . 205835)])#@68 Find definition for STRING with evil-search. (fn STRING POSITION) (defalias 'evil-goto-definition-search #[514 "\300\301\302\303!\"\304\211e$\304\207" [evil-search format "\\_<%s\\_>" regexp-quote t] 8 (#$ . 206145)])#@104 Go to definition or first occurrence of symbol under point. See also `evil-goto-definition-functions'. (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-definition] 2]) (defalias 'evil-goto-definition #[0 "\301\302\303\"\211@A\204\304\305!\207\302\306\307#\207" [isearch-forward evil--find-thing t symbol user-error "No symbol under cursor" run-hook-with-args-until-success evil-goto-definition-functions] 7 (#$ . 206371) nil])#@417 Perform fold ACTION for each matching major or minor mode in LIST. ACTION will be performed for the first matching handler in LIST. For more information on its features and format, see the documentation for `evil-fold-list'. If no matching ACTION is found in LIST, an error will signaled. Handler errors will be demoted, so a problem in one handler will (hopefully) not interfere with another. (fn LIST ACTION) (evil-set-command-properties 'evil-goto-definition :repeat 'motion :jump t :type 'exclusive :keep-visual t) (defalias 'evil-fold-action #[514 "\204\301\302\303\304\305\306\"\307#\"\207@@\310!\2034@A\311\"\211\2053\3121,\211 0\207\313\314\"\266\315\207\316A\"\207" [evil-fold-list user-error "Enable one of the following modes for folding to work: %s" mapconcat symbol-name mapcar caar ", " evil--mode-p plist-get (debug error) message "Error: %S" nil evil-fold-action] 9 (#$ . 206858)])#@116 Determine whether any symbol in MODES represents the current buffer's major mode or any of its minors. (fn MODES) (defalias 'evil--mode-p #[257 "\211\205\211@=\206\301!\203\211J\206\302A!\262\207" [major-mode boundp evil--mode-p] 4 (#$ . 207783)])#@84 Open or close a fold under point. See also `evil-open-fold' and `evil-close-fold'. (defalias 'evil-toggle-fold #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :toggle] 3 (#$ . 208050) nil])#@46 Open all folds. See also `evil-close-folds'. (evil-set-command-properties 'evil-toggle-fold) (defalias 'evil-open-folds #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :open-all] 3 (#$ . 208252) nil])#@46 Close all folds. See also `evil-open-folds'. (evil-set-command-properties 'evil-open-folds) (defalias 'evil-close-folds #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :close-all] 3 (#$ . 208465) nil])#@49 Open fold at point. See also `evil-close-fold'. (evil-set-command-properties 'evil-close-folds) (defalias 'evil-open-fold #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :open] 3 (#$ . 208679) nil])#@82 Open fold at point recursively. See also `evil-open-fold' and `evil-close-fold'. (evil-set-command-properties 'evil-open-fold) (defalias 'evil-open-fold-rec #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :open-rec] 3 (#$ . 208890) nil])#@49 Close fold at point. See also `evil-open-fold'. (evil-set-command-properties 'evil-open-fold-rec) (defalias 'evil-close-fold #[0 "\301\302\"\207" [evil-fold-list evil-fold-action :close] 3 (#$ . 209140) nil])#@403 Save the current buffer, from BEG to END, to FILE-OR-APPEND. If FILE-OR-APPEND is of the form ">> FILE", append to FILE instead of overwriting. The current buffer's filename is not changed unless it has no associated file and no region is specified. If the file already exists and the BANG argument is non-nil, it is overwritten without confirmation. (fn BEG END &optional TYPE FILE-OR-APPEND BANG) (evil-set-command-properties 'evil-close-fold) (defalias 'evil-write #[1282 "\302\216\303 \211\304\223\210 \203\305\306!\204\261\307!\211@A\310\311 !G\312U\203,\211\262G\312U\203;\313\314!\266\202\261\312H\315=\203R\316  \317\304O#\266\202\261\204`\n\203y \203y\320  \304\211 \206q ?&\266\202\261\211\204\210\321?\"\266\202\261\230\203\242\204\232\322 \266\202\261\321!\266\202\261\320\304\211\304?\304 ?&\266\323\324\206\271d\"\210\323\325\206\303d\326!\206\312dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-extract-append buffer-file-name buffer-base-buffer 0 user-error "Please specify a file name for the buffer" 33 shell-command-on-region 1 write-region write-file save-buffer evil-set-marker 91 93 marker-position] 19 (#$ . 209356) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!D\"\f\320\321 \203D\322\323!\210\202R\313\324\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-write plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-ex-argument evil-ex-bang deactivate-mark] 6)])#@133 Save all buffers visiting a file. If BANG is non nil then read-only buffers are saved, too, otherwise they are skipped. (fn BANG) (evil-set-command-properties 'evil-write :move-point nil :motion nil :type 'line :repeat nil :ex-arg 'file-or-shell :ex-bang t :keep-visual t :suppress-operator t) (defalias 'evil-write-all #[257 "\211\203\300\301!\207\300\301\302\"\207" [save-some-buffers t #[0 "?\205\301 \207" [buffer-read-only buffer-file-name] 1]] 4 (#$ . 211357) (list evil-ex-bang)])#@73 Same as `evil-write', but only write when the buffer has been modified. (evil-set-command-properties 'evil-write-all :repeat nil :move-point nil :ex-bang t) (defalias 'evil-update #[0 "\300 \205\301\302!\207" [buffer-modified-p call-interactively evil-write] 2 (#$ . 211857) nil])#@182 Save the current buffer to FILENAME. Changes the file name of the current buffer to FILENAME. If no FILENAME is given, the current file name is used. (fn FILENAME &optional BANG) (evil-set-command-properties 'evil-update :motion nil :move-point nil :type 'line :repeat nil) (defalias 'evil-save #[513 "G\300U\203 \301\302 !\262\303?\"\207" [0 buffer-file-name buffer-base-buffer write-file] 5 (#$ . 212146) (byte-code "\205\302 D\207" [evil-called-from-ex-p evil-ex-bang evil-ex-file-arg] 2)])#@100 Open FILE. If no FILE is specified, reload the current buffer from disk. (fn FILE &optional BANG) (evil-set-command-properties 'evil-save :repeat nil :move-point nil :ex-arg 'file :ex-bang t) (defalias 'evil-edit #[513 "\203\300!\207\301\211\206\302 ?\303#\210\304\305!\207" [find-file revert-buffer buffer-modified-p t read-only-mode -1] 6 (#$ . 212657) (byte-code "\205\302 D\207" [evil-called-from-ex-p evil-ex-bang evil-ex-file-arg] 2)])#@137 Open FILE but don't allow changes. If no FILE is specified, reload the current buffer from disk as read-only. (fn FILE &optional BANG) (evil-set-command-properties 'evil-edit :repeat nil :ex-arg 'file :ex-bang t) (defalias 'evil-view #[513 "\203\300!\207\301\211\206\302 ?\303#\210\304\305!\207" [find-file-read-only revert-buffer buffer-modified-p t read-only-mode 1] 6 (#$ . 213117) (byte-code "\205\302 D\207" [evil-called-from-ex-p evil-ex-bang evil-ex-file-arg] 2)])#@62 Add FILE to the buffer list, but don't visit it. (fn FILE) (evil-set-command-properties 'evil-view :repeat nil :ex-arg 'file :ex-bang t) (defalias 'evil-buffer-add #[257 "\211\203\n\211\300\230\203\301\302!\207\303!\207" ["" user-error "No file specified" find-file-noselect] 3 (#$ . 213606) (byte-code "\205\301 C\207" [evil-called-from-ex-p evil-ex-file-arg] 1)])#@84 Insert the contents of FILE below the current line or line COUNT. (fn COUNT FILE) (evil-set-command-properties 'evil-buffer-add :repeat nil :ex-arg 'file) (defalias 'evil-read #[514 "\211\205a\211G\300U?\205a\203eb\210\206\301y\300U\203\"n\204%\302c\210\211\300H\303U\204J\211\304\235\2038\305!\262\306!\212\211A@u\210n?\205H\302c)\207\307\305\301\310O!\311\"\210\312 b\210n\204_\302c\210\313y\207" [0 1 "\n" 33 ("#" "%") evil-ex-replace-special-filenames insert-file-contents shell-command nil t mark -1] 7 (#$ . 213986) (list current-prefix-arg evil-ex-argument)])#@87 Show the file-list. The same as `buffer-menu', but shows only buffers visiting files. (evil-set-command-properties 'evil-read :repeat nil :move-point nil :ex-arg 'file-or-shell) (defalias 'evil-show-files #[0 "\300\301!\207" [buffer-menu 1] 2 (#$ . 214577) nil])#@224 Go to error number COUNT. If no COUNT is supplied, move to the current error. Acts like `first-error' other than when given no counts, goes to the current error instead of the first, like in Vim's :cc command. (fn COUNT) (evil-set-command-properties 'evil-show-files :repeat nil) (defalias 'evil-goto-error #[257 "\211\203\300\301=\203\302\202!\207\303\301!\207" [first-error 0 1 next-error] 4 (#$ . 214846) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@40 Switch to another buffer. (fn BUFFER) (evil-set-command-properties 'evil-goto-error :repeat nil) (defalias 'evil-buffer #[257 "\211\204 \300\301 !\207\302!\203\300!\207\303\304\305#\211G\306U\205#\300@!\262\2064\307\310\311\"!\2054\300!\207" [switch-to-buffer other-buffer get-buffer internal-complete-buffer nil t 1 y-or-n-p format "No buffer with name \"%s\" exists. Create new buffer? "] 5 (#$ . 215348) (list evil-ex-argument)])#@73 Go to the COUNTth next buffer in the buffer list. (fn &optional COUNT) (evil-set-command-properties 'evil-buffer :repeat nil :ex-arg 'buffer) (defalias 'evil-next-buffer #[256 "\300!\207" [next-buffer] 3 (#$ . 215800) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@73 Go to the COUNTth prev buffer in the buffer list. (fn &optional COUNT) (evil-set-command-properties 'evil-next-buffer :repeat nil) (defalias 'evil-prev-buffer #[256 "\300!\207" [previous-buffer] 3 (#$ . 216097) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@145 Delete a buffer. All windows currently showing this buffer will be closed except for the last window in each frame. (fn BUFFER &optional BANG) (evil-set-command-properties 'evil-prev-buffer :repeat nil) (defalias 'evil-delete-buffer #[513 "r\206pq\210\211\203+\301\302!\210\303 \211\203*\211@\304!p=\203%\305\302\"\210\210A\202\210\306p\302\307#\310\300!\203F\203F\311\312!\203F\312 \210\202J\313\302!\210\211\211\205_\211@\3141Y\315!0\266A\202K)\207" [server-buffer-clients set-buffer-modified-p nil process-list process-buffer set-process-query-on-exit-flag get-buffer-window-list t boundp fboundp server-edit kill-buffer (error) delete-window] 7 (#$ . 216388) (list evil-ex-argument evil-ex-bang)])#@161 Close the current window, current frame, current tab, Emacs. If the current frame belongs to some client the client connection is closed. (fn &optional FORCE) (evil-set-command-properties 'evil-delete-buffer :ex-arg 'buffer :ex-bang t) (defalias 'evil-quit #[256 "\3011\302 0\207\210\303\300!\203*\203*\304\305!\203*\304\306!\203*\211\203'\306p!\207\305 \207\30712\310 0\207\210\3111;\312 0\207\210\211\203C\313 \207\314 \207" [server-buffer-clients (error) evil-window-delete boundp fboundp server-edit server-buffer-done (error) delete-frame (error) tab-bar-close-tab kill-emacs save-buffers-kill-emacs] 3 (#$ . 217117) (list evil-ex-bang)])#@53 Exit Emacs, asking for saving. (fn &optional BANG) (evil-set-command-properties 'evil-quit :repeat nil :ex-bang t) (defalias 'evil-quit-all #[256 "\211\204\300 \207\301\302 \303\"\211\203\304!\207\305 \211\203&\211@\306\307\"\266A\202\210\310 \207" [save-buffers-kill-terminal frame-parameter selected-frame client server-delete-client process-list set-process-query-on-exit-flag nil kill-emacs] 7 (#$ . 217778) (list evil-ex-bang)])#@226 Exit Emacs without saving, returning an non-zero error code. The FORCE argument is only there for compatibility and is ignored. This function fails with an error if Emacs is run in server mode. (fn &optional ERR-CODE FORCE) (evil-set-command-properties 'evil-quit-all :repeat nil :ex-bang t) (defalias 'evil-quit-all-with-error-code #[512 "\301\300!\203\203\302\303!\207\304\206\305!\207" [server-buffer-clients boundp user-error "Cannot exit client process with error code" kill-emacs 1] 4 (#$ . 218229) (byte-code "\203\n\304!\202 \203\305 !\202\n\203\306\202\307 D\207" [current-prefix-arg evil-ex-argument evil-called-from-ex-p evil-ex-bang prefix-numeric-value string-to-number nil 1] 2)])#@34 Save all buffers and exit Emacs. (evil-set-command-properties 'evil-quit-all-with-error-code :repeat nil :ex-bang t) (defalias 'evil-save-and-quit #[0 "\300\301!\207" [save-buffers-kill-terminal t] 2 (#$ . 218951) nil])#@73 Save the current buffer and close the window. (fn FILE &optional BANG) (evil-set-command-properties 'evil-save-and-quit) (defalias 'evil-save-and-close #[513 "\300\301\211\211%\210\302 \207" [evil-write nil evil-quit] 8 (#$ . 219176) (byte-code "\205\302 D\207" [evil-called-from-ex-p evil-ex-bang evil-ex-file-arg] 2)]) (evil-set-command-properties 'evil-save-and-close :repeat nil :ex-arg 'file :ex-bang t) (defalias 'evil-save-modified-and-close #[513 "\300 \203 \301\302\211\211%\210\303 \207" [buffer-modified-p evil-write nil evil-quit] 8 (#$ . 219176) (byte-code "\205\302 D\207" [evil-called-from-ex-p evil-ex-bang evil-ex-file-arg] 2)])#@313 Execute a shell command. If BEG, END and TYPE is specified, COMMAND is executed on the region, which is replaced with the command's output. Otherwise, the output is displayed in its own buffer. If PREVIOUS is non-nil, the previous shell command is executed instead. (fn BEG END &optional TYPE COMMAND PREVIOUS) (evil-set-command-properties 'evil-save-modified-and-close :repeat nil :ex-arg 'file :ex-bang t) (defalias 'evil-shell-command #[1282 "\306\216\307 \211\310\223\210 \203\311\312!\204\307\n\204@ \204$\313 \203( \2025^b\210\314\"\315\316\317!*\210\202\307G\320U\203Q\203X \262\202X\321!\262G\320U\203o\322\323\203i\324\202j\325\"\210\202\307$\203\303%\204\207\326\310\327%\210\202\307\330\331!\330\331!\332\333#\216\326  \310&\320U\203\271|\210\334!\210b\210\335 \210\202\275\336!\210)\266\202\307\337!\210\340\341\206\317d\"\210\340\342\206\331d\343!\206\340dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-called-from-ex-p current-prefix-arg evil-ex-initial-input evil-previous-shell-command #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-visual-state-p count-lines "!" call-interactively evil-ex 0 evil-ex-replace-special-filenames user-error "No%s shell command" " previous" "" shell-command-on-region t generate-new-buffer " *temp*" make-closure #[0 "\302\301!\210\302\300!\207" [V0 V1 kill-buffer] 2] insert-buffer-substring evil-first-non-blank display-message-or-buffer shell-command evil-set-marker 91 93 marker-position evil-ex-range evil-display-shell-error-in-message] 16 (#$ . 219842) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317\320!D\"\f\320\321 \203D\322\323!\210\202R\313\324\"\203R\n\203R\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-shell-command plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-ex-argument evil-ex-bang deactivate-mark] 6)])#@164 Call a build command in the current directory. If ARG is nil this function calls `recompile', otherwise it calls `compile' passing ARG as build command. (fn ARG) (evil-set-command-properties 'evil-shell-command :move-point t :ex-arg 'shell :ex-bang t :keep-visual t :suppress-operator t) (defalias 'evil-make #[257 "\300\301!\203 \211\204 \301 \207\302!\207" [fboundp recompile compile] 3 (#$ . 222185) (list evil-ex-argument)])#@85 Show the contents of REGISTERS, or all registers, if none supplied. (fn REGISTERS)#@10 (fn R) (evil-set-command-properties 'evil-make :ex-arg 'shell) (defalias 'evil-show-registers #[257 "\305 \306\307\"\262\211\203\310\311\312\"\"\202\313\314\315!\203$\316\315!\210\317\315!r\211q\210\320\307\211\211:\203q@\262\211A\262\242\262\307\321\322!;\203U\323\324\325#\202d\326!\203c\327!\202d\330\"DB\262A\262\2021\266\203\237\307\331 \210\332\333 )\210\334!)\207" [inhibit-read-only tabulated-list-format tabulated-list-entries evil-list-view-select-action mode-name evil-register-list append nil cl-remove-if-not make-closure #[257 "\211@\300>\207" [V0] 3 (#$ . 222712)] t get-buffer "*evil-registers*" kill-buffer get-buffer-create [("Register" 10 nil) ("Value" 1000 nil)] vector char-to-string replace-regexp-in-string "\n" "^J" vectorp key-description "" evil-list-view-mode "Evil Registers" evil-motion-state switch-to-buffer-other-window] 16 (#$ . 222623) (byte-code "\205 C\207" [evil-called-from-ex-p evil-ex-argument] 1)])#@146 Show all marks. If MRKS is non-nil it should be a string and only registers corresponding to the characters of this string are shown. (fn MRKS)#@10 (fn M)#@12 (fn A B) (evil-set-command-properties 'evil-show-registers :repeat nil :ex-arg t) (defalias 'evil-show-marks #[257 "\211C\306\307\310\"\307\311\312\300!\"\"\242\203'\211\242\306\313\"\262\240\210\314\315\316\"\"\262\317\320\"\262\321\322\323!\2039\324\323!\210\325\323!r\211q\210\326\327\330\"\313\211:\203t@\262\313\331\332@!\333A@!\333\3348!\3358C$DB\262A\262\202H\266\202\237\336\337 \210\340\341 )\210\342!)\207" [evil-markers-alist inhibit-read-only tabulated-list-format tabulated-list-entries evil-list-view-select-action mode-name append cl-remove-if #[257 "\300@!\206\f\301A!?\207" [evil-global-marker-p markerp] 3 (#$ . 223855)] #[257 "\300@!?\206 \301A!?\207" [evil-global-marker-p markerp] 3 (#$ . 223855)] default-value nil cl-delete-if make-closure #[257 "\211@\300\242\235?\207" [V0] 3 (#$ . 223855)] mapcar #[257 "r\300A!q\210\212\211Ab\210\211@\301`!i\302 *F\207" [marker-buffer line-number-at-pos buffer-name] 5 (#$ . 223855)] t get-buffer "*evil-marks*" kill-buffer get-buffer-create [("Mark" 8 nil) ("Line" 8 nil) ("Column" 8 nil) ("Buffer" 1000 nil)] sort #[514 "@@W\207" [] 4 (#$ . 223869)] vector char-to-string number-to-string 2 3 evil--show-marks-select-action evil-list-view-mode "Evil Marks" evil-motion-state switch-to-buffer-other-window] 14 (#$ . 223705) (byte-code "\205 C\207" [evil-called-from-ex-p evil-ex-argument] 1)])#@14 (fn ENTRY) (evil-set-command-properties 'evil-show-marks :repeat nil :ex-arg t) (defalias 'evil--show-marks-select-action #[257 "\300 \210\301\302\234@!\210\303\304\305\234!!\207" [kill-buffer switch-to-buffer 3 evil-goto-mark string-to-char 0] 5 (#$ . 225278)])#@224 Where TO-BE-PARSED can contain ranges in the form `x-y'. PARSED is a list of characters whose marks should be deleted. Like vim, on invalid input, preceeding valid input is still parsed. (fn TO-BE-PARSED &optional PARSED) (defalias 'evil--parse-delmarks #[513 "\211\211A\262\242\211A\262\242\211A\262\242\204\207\300=\204S\301Y\203+\302X\204I\303Y\2037\304X\204I\305Y\203C\306X\204I\307>\203S\310AB\"\207\300=\203\245\211\203\245\301Y\203oX\203o\211\302X\204\223\303Y\203\201X\203\201\211\304X\204\223\305Y\203\245X\203\245\211\306X\203\245\310AAA\311\312\"\"\"\207\313\314\315\316\317\320 \"\"\"\210\207" [45 97 122 65 90 48 57 (34 94 46 91 93 60 62) evil--parse-delmarks append number-sequence evil-echo "Invalid input: %s" apply string remove nil] 13 (#$ . 225551)])#@245 MARKS is a string denoting all marks to be deleted. Mark names are either single characters or a range of characters in the form `x-y'. If FORCE is non-nil and MARKS is blank, all local marks except 0-9 are removed. (fn MARKS &optional FORCE) (defalias 'evil-delete-marks #[513 "\301\302\303\304\"\"\203\211\203\305\306!\207\211\203-\307!\310\311\"\312\"\313\300\312\314\300!\"\"\207\2057\315\316\"\211\207" [evil-markers-alist remove 32 append nil evil-echo "Invalid input" evil--parse-delmarks make-closure #[257 "\211@\300\235\207" [V0] 3 (#$ . 223855)] cl-remove-if set-default default-value cl-remove-if-not #[257 "\211@\211\300Y\205 \211\301X\207" [48 57] 4 (#$ . 223855)]] 11 (#$ . 226390) (byte-code "\205 \nD\207" [evil-called-from-ex-p evil-ex-argument evil-ex-bang] 2)])#@162 Open the file at point and go to position if present. Supports positions in the following formats: "path:line path(line)", "path:line:col" and "path(line,col)".#@38 (fn PATTERN MATCH-NUMBER BACKWARD) (evil-set-command-properties 'evil-delete-marks :ex-arg t :ex-bang t) (defalias 'evil-find-file-at-point-with-line #[0 "\300\301!\210\302 \211\204\303\304!\210\305\211\306\307\310#\206,\211\311\307\312#\206,\211\313\307\310#\206,\211\314\307\312#\306\315\310#\2069\311\315\312#\316\317\203F\320\321\"\202G\322\203R\320\323\"\202S\324#\210\325!\210\205leb\210Sy\210\211\205l\326S!\207" [require ffap ffap-file-at-point user-error "File does not exist." #[771 "\212A@b\210\211\203\301\302 \303#\202\304\305 \303#\205!\306\307!!)\207" [ffap-string-at-point-region re-search-backward line-beginning-position t re-search-forward line-end-position string-to-number match-string] 7 (#$ . 227366)] ":\\([0-9]+\\):\\([0-9]+\\)\\=" 1 t "\\=(\\([0-9]+\\),\\([0-9]+\\))" nil ":\\([0-9]+\\)\\=" "\\=(\\([0-9]+\\))" 2 evil-echo "%s, %s" format "line: %s" "no line" "column: %s" "no column" find-file-at-point move-to-column] 10 (#$ . 227200) nil])#@94 Find the filename selected by the visual region. Signal an error if the file does not exist. (evil-set-command-properties 'evil-find-file-at-point-with-line) (defalias 'evil-find-file-at-point-visual #[0 "\300 \301 {\302!\203\303!\207\304\305\"\207" [region-beginning region-end file-exists-p find-file-at-point user-error "Can't find file \"%s\" in path"] 4 (#$ . 228373) nil])#@27 (fn ARG PREDICATE FLAG)#@144 Set the initial state for the current major mode to STATE. This is the state the buffer comes up in. See `evil-set-initial-state'. (fn STATE) (byte-code "\302\303!\210\304\305\306#\307\310\311BD\203\241\266\202%\305B\211\262B\266\210\304\312 \306#\313\314B\203;\241\266\202F\312B\211\262 B\266 \207" [evil-ex-argument-types evil-interactive-alist evil-set-command-properties evil-find-file-at-point-visual assoc state equal nil collection #[771 "\301B\2051\302\267\202\303#\207\304#\207\305#\207\242\306=\2051\306\307A$B\207" [evil-state-properties (nil) #s(hash-table test eq purecopy t data (nil 13 t 19 lambda 25)) try-completion all-completions test-completion boundaries completion-boundaries] 10 (#$ . 228762)] "" (list (and evil-called-from-ex-p evil-ex-argument (intern-soft evil-ex-argument))) (:ex-arg state)] 4) (defalias 'evil-ex-set-initial-state #[257 "\211\236\204\211\203\302\303\"\207\304 !\211=?\205Y\305\306\307 \206\"\310\206(\310$!\205Y\311 \"\210\305\312!\205Y\211D\211\205W\211@\211\203R\313\306\314\"!\315\211J\"\266\210A\202;\262\207" [evil-state-properties major-mode user-error "State %s cannot be set as initial Evil state" evil-initial-state y-or-n-p format "Major-mode `%s' has initial mode `%s'. Change to `%s'? " "DEFAULT" evil-set-initial-state "Save setting in customization file? " intern "evil-%s-state-modes" customize-save-variable] 8 (#$ . 228794) (byte-code "\205 \205 \302 !C\207" [evil-called-from-ex-p evil-ex-argument intern-soft] 2)])#@59 Switch to normal state without recording current command. (evil-set-command-properties 'evil-ex-set-initial-state :repeat nil :ex-arg 'state) (defalias 'evil-force-normal-state #[0 "\300 \207" [evil-normal-state] 1 (#$ . 230362) nil])#@50 Go to the next occurrence. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305%\210\306\307\310\"\207" [evil-set-command-properties evil-force-normal-state :repeat abort :suppress-operator t eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-next] 2]] 6) (defalias 'evil-ex-search-next #[256 "\300!\207" [evil-ex-search] 3 (#$ . 230602) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@55 Go the the previous occurrence. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-search-next :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-previous] 2]] 10) (defalias 'evil-ex-search-previous #[256 "\301=\203\n\302\202 \301\303!)\207" [evil-ex-search-direction backward forward evil-ex-search] 3 (#$ . 231079) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)]) (evil-set-command-properties 'evil-ex-search-previous :repeat 'motion :jump t :type 'exclusive :keep-visual t) (defalias 'evil-repeat-ex-search #[257 "\304 \203\211\305=\203\306\307 !\210\310 \207\304 \203A\211\311=\203A\312!@\306\313 !!\210\n\2032\306\nP!\210\210\307 G\314U\205D\306\315 !!\207\316!\207" [evil-repeat-info evil-ex-search-pattern evil-ex-search-offset last-input-event evil-operator-state-p pre evil-repeat-record this-command-keys evil-clear-command-keys post last evil-ex-pattern-regex 0 vector evil-repeat-motion] 5 (#$ . 198946)])#@47 Start a forward search. (fn &optional COUNT) (eval-after-load 'eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-forward] 2]) (defalias 'evil-ex-search-forward #[256 "\300\301\"\207" [evil-ex-start-search forward] 4 (#$ . 232234) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@48 Start a backward search. (fn &optional COUNT) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-search-forward :repeat evil-repeat-ex-search :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-backward] 2]] 10) (defalias 'evil-ex-search-backward #[256 "\300\301\"\207" [evil-ex-start-search backward] 4 (#$ . 232583) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@87 Search for the next occurrence of word under the cursor. (fn &optional COUNT SYMBOL) (byte-code "\300\301\302\303\304\305\306\305&\210\307\310\311\"\207" [evil-set-command-properties evil-ex-search-backward :repeat evil-repeat-ex-search :jump t :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-word-forward] 2]] 8) (defalias 'evil-ex-search-word-forward #[512 "\300\301\302$\207" [evil-ex-start-word-search nil forward] 7 (#$ . 233135) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)]) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-search-word-forward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-word-backward] 2]] 10) (defalias 'evil-ex-search-word-backward #[512 "\300\301\302$\207" [evil-ex-start-word-search nil backward] 7 (#$ . 233135) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)]) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-search-word-backward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-unbounded-word-forward] 2]] 10) (defalias 'evil-ex-search-unbounded-word-forward #[512 "\300\301\302$\207" [evil-ex-start-word-search t forward] 7 (#$ . 233135) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)]) (byte-code "\300\301\302\303\304\305\306\307\310\305& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-search-unbounded-word-forward :repeat motion :jump t :type exclusive :keep-visual eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-ex-search-unbounded-word-backward] 2]] 10) (defalias 'evil-ex-search-unbounded-word-backward #[512 "\300\301\302$\207" [evil-ex-start-word-search t backward] 7 (#$ . 233135) (byte-code "\302! D\207" [current-prefix-arg evil-symbol-word-search prefix-numeric-value] 2)])#@200 Unconditionally close overlays in OPEN-SPOTS in current window. Modified version of `reveal-close-old-overlays' from reveal.el. OPEN-SPOTS is a local version of `reveal-open-spots'. (fn OPEN-SPOTS) (evil-set-command-properties 'evil-ex-search-unbounded-word-backward :repeat 'motion :jump t :type 'exclusive :keep-visual t) (defalias 'evil-revert-reveal #[257 "\211\211\205_\211@\211@A\300 =\204\301\302!\210\303\304\"\303\305\"\206+\211\305N\206+\303\306\"\307!\203N\211\203N\3101B\211\311\"0\210\202T\312\313$\266\202T\314\315#\210\314\304\316#\266A\202\207" [selected-window error "evil-revert-reveal: slot with wrong window" overlay-get reveal-invisible reveal-toggle-invisible isearch-open-invisible-temporary overlay-start (error) t message "!!Reveal-hide (funcall %s %s t): %s !!" overlay-put invisible nil] 13 (#$ . 235378)])#@233 Display message according to replacements and flags. If FLAGS contains "p" or "#" and NREPLACED is more than 0, print the last line to the echo area. Otherwise, print the number of replacements made or found. (fn NREPLACED FLAGS) (defalias 'evil--ex-substitute-final-message #[514 "\300V\211\203\301>\203\302\303\304 \305 {\"\207\211\2031\306>\2031\302\307\310\311\312 !\313\314#\304 \305 {#\207\302\315\316>\203=\317\202>\320\211\321U\204I\322\202J\323$\207" [0 112 evil-echo "%s" line-beginning-position line-end-position 35 "%s %s" propertize number-to-string line-number-at-pos face line-number-current-line "%s %d occurrence%s" 110 "Found" "Replaced" 1 "s" ""] 9 (#$ . 236247)])#@124 The Ex substitute command. [BEG,END]substitute/PATTERN/REPLACEMENT/FLAGS (fn BEG END &optional PATTERN REPLACEMENT FLAGS) (defalias 'evil-ex-substitute #[1282 "\306\216\307 \211\310\223\210 \203\311\312!\2046\313 \210\204\"\314\315!\210\206'\316\262\262\310\317@\320>\321>\205B\211?\322!\211AB\323!\324\325 `C\326 !\327``\"\307 \310\223\310\211C\310D\330\331\n\f&\216\3322\333 \211E\317\"\210\334\335\"\210\336\337\340#\210\336\341\342#\210b\210\343 \317#\205F\203\266\344\324\224\324\225\345\317$\204\235\324\224\324\225U\310b\210U\203\331V\203\331n\203\331\346\332\310\"\210\347\317\"\262\350\351\317#\262b\210 \203\215;\203\372\202@A \"\352\353\354\324!\355B?\"#\317G\310\356 #\210\203$\357 \210\3602\207\361!\211\262\205\206\211\362>\203W\204H\363!\210\364B?\"\210T\262\365\335\366\367!\370\335!#\210\211\371\267\202(\346\360\310\"\210\202(\310\262\346\360\310\"\210\202(\346\332\310\"\210\202(\372\373!\210\202(\374\373!\210\202(0)\266\202\270\204\263;\203\235\202\246@A \"\363!\210\364B?\"\266 T\262\f `\240\210`Y\203\315\346\332\310\"\266\202\235\204\351\211\204\351\310y\210`Y\203\346\332\310\"\266\202\235\203`\212\343 \317#\205\374\211`U)\262\203m\203 \346\332\310\"\210\310u\210\266\202\2350)\210\375\"\210\324U\2030H\2030Hb\210\2023\376 \210-\266 \377\201I\206@d\"\210\377\201J\206Ld\201K!\206UdS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-ex-last-was-search evil-ex-substitute-pattern evil-ex-substitute-replacement evil-ex-substitute-flags #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-ex-nohighlight user-error "No pattern given" #1="" t 110 99 evil-ex-pattern-ignore-case evil-ex-pattern-regex 0 point-marker evil-ex-pattern-whole-line make-overlay make-closure #[0 "\306\307!\210\310\302!\210\305\203\304\202\303\242b\210\304\311\211\223\210\301\311\211\223\210\300\205&\312 !\207" [V0 V1 V2 V3 V4 V5 evil-ex-delete-hl evil-ex-substitute delete-overlay nil evil-revert-reveal reveal-open-spots] 3] exit-search isearch-update-ring evil-ex-hl-change evil-ex-substitute overlay-put face isearch priority 1001 re-search-forward text-property-any read-only throw match-data search-forward "\n" format "Replace %s with %s (y/n/a/q/l/^E/^Y)? " match-string match-substitute-replacement move-overlay reveal-post-command exit-read-char read-char (121 97 108) set-match-data replace-match evil-ex-hl-set-region line-beginning-position 2 evil-ex-hl-get-max #s(hash-table test eq purecopy t data (121 349 110 349 97 357 113 368 108 368 27 368 5 376 25 383)) evil-scroll-line-down 1 evil-scroll-line-up evil--ex-substitute-final-message evil-first-non-blank evil-set-marker inhibit-field-text-motion case-fold-search case-replace reveal-open-spots transient-mark-mode isearch-string query-replace-skip-read-only search-invisible evil-ex-point 91 93 marker-position] 31 (#$ . 236954) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \205:\320\2068\321\322\"\"\f\322\323 \203L\324\325!\210\202Z\313\326\"\203Z\n\203Z\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-substitute plist-member :motion undefined plist-get :type nil append evil-operator-range evil-ex-get-substitute-info #1# t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 7)])#@93 Repeat last substitute command. This is the same as ":s//~/". (fn BEG END &optional FLAGS) (evil-set-command-properties 'evil-ex-substitute :move-point nil :repeat nil :jump t :motion 'evil-line :ex-arg 'substitution :keep-visual t :suppress-operator t) (defalias 'evil-ex-repeat-substitute #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204$\307\310\311\312P!$\210\313\314\206,d\"\210\313\315\2066d\316!\206=dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any apply evil-ex-substitute evil-ex-get-substitute-info "//~/" evil-set-marker 91 93 marker-position] 12 (#$ . 240771) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053C\"\f\320\321 \203F\322\323!\210\202T\313\324\"\203T\n\203T\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-repeat-substitute plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@110 Repeat last substitute command with last flags. This is the same as ":s//~/&". (fn BEG END &optional FLAGS) (evil-set-command-properties 'evil-ex-repeat-substitute :move-point nil :repeat nil :jump t :motion 'evil-line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-ex-repeat-substitute-with-flags #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204$\307\310\311\312P!$\210\313\314\206,d\"\210\313\315\2066d\316!\206=dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any apply evil-ex-substitute evil-ex-get-substitute-info "//~/&" evil-set-marker 91 93 marker-position] 12 (#$ . 242180) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053C\"\f\320\321 \203F\322\323!\210\202T\313\324\"\203T\n\203T\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-repeat-substitute-with-flags plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@119 Repeat last substitute command with last search pattern. This is the same as ":s//~/r". (fn BEG END &optional FLAGS) (evil-set-command-properties 'evil-ex-repeat-substitute-with-flags :move-point nil :repeat nil :jump t :motion 'evil-line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-ex-repeat-substitute-with-search #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204$\307\310\311\312P!$\210\313\314\206,d\"\210\313\315\2066d\316!\206=dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any apply evil-ex-substitute evil-ex-get-substitute-info "//~/r" evil-set-marker 91 93 marker-position] 12 (#$ . 243624) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053C\"\f\320\321 \203F\322\323!\210\202T\313\324\"\203T\n\203T\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-repeat-substitute-with-search plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@135 Repeat last substitute command with last search pattern and last flags. This is the same as ":s//~/&r". (fn BEG END &optional FLAGS) (evil-set-command-properties 'evil-ex-repeat-substitute-with-search :move-point nil :repeat nil :jump t :motion 'evil-line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-ex-repeat-substitute-with-search-and-flags #[770 "\302\216\303 \211\304\223\210 \203\305\306!\204$\307\310\311\312P!$\210\313\314\206,d\"\210\313\315\2066d\316!\206=dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any apply evil-ex-substitute evil-ex-get-substitute-info "//~/&r" evil-set-marker 91 93 marker-position] 12 (#$ . 245090) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053C\"\f\320\321 \203F\322\323!\210\202T\313\324\"\203T\n\203T\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-repeat-substitute-with-search-and-flags plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@85 Repeat last substitute command on the whole buffer. This is the same as ":%s//~/&". (evil-set-command-properties 'evil-ex-repeat-substitute-with-search-and-flags :move-point nil :repeat nil :jump t :motion 'evil-line :ex-arg t :keep-visual t :suppress-operator t) (defalias 'evil-ex-repeat-global-substitute #[0 "\302\216\303 \211\304\211\223\210 \203\305\306!\204\307\310ed\311\312!$\210\313\314d\"\210\313\315d\316!\206.dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any apply evil-ex-substitute evil-ex-get-substitute-info "//~/&" evil-set-marker 91 93 marker-position] 8 (#$ . 246593) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\f\316\317 \203:\320\321!\210\202H\313\322\"\203H\n\203H\nb\210-\315\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-repeat-global-substitute plist-member :motion undefined plist-get :type nil t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 5)])#@422 Define a pattern to highlight in the current buffer. With no args, clear a highlight from the buffer With only an ! argument, clear all highlights from the buffer. With one arg, interpret as the pattern, and prompt for a face. With two args, interpret as :match {face} /{pattern}/. Unlike Vim, multiple highlights can be set at once, so there is no need for ":2match" and ":3match" Ex commands. (fn ARGS &optional BANG) (evil-set-command-properties 'evil-ex-repeat-global-substitute :move-point nil :repeat nil :jump t :motion 'evil-line :keep-visual t :suppress-operator t) (defalias 'evil-ex-match #[513 "\204\304\262\305\306\"\210\307\310\"\307\311\"\312\206\206\304!\211@\206%\304\313\"\314=\315\316! \203;\317!\202<\211\203F\320\230\203W\203Q\321\322!\202y\323\321!\202yG\310U\204d\324\325!\202y\204t\326\327!\210\330\331 \"\202y\330\"*\207" [evil-ex-search-case case-fold-search search-upper-case evil-ex-search-vim-style-regexp "" string-match "\\` *\\([^ ]+\\)? *\\(.+\\)?\\'" match-string 1 2 evil-delimited-arguments evil-ex-regex-case insensitive nil evil-ex-regex-without-case evil-transform-vim-style-regexp "none" hi-lock-unface-buffer t call-interactively user-error "Invalid pattern argument" require hi-lock hi-lock-face-buffer hi-lock-read-face-name] 11 (#$ . 247921) (byte-code "\205 \nD\207" [evil-called-from-ex-p evil-ex-argument evil-ex-bang] 2)])#@120 Stripped down version of `keep-lines'. Delete lines between BEG & END which don't match PATTERN. (fn PATTERN BEG END) (evil-set-command-properties 'evil-ex-match :ex-arg t :ex-bang t) (defalias 'evil-keep-lines #[771 "^b\210\212]b\210n\204m\204\300y\210\301 )\262\212n\204#\302y\210``W\203j\303\304#\2049\211|\210\202N\212\300\224b\210\300y\210`)W\203M|\210\210\212\302y\210`)\262`W\203$\300\224\300\225U\203$\302u\210\202$)\210\211\305\211\223\305\207" [0 point-marker 1 re-search-forward move nil] 9 (#$ . 249343)])#@115 Stripped down version of `flush-lines'. Delete lines between BEG & END which match PATTERN. (fn PATTERN BEG END) (defalias 'evil-flush-lines #[771 "^b\210\300]!\262\212`W\203.\301\302#\203.\212\303\224b\210\303y\210`)\304y\210`|\210\202 )\211\305\211\223\207" [copy-marker re-search-forward t 0 1 nil] 7 (#$ . 249895)])#@195 Use fast functions for fast line deletion. Delete lines between BEG & END which match PATTERN. Use `evil-flush-lines' if INVERT is nil, or `evil-keep-lines' if not. (fn BEG END PATTERN INVERT) (defalias 'evil--ex-performant-global-delete #[1028 "b\210\300\301#\210\302 \203\303#\210\202\"\304#\210\211b\210\211\305\211\223\207" [re-search-backward t point-marker evil-keep-lines evil-flush-lines nil] 9 (#$ . 250233)])#@106 The Ex global command. [BEG,END]global[!]/PATTERN/COMMAND (fn BEG END &optional PATTERN COMMAND INVERT) (defalias 'evil-ex-global #[1282 "\306\216\307 \211\310\223\210 \203\311\312!\204\204\313\314!\210\204'\313\315!\210\316\n\"\317=\320!\321!\322\3238!\324=\f \310C\203\203)\203T\325!\262\203r\3268\204rA@\204r\327  \n$\210\202*\330\331\"\210\nb\210\332 \210`\nW\203\270\333\334 \331#\203\230\211?\202\231\211\203\261\307 \203\250\335\224\206\252\336 \310\223\242B\240\210\210\310y\210\202\201\211\242\237\240\210\337\340\"\216\310+,--\211\331=\203\330\310\211,-\337\341\"\216\342 \210\343\216\331\211./\242\211\203\376\211@\211b\210\344\331\"\266A\202\352.\266+\266\345\346\206 d\"\210\345\347\206d\350!\206dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator evil-ex-search-case case-fold-search transient-mark-mode deactivate-mark #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any user-error "No pattern given" "No command given" evil-ex-regex-case insensitive evil-ex-regex-without-case evil-ex-parse evil-ex-completed-binding 2 evil-ex-delete evil-transform-vim-style-regexp 3 evil--ex-performant-global-delete isearch-update-ring t evil-move-beginning-of-line re-search-forward line-end-position 0 line-beginning-position make-closure #[0 "\300\242\211\203\211@\211\301\211\223\266A\202\210\302\303!\207" [V0 nil run-hooks evil-after-global-hook] 5] #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] evil-start-undo-step #[0 "\300 \207" [evil-end-undo-step] 1] eval evil-set-marker 91 93 marker-position evil-ex-search-vim-style-regexp isearch-string evil-undo-list-pointer buffer-undo-list evil-undo-system evil-in-single-undo evil--ex-global-active-p] 18 (#$ . 250676) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2059\320\2068\321!C#\f\322\323 \203N\324\325!\210\202\\\313\326\"\203\\\n\203\\\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-global plist-member :motion undefined plist-get :type nil append evil-operator-range evil-ex-parse-global "" t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument evil-ex-bang deactivate-mark] 6)])#@105 The Ex vglobal command. [BEG,END]vglobal/PATTERN/COMMAND (fn BEG END &optional PATTERN COMMAND INVERT) (evil-set-command-properties 'evil-ex-global :move-point nil :motion 'mark-whole-buffer :ex-bang t :keep-visual t :suppress-operator t) (defalias 'evil-ex-global-inverted #[1282 "\302\216\303 \211\304\223\210 \203\305\306!\204%\307?%\210\310\311\206-d\"\210\310\312\2067d\313!\206>dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-ex-global evil-set-marker 91 93 marker-position] 13 (#$ . 253323) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2059\320\2068\321!C#\f\322\323 \203N\324\325!\210\202\\\313\326\"\203\\\n\203\\\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-global-inverted plist-member :motion undefined plist-get :type nil append evil-operator-range evil-ex-parse-global "" t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument evil-ex-bang deactivate-mark] 6)])#@219 The Ex normal command. Execute the argument as normal command on each line in the range. The given argument is passed straight to `execute-kbd-macro'. The default is the current line. (fn BEG END &optional COMMANDS)#@11 (fn CH) (evil-set-command-properties 'evil-ex-global-inverted :move-point nil :motion 'mark-whole-buffer :ex-bang t :keep-visual t :suppress-operator t) (defalias 'evil-ex-normal #[770 "\306\216\307 \211\310\223\210 \203\311\312!\204\217\313\314\315\"!\262\310\211\211\211b\210\316 \210`W\203B\317 B\262\310y\320U\203Bn\204+\237\321 \210\322 \210\310\211\323=\203]\310\211\324\325\"\216\326 \210\327\216\323 \211\203\213\211@\211b\210\3301}\331!0\210\322 \210\211\310\211\223\266A\202k.\266\332\333\206\227d\"\210\332\334\206\241d\335!\206\250dS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator current-prefix-arg prefix-arg evil-called-from-ex-p evil-undo-list-pointer #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any vconcat mapcar #[257 "\211\300=\203\301\207\207" [27 escape] 3 (#$ . 254940)] beginning-of-line point-marker 0 deactivate-mark evil-force-normal-state t make-closure #[0 " \242\203 \303 B\300\304=\203 \304\211\207\303\211\207" [V0 buffer-undo-list evil-temporary-undo nil t] 2] evil-start-undo-step #[0 "\300 \207" [evil-end-undo-step] 1] (error) execute-kbd-macro evil-set-marker 91 93 marker-position buffer-undo-list evil-undo-system evil-in-single-undo] 13 (#$ . 254717) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053C\"\f\320\321 \203F\322\323!\210\202T\313\324\"\203T\n\203T\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-normal plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument deactivate-mark] 6)])#@105 Go to POSITION in the buffer. Default position is the beginning of the buffer. (fn &optional POSITION) (byte-code "\300\301\302\303\304\305\306\303\307\303\310\303& \210\311\312\313\"\207" [evil-set-command-properties evil-ex-normal :move-point t :motion evil-line :ex-arg :keep-visual :suppress-operator eval-after-load eldoc #[0 "\300\301!\205 \301\302!\207" [fboundp eldoc-add-command evil-goto-char] 2]] 12) (defalias 'evil-goto-char #[256 "\211\206eb\207" [] 2 (#$ . 256941) (byte-code "\203\n\303!\202 \203\304 !\202\n\203\305\202\306C\207" [current-prefix-arg evil-ex-argument evil-called-from-ex-p prefix-numeric-value string-to-number nil 1] 2)])#@43 Print the last line number. (fn BEG END) (evil-set-command-properties 'evil-goto-char :repeat 'motion :jump t :keep-visual t) (defalias 'evil-ex-line-number #[514 "\302\216\303 \211\304\223\210 \203\305\306!\204\307\310\311e\"\"\210\312\313\206&d\"\210\312\314\206/d\315!\2066dS]\"\210\211\304\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any evil-echo "%d" count-lines evil-set-marker 91 93 marker-position] 9 (#$ . 257619) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316 \f\317\320 \203<\321\322!\210\202J\313\323\"\203J\n\203J\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-line-number plist-member :motion undefined plist-get :type nil evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col deactivate-mark] 6)])#@30 Show basic file information. (evil-set-command-properties 'evil-ex-line-number :move-point nil :motion 'mark-whole-buffer :keep-visual t :suppress-operator t) (defalias 'evil-show-file-info #[0 "\300ed\"\301`!\302V\203\303\304\305!\305!\245\306_\"\202\307\310\311 !\211\205(\312!\2034\211\2044\313\2025\314\203C\315\316%\207\315\317#\207" [count-lines line-number-at-pos 0 format "%d%%" float 100.0 "No lines in buffer" buffer-file-name buffer-base-buffer file-writable-p "[readonly] " "" evil-echo "\"%s\" %d %slines --%s--" "%d lines --%s--"] 12 (#$ . 258782) nil])#@675 The Ex sort command. [BEG,END]sort[!] [/PATTERN/] [b][i][u][r][n][x][o] The following additional options are supported: * i ignore case * u remove duplicate lines * r sort the contents of pattern * n sort by the first decimal number * x sort by the first hexadecimal number (with optional "0x" prefix) * o sort by the first octal number * b sort by the first binary number If a pattern is supplied without supplying the "r" option, sort the contents of the lines after skipping the pattern. If the pattern is empty, the last search pattern is used instead. The "!" argument means to sort in reverse order. (fn BEG END &optional ARGS REVERSE) (evil-set-command-properties 'evil-show-file-info) (defalias 'evil-ex-sort #[1026 "\306\216\307 \211\310\223\210 \203\311\312!\204`\204\313\262\314\310\211\211\211C\310C\310C\nG\315U\204=\n\315H\316>\203D\n\262\202e\317 \320\"\262 \211 @\313\230\203Z\321\f!\202] @\240\210\nA@\262\322\310T\262GW\203\270H\262\211\323\267\202\260\314\202g\320\240\210\202g\324\240\210\202g\325\240\210\202g\326\240\210\202g\314\240\210\202g\314\262\202g\202g\327\330\"\210\202g\266\214edB B\f\206\307e\f\206\315d}\210\fb\210\242\204\334\310\202\242\320U\203\347\331\202\242\324U\203\362\332\202\242\325U\203\375\333\202\242\326U\205\334\310C\335\f\336\337\340\341\n\f&\340\342\"%\266\203Zeb\210\n\310*m\204W\211\203O\343\310`S\310`\344 &\315=\203O`\345\320!|\210\202.\210`\310y\210\202.)\266,\266b\210\346\347\206hd\"\210\346\350\206rd\351!\206ydS]\"\210\211\310\211\223*\207" [evil-inhibit-operator-value evil-inhibit-operator sort-fold-case inhibit-field-text-motion evil-ex-search-pattern evil-restriction-stack #[0 "\301\211\207" [evil-inhibit-operator-value nil] 2] make-marker nil called-interactively-p any "" t 0 (105 110 120 111 98 117 114) evil-delimited-arguments 2 evil-ex-pattern-regex -1 #s(hash-table test eq purecopy t data (105 127 98 132 111 139 110 146 120 153 114 160 117 167 32 173)) 8 10 16 user-error "Invalid sort option `%c'" "[01]+" "[0-7]+" "-?[0-9]+" "\\(-\\)?\\(?:0x\\)?\\([0-9a-f]+\\)" sort-subr forward-line end-of-line make-closure #[0 "\300\306 \240\210\302\242G\307V\203$\310\302\242\300\242\311#\203$\303\242\203$\300`\240\210\307\224b\210\304\242\205[\312\310\301\300\242\312#\2049\202Z\313\304\242\314U\203E\315\202F\307\224\307\225{\304\242\"\304\242\314U\203Z\316\224\203Z[)\207" [V0 V1 V2 V3 V4 case-fold-search line-end-position 0 re-search-forward move t string-to-number 16 2 1 most-negative-fixnum] 4] #[0 "\300\242b\207" [V0] 1] compare-buffer-substrings line-end-position line-beginning-position evil-set-marker 91 93 marker-position case-fold-search] 26 (#$ . 259381) (byte-code "\306\307!\310\311\"\211\205\211A@\206\312\262\313\314\"\315\211\315\211i\316\317 \2053D\"\f\320\321 \203H\322\323!\210\202V\313\324\"\203V\n\203V\nb\210-\207" [evil-operator-range-motion evil-operator-range-type evil-operator-range-beginning evil-operator-range-end evil-inhibit-operator evil-inhibit-operator-value evil-command-properties evil-ex-sort plist-member :motion undefined plist-get :type nil append evil-operator-range t evil-visual-state-p evil-visual-rotate upper-left :move-point this-command evil-this-operator evil-operator-start-col evil-called-from-ex-p evil-ex-argument evil-ex-bang deactivate-mark] 6)]) (evil-set-command-properties 'evil-ex-sort :move-point nil :motion 'mark-whole-buffer :ex-arg t :ex-bang t :keep-visual t :suppress-operator t) (defvar evil--window-digit nil) (defalias 'evil--window-keep-pred #[0 "\301=\207" [this-command evil-window-digit-argument] 2]) (defalias 'evil--window-reset-digit #[0 "\301\302\303\304\"\207" [evil--window-digit nil remove-hook post-command-hook evil--window-reset-digit] 3]) (defalias 'evil--window-on-exit #[0 "\300\301\302\"\207" [add-hook post-command-hook evil--window-reset-digit] 3])#@53 Like `digit-argument' but maintains the window map. (defalias 'evil-window-digit-argument #[0 "\304=\204\f\305 \306\307#\210\n\250\203\n\202\n\310N\311\312\"\313Z \206#\314\315_\\\211\207" [last-command evil-window-map last-command-event evil--window-digit evil-window-digit-argument set-transient-map evil--window-keep-pred evil--window-on-exit ascii-character logand 127 48 0 10] 4 (#$ . 263399) nil])#@76 Toggle side windows, evaluate BODY, restore side windows. (fn &rest BODY) (defalias 'evil-save-side-windows '(macro . #[128 "\300\301!\302\303BC\304\305\306BB\307\310B\305\311BBE\257\207" [make-symbol "sidesvar" let ((and (fboundp 'window-toggle-side-windows) (window-with-parameter 'window-side))) (declare-function window-toggle-side-windows "window") when ((window-toggle-side-windows)) unwind-protect progn ((window-toggle-side-windows))] 11 (#$ . 263818)]))#@185 Set the current window's width or height to NEW-SIZE. If HORIZONTAL is non-nil the width of the window is changed, otherwise its height is changed. (fn NEW-SIZE &optional HORIZONTAL) (byte-code "\300\301\302\303#\304\301\305\306#\207" [function-put evil-save-side-windows lisp-indent-function defun put edebug-form-spec (&rest form)] 5) (defalias 'evil-resize-window #[513 "\203\n\300 \202\f\301 Z\302\"\207" [window-width window-height enlarge-window] 6 (#$ . 264295)])#@666 Move the `selected-window' to SIDE. The state of the `selected-window' is saved along with the state of the window tree consisting of all the other windows. Then, all windows are deleted, the remaining window is split according to SIDE, the state of the window at SIDE is replaced with the saved state of the `selected-window', and, finally, the state of the saved window tree is reconstructed on the opposite side. SIDE has the same meaning as in `split-window'. Note, this function only operates on the window tree rooted in the frame's main window and effectively preserves any side windows (i.e. windows with a valid window-side window parameter). (fn SIDE) (defalias 'evil-move-window #[257 "\300\301!\205 \302\303!\211\203\301 \210\304\305\"\216\306 ?\205B\212\307\310 !\311 \210\307 \312 \210\310 \313\314\211#\315\"\210\315\"\210\316!)\266\317 )\207" [fboundp window-toggle-side-windows window-with-parameter window-side make-closure #[0 "\300\205\301 \207" [V0 window-toggle-side-windows] 1] one-window-p window-state-get selected-window delete-window delete-other-windows split-window nil window-state-put select-window balance-windows] 9 (#$ . 264779)])#@142 Return the last buffer WINDOW has displayed other than the current one. This is equivalent to Vim's alternate buffer. (fn &optional WINDOW) (defalias 'evil-alternate-buffer #[256 "\300 \211@\211@\301!=\203A@\207\207" [window-prev-buffers window-buffer] 6 (#$ . 265968)])#@55 Switch to the last open buffer of the current window. (defalias 'evil-switch-to-windows-last-buffer #[0 "\300 \211\205\n\301@!\207" [evil-alternate-buffer switch-to-buffer] 3 (#$ . 266249) nil])#@149 Delete the current window or tab. If `evil-auto-balance-windows' is non-nil then all children of the deleted window's parent window are rebalanced. (evil-set-command-properties 'evil-switch-to-windows-last-buffer :repeat nil) (defalias 'evil-window-delete #[0 "\302 \303\300!\203\203\211\204\304 \207\305 \210 \205%\3061#\307!0\207\210\310\207" [tab-bar-mode evil-auto-balance-windows window-parent boundp tab-close delete-window (error) balance-windows nil] 3 (#$ . 266452) nil])#@330 Split the current window horizontally, COUNT lines height, editing a certain FILE. The new window will be created below when `evil-split-window-below' is non-nil. If COUNT and `evil-auto-balance-windows' are both non-nil then all children of the parent of the splitted window are rebalanced. (fn &optional COUNT FILE READ-ONLY) (evil-set-command-properties 'evil-window-delete) (defalias 'evil-window-split #[768 "\302\303\304 \205\n[\203\305\202\306#!\210\204# \203#\307\310 !\210\2052\211\203/\311\2020\312!\207" [evil-split-window-below evil-auto-balance-windows select-window split-window selected-window below above balance-windows window-parent evil-view evil-edit] 8 (#$ . 266949) (byte-code "\303\304! \203 _\262\202\205\211\262C\n\205\305 C\"\207" [current-prefix-arg evil--window-digit evil-called-from-ex-p append prefix-numeric-value evil-ex-file-arg] 4)])#@90 As with `evil-window-split' but the file is opened read-only. (fn &optional COUNT FILE) (evil-set-command-properties 'evil-window-split :repeat nil :ex-arg 'file) (defalias 'evil-window-split-view #[512 "\300\301#\207" [evil-window-split t] 6 (#$ . 267853) (byte-code "\205\302! \205 \303 D\207" [current-prefix-arg evil-called-from-ex-p prefix-numeric-value evil-ex-file-arg] 2)])#@326 Split the current window vertically, COUNT columns width, editing a certain FILE. The new window will be created to the right when `evil-vsplit-window-right' is non-nil. If COUNT and `evil-auto-balance-windows'are both non-nil then all children of the parent of the splitted window are rebalanced. (fn &optional COUNT FILE) (evil-set-command-properties 'evil-window-split-view :repeat nil :ex-arg 'file) (defalias 'evil-window-vsplit #[512 "\302\303\304 \205\n[\203\305\202\306#!\210\204# \203#\307\310 !\210\211\205*\311!\207" [evil-vsplit-window-right evil-auto-balance-windows select-window split-window selected-window right left balance-windows window-parent evil-edit] 7 (#$ . 268249) (byte-code "\303\304! \203 _\262\202\205\211\262C\n\205\305 C\"\207" [current-prefix-arg evil--window-digit evil-called-from-ex-p append prefix-numeric-value evil-ex-file-arg] 4)])#@57 Split window and switch to another buffer. (fn BUFFER) (evil-set-command-properties 'evil-window-vsplit :repeat nil :ex-arg 'file) (defalias 'evil-split-buffer #[257 "\300 \210\301!\207" [evil-window-split evil-buffer] 3 (#$ . 269153) (list evil-ex-argument)])#@95 Split the window and go to the COUNT-th next buffer in the buffer list. (fn &optional COUNT) (evil-set-command-properties 'evil-split-buffer :repeat nil :ex-arg 'buffer) (defalias 'evil-split-next-buffer #[256 "\300 \210\301!\207" [evil-window-split next-buffer] 3 (#$ . 269421) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@91 Split window and go to the COUNT-th prev buffer in the buffer list. (fn &optional COUNT) (evil-set-command-properties 'evil-split-next-buffer :repeat nil) (defalias 'evil-split-prev-buffer #[256 "\300 \210\301!\207" [evil-window-split previous-buffer] 3 (#$ . 269779) (byte-code "\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@77 Move the cursor to new COUNT-th window left of the current one. (fn COUNT) (evil-set-command-properties 'evil-split-prev-buffer :repeat nil) (defalias 'evil-window-left #[257 "\300\211W\205\301\302 \266T\202\207" [0 nil windmove-left] 4 (#$ . 270126) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@78 Move the cursor to new COUNT-th window right of the current one. (fn COUNT) (evil-set-command-properties 'evil-window-left :repeat nil) (defalias 'evil-window-right #[257 "\300\211W\205\301\302 \266T\202\207" [0 nil windmove-right] 4 (#$ . 270496) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@75 Move the cursor to new COUNT-th window above the current one. (fn COUNT) (evil-set-command-properties 'evil-window-right :repeat nil) (defalias 'evil-window-up #[257 "\211\206\300\301\211W\205\302\303 \266T\202\207" [1 0 nil windmove-up] 5 (#$ . 270863) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@75 Move the cursor to new COUNT-th window below the current one. (fn COUNT) (evil-set-command-properties 'evil-window-up :repeat nil) (defalias 'evil-window-down #[257 "\211\206\300\301\211W\205\302\303 \266T\202\207" [1 0 nil windmove-down] 5 (#$ . 271238) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@41 Move the cursor to bottom-right window. (evil-set-command-properties 'evil-window-down :repeat nil) (defalias 'evil-window-bottom-right #[0 "\300 \211\203\301!\204\302!\262\202\211\205\303!\207" [frame-root-window window-live-p window-last-child select-window] 3 (#$ . 271614) nil])#@37 Move the cursor to top-left window. (evil-set-command-properties 'evil-window-bottom-right :repeat nil) (defalias 'evil-window-top-left #[0 "\300\301 !\211\203\302!\204\300!\262\202\211\205\303!\207" [window-child frame-root-window window-live-p select-window] 3 (#$ . 271914) nil])#@240 Move the cursor to the previous (last accessed) buffer in another window. More precisely, it selects the most recently used buffer that is shown in some other window, preferably of the current frame, and is different from the current one. (evil-set-command-properties 'evil-window-top-left :repeat nil) (defalias 'evil-window-mru #[0 "\30024\301\302 !\211\2051\211@\303!p=\204+\211\203+\211\304 =\204+\305!\210\306\300\307\"\210\266A\202\2620\207" [done buffer-list selected-frame get-buffer-window selected-window select-window throw nil] 6 (#$ . 272215) nil])#@143 Move the cursor to the next window in the cyclic order. With COUNT go to the count-th window in the order starting from top-left. (fn COUNT) (evil-set-command-properties 'evil-window-mru :repeat nil) (defalias 'evil-window-next #[257 "\211\204\300\301!\207\302 \210\300\303 G^S!\207" [other-window 1 evil-window-top-left window-list] 4 (#$ . 272795) (byte-code "\302! \203 _\202\205\211C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@147 Move the cursor to the previous window in the cyclic order. With COUNT go to the count-th window in the order starting from top-left. (fn COUNT) (evil-set-command-properties 'evil-window-next :repeat nil) (defalias 'evil-window-prev #[257 "\211\204\300\301!\207\302 \210\300\303 G^S!\207" [other-window -1 evil-window-top-left window-list] 4 (#$ . 273273) (byte-code "\302! \203 _\202\205\211C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@102 Split the current window horizontally and open a new buffer or edit a certain FILE. (fn COUNT FILE) (evil-set-command-properties 'evil-window-prev :repeat nil) (defalias 'evil-window-new #[514 "\302\303 \205 [\203\304\202\305#\204 \203 \306\307 !\210\310!\210\311!\207" [evil-split-window-below evil-auto-balance-windows split-window selected-window below above balance-windows window-parent select-window evil-buffer-new] 6 (#$ . 273757) (byte-code "\303\304! \203 _\262\202\205\211\262C\n\205\305 C\"\207" [current-prefix-arg evil--window-digit evil-called-from-ex-p append prefix-numeric-value evil-ex-file-arg] 4)])#@105 Split the current window vertically and open a new buffer name or edit a certain FILE. (fn COUNT FILE) (evil-set-command-properties 'evil-window-new :repeat nil :ex-arg 'file) (defalias 'evil-window-vnew #[514 "\302\303 \205 [\203\304\202\305#\204 \203 \306\307 !\210\310!\210\311!\207" [evil-vsplit-window-right evil-auto-balance-windows split-window selected-window right left balance-windows window-parent select-window evil-buffer-new] 6 (#$ . 274411) (byte-code "\303\304! \203 _\262\202\205\211\262C\n\205\305 C\"\207" [current-prefix-arg evil--window-digit evil-called-from-ex-p append prefix-numeric-value evil-ex-file-arg] 4)])#@57 Edit a new unnamed buffer or FILE. (fn &optional FILE) (evil-set-command-properties 'evil-window-vnew :repeat nil :ex-arg 'file) (defalias 'evil-buffer-new #[256 "\211\203\300!\207\301\302!\303!\210\304\305\"\207" [evil-edit generate-new-buffer "*new*" set-buffer-major-mode set-window-buffer nil] 5 (#$ . 275081) (byte-code "\205\301 C\207" [evil-called-from-ex-p evil-ex-file-arg] 1)])#@54 Increase current window height by COUNT. (fn COUNT) (evil-set-command-properties 'evil-buffer-new :repeat nil :ex-arg 'file) (defalias 'evil-window-increase-height #[257 "\300!\207" [enlarge-window] 3 (#$ . 275483) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@54 Decrease current window height by COUNT. (fn COUNT) (evil-set-command-properties 'evil-window-increase-height :repeat nil) (defalias 'evil-window-decrease-height #[257 "\300[!\207" [enlarge-window] 3 (#$ . 275812) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@53 Increase current window width by COUNT. (fn COUNT) (evil-set-command-properties 'evil-window-decrease-height :repeat nil) (defalias 'evil-window-increase-width #[257 "\300\301\"\207" [enlarge-window t] 4 (#$ . 276140) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@53 Decrease current window width by COUNT. (fn COUNT) (evil-set-command-properties 'evil-window-increase-width :repeat nil) (defalias 'evil-window-decrease-width #[257 "\300[\301\"\207" [enlarge-window t] 4 (#$ . 276472) (byte-code "\302! \203\f _C\207C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@60 Set the height of the current window to COUNT. (fn COUNT) (evil-set-command-properties 'evil-window-decrease-width :repeat nil) (defalias 'evil-window-set-height #[257 "\300\206\301 \302\"\207" [evil-resize-window frame-height nil] 4 (#$ . 276804) (byte-code "\302! \203 _\202\205\211C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@59 Set the width of the current window to COUNT. (fn COUNT) (evil-set-command-properties 'evil-window-set-height :repeat nil) (defalias 'evil-window-set-width #[257 "\300\206\301 \302\"\207" [evil-resize-window frame-width t] 4 (#$ . 277179) (byte-code "\302! \203 _\202\205\211C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@342 The ex :resize command. If ARG is a signed positive integer, increase the current window height by ARG. If ARG is a signed negative integer, decrease the current window height by ARG. If ARG is a positive integer without explicit sign, set the current window height to ARG. If ARG is empty, maximize the current window height. (fn ARG) (evil-set-command-properties 'evil-window-set-width :repeat nil) (defalias 'evil-ex-resize #[257 "\211\203 \211G\300U\203\301\302!\207\303!\211\300V\203(\300H\304U\203$\305!\207\301!\207\306[!\207" [0 evil-window-set-height nil string-to-number 43 evil-window-increase-height evil-window-decrease-height] 4 (#$ . 277546) (byte-code "\205 C\207" [evil-called-from-ex-p evil-ex-argument] 1)])#@62 Rotate the windows according to the current cyclic ordering. (evil-set-command-properties 'evil-ex-resize :ex-arg t) (defalias 'evil-window-rotate-upwards #[0 "\300\301!\205 \302\303!\211\203\301 \210\304\305\"\216\306 \307\310\306 \"\311A@C\"\262\203<\211\203<\312@@\"\210A\262A\202%\313\306 @!)\207" [fboundp window-toggle-side-windows window-with-parameter window-side make-closure #[0 "\300\205\301 \207" [V0 window-toggle-side-windows] 1] window-list mapcar window-state-get append window-state-put select-window] 6 (#$ . 278296) nil]) (evil-set-command-properties 'evil-window-rotate-upwards :repeat nil) (defalias 'evil-window-rotate-downwards #[0 "\300\301!\205 \302\303!\211\203\301 \210\304\305\"\216\306 \307\310\306 \"\311\312!\"\262\203;\211\203;\313@@\"\210A\262A\202$\314\306 @!)\207" [fboundp window-toggle-side-windows window-with-parameter window-side make-closure #[0 "\300\205\301 \207" [V0 window-toggle-side-windows] 1] window-list mapcar window-state-get append last window-state-put select-window] 6 (#$ . 278296) nil])#@88 Exchange the current window with the next, or the COUNT-th, one. (fn &optional COUNT) (evil-set-command-properties 'evil-window-rotate-downwards :repeat nil) (defalias 'evil-window-exchange #[256 "\300 \301!\210\302\303!\203\303\304\305#\207\300 \306!\306!\307\305#\210\307\305#\207" [selected-window evil-window-next fboundp window-swap-states nil t window-state-get window-state-put] 9 (#$ . 279379) (byte-code "\302! \203 _\202\205\211C\207" [current-prefix-arg evil--window-digit prefix-numeric-value] 3)])#@105 Close the current window, split the upper-left one horizontally and redisplay the current buffer there. (evil-set-command-properties 'evil-window-exchange :repeat nil) (defalias 'evil-window-move-very-top #[0 "\300\301!\207" [evil-move-window above] 2 (#$ . 279916) nil])#@103 Close the current window, split the upper-left one vertically and redisplay the current buffer there. (evil-set-command-properties 'evil-window-move-very-top :repeat nil) (defalias 'evil-window-move-far-left #[0 "\300\301!\207" [evil-move-window left] 2 (#$ . 280194) nil])#@104 Close the current window, split the lower-right one vertically and redisplay the current buffer there. (evil-set-command-properties 'evil-window-move-far-left :repeat nil) (defalias 'evil-window-move-far-right #[0 "\300\301!\207" [evil-move-window right] 2 (#$ . 280474) nil])#@106 Close the current window, split the lower-right one horizontally and redisplay the current buffer there. (evil-set-command-properties 'evil-window-move-far-right :repeat nil) (defalias 'evil-window-move-very-bottom #[0 "\300\301!\207" [evil-move-window below] 2 (#$ . 280757) nil])#@109 Switch to the next tab. If ARG is non-nil, parse ARG as an index and go to the tab at that index. (fn ARG) (evil-set-command-properties 'evil-window-move-very-bottom :repeat nil) (defalias 'evil-tab-next #[257 "\211\203\300!\207\301 \207" [tab-bar-select-tab tab-bar-switch-to-next-tab] 3 (#$ . 281045) (byte-code "\205\301!C\207" [current-prefix-arg prefix-numeric-value] 2)])#@298 Set the region to the text that the mouse is dragged over. Highlight the drag area as you move the mouse. This must be bound to a button-down mouse event. If the click is in the echo area, display the `*Messages*' buffer. START-EVENT should be the event that started the drag. (fn START-EVENT) (evil-set-command-properties 'evil-tab-next :repeat nil) (defalias 'evil-mouse-drag-region #[257 "\300\301!\210\302\303\"\207" [run-hooks mouse-leave-buffer-hook evil-mouse-drag-track t] 4 (#$ . 281437) "e"])#@254 Track mouse drags by highlighting area between point and cursor. The region will be defined with mark and point. DO-MOUSE-DRAG-REGION-POST-PROCESS should only be used by `mouse-drag-region'. (fn START-EVENT &optional DO-MOUSE-DRAG-REGION-POST-PROCESS) (byte-code "\300\301\302\303#\210\304\301\305\303#\207" [evil-set-command-property evil-mouse-drag-region :keep-visual t put ignored-mouse-command] 4) (defalias 'evil-mouse-drag-track #[513 "\306!\210p\307 \210\310\311 \312!\210\313\310\314!\315!C@\316!\317!\320!\313\211A@\321!\2045\f\204;\3228\202?\3228S \205S9\204O\n=\205S\323!\f\211:\203i\3248\250\203i\3248\262\202k\210\325SC\205{ \326=\205{\211\242\325U:\313\211:C\313C\313C\242;`\242W\203\227 \242b\210 `\240\210\203\244\310\240\210\327\242\330\"\240\210\331\242\242\242#\332@!\210\211A@b\266\242\310U\203\325\333 \203\334 \210\202\242\325U\203\345\335 \210\336 \210\202\242\324U\203\365\337 \210\336 \210\202\242\322U\203\340 \210\336 \210\341\342\343 \f&\n!\210\344<\242:\2054\211\315\345\242!!\240\203Q\242@ =\203Q\346\242!\203Q \242\242U\204Q\347\242\242\242#\210\350\351\242@!!\242\211:\203n\3248\250\203n\3248\262\202p\210\325\310V\205\352!\205\211\353>?\354 `U\203\225\242\325U\204\225\355 \356>\203\276\211\204\276\313\211=>?\205\270\205\270\313\357 \210\360\354 `\"\210\361 )*\266\202\2024\211\203\312\242b\210\202\315\307 \210\352!\2052\f\317!U\2052\242\204\354\316!U\2052\203*\242`U\203*\362\242\"\203*\363 !\204;\203 \310H\240\210\202*\364!\210\242\365\240\210\366\365\367\370#\210\242@B\211@\266\202,\207" [mouse-selection-click-count-buffer scroll-margin echo-keystrokes make-cursor-line-fully-visible mode-line-format mouse-1-click-follows-link mouse-minibuffer-check deactivate-mark 0 selected-window mouse-set-point nil event-start posn-point window-start window-hscroll window-edges window-minibuffer-p 3 mouse-on-link-p 2 1 double mod 4 evil-mouse-start-end set-mark evil-visual-state-p evil-exit-visual-state evil-visual-char evil-visual-post-command evil-visual-line evil-visual-block internal--track-mouse make-closure #[0 "\302\311 \240\210\302\242\211\242\312=\262\204\302\242\242\313>\205\275\314 \204N\304\242\315U\203*\316 \210\202N\304\242\317U\2037\316 \210\202N\304\242\320U\203D\321 \210\202N\304\242\322U\203N\323 \210\324 \210\302\242\242\325>\204\267\303\326 )\210\301\327\302\242!\240\210\300\330\301\242!\240\210\301\242@\307=\203\211\331\300\242!\203\211\332\310\242\300\242\304\242#\210\202\267\333 AA\211\203\266\211\306W\203\245\334\307\306Z\335\310\242$\266\202\267\211\305Y\203\266\334\307\305ZT\335\310\242$\210\210\336 \210\202\207" [V0 V1 V2 V3 V4 V5 V6 V7 V8 read-key mouse-movement (switch-frame select-window) evil-visual-state-p 0 evil-visual-char 1 2 evil-visual-line 3 evil-visual-block evil-visual-pre-command (switch-frame select-window) redisplay event-end posn-point integer-or-marker-p evil-mouse--drag-set-mark-and-point mouse-position mouse-scroll-subr nil evil-visual-post-command auto-hscroll-mode] 6] t event-end integer-or-marker-p evil-mouse--drag-set-mark-and-point key-binding vector functionp (mouse-set-point mouse-set-region) mark evil-visual-type (line block) evil-visual-expand-region copy-region-as-kill evil-visual-contract-region evil-mouse--remap-link-click-p vectorp select-window mouse-2 put event-kind mouse-click mouse-1-click-in-non-selected-windows auto-hscroll-mode mouse-selection-click-count evil--region-from-mouse this-command last-command mouse-drag-copy-region unread-command-events] 32 (#$ . 281950)])#@32 (fn START CLICK CLICK-COUNT) (defalias 'evil-mouse--drag-set-mark-and-point #[771 "\300#\211@A@\301 =\203\211b\207\301 =\203b\207\301 W\203,\302!\210b\207\302!\210\211b\207" [evil-mouse-start-end mark set-mark] 8 (#$ . 285664)])#@30 (fn START-EVENT END-EVENT) (defalias 'evil-mouse--remap-link-click-p #[514 "\301=\203\"\211:\203\3028\250\203\3028\262\202\210\303\302U\206\224\301=?\205\224\211:\203>\3028\250\203>\3028\262\202@\210\303\303U\205\224\211\211:\203Z\3028\250\203Z\3028\262\202\\\210\303\303U\205\224\250?\206\224\304!\3058\262\306!\3058\262\250\205\222\211\250\205\222\307V\203\215\211ZX\207ZW\266\202\207" [mouse-1-click-follows-link double 2 1 event-start 3 event-end 0] 6 (#$ . 285916)])#@278 Return a list of region bounds based on START and END according to MODE. If MODE is not 1 then set point to (min START END), mark to (max START END). If MODE is 1 then set point to start of word at (min START END), mark to end of word at (max START END). (fn START END MODE) (defalias 'evil-mouse-start-end #[771 "V\203\f\262\262\301\302\"\262\211\303U\204D\207\212dT^b\210\304\305\"\306U\203=`\304\303\"\210`V\204>\210`\202>e)\212b\210\304\303\"\306U\203]`\304\305\"\210`X\204^\210`\202^dS)D\207" [evil-mouse-word mod 4 1 forward-thing -1 0] 8 (#$ . 286444)])#@149 Exit Emacs state. Changes the state to the previous state, or to Normal state if the previous state was Emacs state. (fn &optional BUFFER MESSAGE) (defalias 'evil-exit-emacs-state #[512 "r\206pq\210\300 \205\301\"\210\300 \205\302\205\303!)\207" [evil-emacs-state-p evil-change-to-previous-state evil-normal-state 1] 5 (#$ . 287040) '(nil t)])#@130 No insert-state repeat info is recorded after executing in normal state. Restore the disabled repeat hooks on insert-state exit. (evil-set-command-properties 'evil-exit-emacs-state :keep-visual t :suppress-operator t) (defalias 'evil--restore-repeat-hooks #[0 "\300 \210\301\302\303\"\210\301\304\305\"\210\306\307\310\"\207" [evil-repeat-stop add-hook pre-command-hook evil-repeat-pre-hook post-command-hook evil-repeat-post-hook remove-hook evil-insert-state-exit-hook evil--restore-repeat-hooks] 3 (#$ . 287403)])#@57 The state to return to after executing in normal state. (defvar evil--execute-normal-return-state nil (#$ . 287925))#@72 Point position if it was at EOL before `evil-execute-in-normal-state'. (defvar evil--execute-normal-eol-pos nil (#$ . 288047))#@43 Execute the next command in Normal state.#@21 (fn NAME &rest _) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil--execute-normal-eol-pos put permanent-local t] 4) (defalias 'evil-execute-in-normal-state #[0 "p\306\307!\310\311\312#\"\211 \204M\210\313\314\315\211$\210\266\315l\205*\316 \317 \315\320 )\210\321\322!\207" [evil-state evil-insert-count evil--execute-normal-return-state evil--execute-normal-eol-pos evil-execute-normal-keys evil-move-cursor-back make-symbol "evil-delay-in-'post-command-hook" apply-partially make-closure #[385 "\n\306>?\205k\307\310\311#\210r\301q\210 \203'`T\212 b\210 \311\211\223\210\312 )U\2048\f\206, =\203E\n\313>\203El\204E\n\314>\204E\311u\210\315>\204P\316\300!\210\317=\203f\307\320\321\"\210\307\310\322\"\210\323\324\325\"\210\311)\326\207" [V0 V1 this-command evil--execute-normal-eol-pos goal-column temporary-goal-column (nil evil-execute-in-normal-state evil-replace-state evil-use-register evil-window-digit-argument digit-argument negative-argument universal-argument universal-argument-minus universal-argument-more universal-argument-other-key) remove-hook post-command-hook nil line-end-position (next-line previous-line) (evil-insert evil-beginning-of-line evil-first-non-blank) (replace insert) evil-change-state insert pre-command-hook evil-repeat-pre-hook evil-repeat-post-hook add-hook evil-insert-state-exit-hook evil--restore-repeat-hooks t most-positive-fixnum evil-state evil-execute-normal-keys] 6 (#$ . 288226)] add-hook post-command-hook nil point-marker this-command-keys evil-normal-state evil-echo "Switched to Normal state for the next command..."] 9 (#$ . 288179) nil]) (defalias 'evil-stop-execute-in-emacs-state #[0 "\303=?\2057\304 ?\2057\305\306\307\"\210\310 !\2034r q\210\n\311=\2030\312 \2040\313 \210\314 \210\2023\313 \210)\315\211\207" [this-command evil-execute-in-emacs-state-buffer evil-previous-state evil-execute-in-emacs-state minibufferp remove-hook post-command-hook evil-stop-execute-in-emacs-state buffer-live-p visual use-region-p evil-change-to-previous-state evil-exit-visual-state nil] 3])#@42 Execute the next command in Emacs state. (defalias 'evil-execute-in-emacs-state #[0 "\301\302\303\304#\210p\305 \203\306 `\307 \210\310!\210\211b\266\202!\307 \210\311\312!\207" [evil-execute-in-emacs-state-buffer add-hook post-command-hook evil-stop-execute-in-emacs-state t evil-visual-state-p mark evil-emacs-state set-mark evil-echo "Switched to Emacs state for the next command ..."] 4 (#$ . 290349) nil])#@482 Exit insert state and repeat event. This special command should be used if some command called from visual state should actually be called in normal-state. The main reason for doing this is that the repeat system should *not* record the visual state information for some command. This command should be bound to exactly the same event in visual state as the original command is bound in normal state. EVENT is the event that triggered the execution of this command. (fn EVENT) (evil-set-command-properties 'evil-execute-in-emacs-state) (defalias 'evil-exit-visual-and-repeat #[257 "\301 \205 \302 \210\211B\211\207" [unread-command-events evil-visual-state-p evil-exit-visual-state] 3 (#$ . 290772) "e"])#@290 Convert all tabs to spaces or the other way around. Replace all sequences of white-space containing a with new strings of white-space using the new TABSTOP value given. If you do not specify a new TABSTOP size or it is zero, Evil uses the current value of `tab-width'. (fn TABSTOP) (evil-declare-ignore-repeat 'evil-exit-visual-and-repeat) (defalias 'evil-retab #[257 "\211\203\302\303\304\305$\266\203\204\306\307\"\210\310 \203!\311 \202\"e\310 \203,\312 \202-d\2035\313\2026\314\315\267\202D \202G \202G\316!\211\")\207" [indent-tabs-mode tab-width "^[0-9]*$" nil string-match t user-error "Invalid argument: %s" use-region-p region-beginning region-end tabify untabify #s(hash-table test equal purecopy t data (nil 60 "0" 64)) string-to-number] 9 (#$ . 291490) (byte-code "\205 C\207" [evil-called-from-ex-p evil-ex-argument] 1)]) (byte-code "\300\301\302\303#\210\304\305!\207" [evil-set-command-properties evil-retab :ex-arg t provide evil-commands] 4)