;ELC ;;; Compiled ;;; in Emacs version 24.5.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@150 Functions to be run when loading of evil is finished. This hook can be used the execute some initialization routines when evil is completely loaded. (defvar evil-after-load-hook nil (#$ . 411)) #@283 A list of pending initializations for custom variables. Each element is a triple (FUNC VAR VALUE). When evil is completely loaded then the functions (funcall FUNC VAR VALUE) is called for each element. FUNC should be a function suitable for the :initialize property of `defcustom'. (defvar evil-pending-custom-initialize nil (#$ . 612)) #@61 Add a pending customization with `custom-initialize-reset'. (defalias 'evil-custom-initialize-pending-reset #[(var value) "\303 E\nB\211\207" [var value evil-pending-custom-initialize custom-initialize-reset] 3 (#$ . 955)]) #@77 Executes the pending initializations. See `evil-pending-custom-initialize'. (defalias 'evil-run-pending-custom-initialize #[nil "\303\211\203\n@\304 @ A\"\210\nA\211\204*\305\306\307\"\207" [evil-pending-custom-initialize init --dolist-tail-- nil apply remove-hook evil-after-load-hook evil-run-pending-custom-initialize] 4 (#$ . 1187)]) (add-hook 'evil-after-load-hook 'evil-run-pending-custom-initialize) #@73 Set `evil-toggle-key' to KEY. KEY must be readable by `read-kbd-macro'. (defalias 'evil-set-toggle-key #[(key) "\306\307\300!\203 \202\f\310!\306 !\311\312\211\205N\f@\307 @!\203F @J \211A@\262 \313 !\203E\314 #\210\314 \n\312#\210*\fA\211\204\312,\207" [evil-toggle-key key old-key pair --dolist-tail-- fun read-kbd-macro boundp "C-z" ((evil-motion-state-map evil-emacs-state) (evil-insert-state-map evil-emacs-state) (evil-emacs-state-map evil-exit-emacs-state)) nil keymapp define-key map] 5 (#$ . 1609)]) #@355 Changes the list of special keymaps. VAR is the variable containing the list of keymaps. PENDING-VAR is the variable containing the list of the currently pending keymaps. KEY the special symbol to be stored in the keymaps. MAKE the creation function of the special keymaps. NEWLIST the list of new special keymaps. (defalias 'evil-set-custom-state-maps #[(var pending-var key make newlist) "\306 \"\210\307\n!\203;\310\n!\311\211\203:\f@\312 @!\2033\313\310 @!!\2033\314\310 @!\315 !\311#\210\fA\211\204*\306\n \"\210\316 \207" [pending-var newlist var map --dolist-tail-- key set-default default-boundp default-value nil boundp keymapp define-key vector evil-update-pending-maps] 5 (#$ . 2147)]) #@107 Tries to set pending special keymaps. This function should be called from an `after-load-functions' hook. (defalias 'evil-update-pending-maps #[(&optional file) "\306\205Y\211A\242\211@ A\211J\307\f\203P\f\211A\242\310 @!\2053\311 @J!\2053 @J A\f \203H\n \f\"\210\202L B+\202\312 \"\210-\202)\207" [maps map make pending-var pending newlist ((evil-make-overriding-map . evil-pending-overriding-maps) (evil-make-intercept-map . evil-pending-intercept-maps)) nil boundp keymapp set-default kmap state] 4 (#$ . 2901)]) #@124 Set the value of `evil-visual-newline-commands'. Setting this variable changes the properties of the appropriate commands. (defalias 'evil-set-visual-newline-commands #[(var value) "\304!\203!\305!\306\211\203 \n@\307 \310\306#\210\nA\211\204*\311 \"\210\305!\306\211\205A\n@\307 \310\312#\210\nA\211\2040\306*\207" [var cmd --dolist-tail-- value default-boundp default-value nil evil-set-command-property :exclude-newline set-default t] 5 (#$ . 3454)]) #@35 Sets the list of motion commands. (defalias 'evil-set-custom-motions #[(var values) "\304!\203#\305!\306\211\203\"\n@\307 \310\306\311\306%\210\nA\211\204*\312 \"\210\313\314\305!\"\207" [var motion --dolist-tail-- values default-boundp default-value nil evil-add-command-properties :keep-visual :repeat set-default mapc evil-declare-motion] 7 (#$ . 3932)]) (byte-code "\300\301\302\303\304\305\306\307&\210\310\311\312\313\314\315\304\301&\210\316\311!\210\310\317\320\321\314\322\304\301&\210\316\317!\210\310\323\312\324\314\315\304\301&\210\316\323!\210\310\325\312\326\314\327\304\301&\210\310\330\312\331\314\315\304\301&\210\310\332\302\333\314\315\304\301&\210\310\334\312\335\314\315\304\301&\210\310\336\312\337\314\315\304\301&\210\310\340\302\341\314\315\304\301&\210\310\342\312\343\314\315\304\301&\210\310\344\302\345\314\346\304\301&\210\310\347\312\350\314\315\304\301&\210\310\351\352\353\314\354\304\301&\210\310\355\356\357\314\360\304\301&\210\310\361\362\363\314\364\304\301&\210\316\361!\210\310\365\366\367\314\370\304\301&\210\310\371\312\372\314\315\304\301&\210\310\373\312\374\314\315\304\301&\210\310\375\376\377\314\201@\304\301&\210\310\201A\201B\201C\314\322\304\301&\210\310\201D\312\201E\314\315\304\301&\210\310\201F\302\201G\314\315\304\301&\210\310\201H\302\201I\314\315\304\301&\210\310\201J\201K\201L\314\201@\304\301&\207" [custom-declare-group evil nil "Extensible vi layer." :group emulations :prefix evil- custom-declare-variable evil-auto-indent t "Whether to auto-indent when entering Insert state." :type boolean make-variable-buffer-local evil-shift-width 4 "The offset used by \\\\[evil-shift-right] and \\[evil-shift-left]." integer evil-shift-round "Whether \\\\[evil-shift-right] and \\[evil-shift-left] round to the nearest multiple of `evil-shift-width'." evil-default-cursor "The default cursor.\nMay be a cursor type as per `cursor-type', a color string as passed\nto `set-cursor-color', a zero-argument function for changing the\ncursor, or a list of the above." (set symbol (cons symbol symbol) string function) evil-repeat-move-cursor "Whether \"\\\\[evil-repeat]\" moves the cursor." evil-cross-lines "Whether motions may cross newlines." evil-backspace-join-lines "Whether backward delete in insert state may join lines." evil-move-cursor-back "Whether the cursor is moved backwards when exiting Insert state." evil-move-beyond-eol "Whether the cursor is allowed to move past the last character of a line." evil-repeat-find-to-skip-next "Whether a repeat of t or T should skip an adjacent character." evil-kbd-macro-suppress-motion-error "Whether left/right motions signal errors during keyboard-macro definition.\nIf this variable is set to non-nil, then the function\n`evil-forward-char' and `evil-backward-char' do not signal\n`end-of-line' or `beginning-of-line' errors when a keyboard macro\nis being defined and/or it is being executed. This may be desired\nbecause such an error would cause the macro definition/execution\nbeing terminated." (radio (const :tag "No" :value nil) (const :tag "Record" :value record) (const :tag "Replay" :value replay) (const :tag "Both" :value t)) evil-track-eol "If non-nil line moves after a call to `evil-end-of-line' stay at eol.\nThis is analogous to `track-eol' but deals with the end-of-line\ninterpretation of evil." evil-mode-line-format 'before "The position of the mode line tag.\nEither a symbol or a cons-cell. If it is a symbol it should be\none of 'before, 'after or 'nil. 'before mean the the tag is\nplaced before the mode-list, 'after means it is placed after the\nmode-list, and 'nil means no mode line tag. If it is a cons cell\nit should have the form (WHERE . WHICH) where WHERE is either\n'before or 'after and WHICH is a symbol in\n`mode-line-format'. The tag is then placed right before or after\nthat symbol." (radio :value 'before (const before) (const after) (cons :tag "Next to symbol" (choice :value after (const before) (const after)) symbol)) evil-mouse-word 'evil-word "The thing-at-point symbol for double click selection.\nThe double-click starts visual state in a special word selection\nmode. This symbol is used to determine the words to be\nselected. Possible values are 'evil-word or\n'evil-WORD." symbol evil-bigword "^ \n" "The characters to be considered as a big word.\nThis should be a regexp set without the enclosing []." string evil-want-fine-undo 'fine "Whether actions like \"cw\" are undone in several steps.\nThere are three possible choices. \"No\" means all chances made\nduring insert state including a possible delete after a change\noperation are collected in a single undo step. If \"Fine\" is\nselected, insertion commands create several undo steps as Emacs\nwould do and the delete after a change operation is merged with\nthe first undo step of the insertion. \"Very fine\" is the same\nbut the delete operation is a separate undo step." (radio (const :tag "No" :value nil) (const :tag "Fine" :value fine) (const :tag "Very fine" :value t)) evil-regexp-search "Whether to use regular expressions for searching." evil-search-wrap "Whether search wraps around." evil-flash-delay 2 "Time in seconds to flash search matches." number evil-fold-level 0 "Default fold level." evil-auto-balance-windows "If non-nil creating/deleting a window causes a rebalance." evil-split-window-below "If non-nil split windows are created below." evil-vsplit-window-right "If non-nil vsplit windows are created to the right." evil-esc-delay 0.01 "Time in seconds to wait for another key after ESC."] 8) #@40 Non-nil if `evil-esc-mode' is enabled. (defvar evil-esc-mode nil (#$ . 9601)) #@73 Original ESC prefix map in `input-decode-map'. Used by `evil-esc-mode'. (defvar evil-esc-map nil (#$ . 9685)) #@63 If non-nil, the \e event will never be translated to 'escape. (defvar evil-inhibit-esc nil (#$ . 9801)) (byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\313\306\307&\210\300\314\315\316\304\317\306\307&\210\300\320\321\322\304\323\306\307&\210\300\324\325\326\304\327\306\307\330\331& \210\300\332\333\334\304\327\306\307\330\335& \210\300\336\325\337\304\327\306\307\330\340& \210\300\341\333\342\304\327\306\307&\210\300\343\325\344\304\327\306\307&\210\300\345\325\346\304\327\306\307&\210\300\347\325\350\304\327\306\307&\210\300\351\352\353\304\354\306\307&\210\300\355\356\357\304\354\306\307&\210\300\360\361\362\304\354\306\307&\210\300\363\364\365\304\354\306\307&\210\300\366\367\370\304\354\306\307&\210\300\371\366\372\304\354\306\307&\210\300\373\374\375\304\354\306\307&\210\300\376\377\201@\304\201A\306\307\330\201B& \210\300\201C\201D\201E\304\201F\306\307&\210\300\201G\201H\201I\304\201J\306\307&\210\300\201K\201L\201M\304\201N\306\307&\210\300\201O\201P\201Q\304\201R\306\307&\210\300\201S\201T\201U\304\201V\306\307&\207" [custom-declare-variable evil-intercept-esc 'always "Whether evil should intercept the ESC key.\nIn terminal, a plain ESC key and a meta-key-sequence both\ngenerate the same event. In order to distinguish both evil\nmodifies `input-decode-map'. This is necessary in terminal but\nnot in X mode. However, the terminal ESC is equivalent to C-[, so\nif you want to use C-[ instead of ESC in X, then Evil must\nintercept the ESC event in X, too. This variable determines when\nEvil should intercept the event." :type (radio (const :tag "Never" :value nil) (const :tag "In terminal only" :value t) (const :tag "Always" :value always)) :group evil evil-show-paren-range 0 "The minimal distance between point and a parenthesis\nwhich causes the parenthesis to be highlighted." integer evil-ex-hl-update-delay 0.02 "Time in seconds of idle before updating search highlighting.\nSetting this to a period shorter than that of keyboard's repeat\nrate allows highlights to update while scrolling." number evil-highlight-closing-paren-at-point-states '(not emacs insert replace) "The states in which the closing parenthesis at point should be highlighted.\nAll states listed here highlight the closing parenthesis at\npoint (which is Vim default behavior), all others highlight the\nparenthesis before point (which is Emacs default behavior). If\nthis list contains the symbol 'not then its meaning is inverted,\ni.e., all states listed here highlight the closing parenthesis\nbefore point." (repeat symbol) evil-want-C-i-jump t "Whether \"C-i\" jumps forward like in Vim." boolean :set #[(sym value) "\303 \"\210\304\302!\205/ \204\305\n\306\"\307=\203\310\n\306\311#\207 \205/\305\n\306\"?\205/\310\n\306\307#\207" [sym value evil-motion-state-map set-default boundp lookup-key " " evil-jump-forward define-key nil] 4] evil-want-C-u-scroll nil "Whether \"C-u\" scrolls like in Vim." #[(sym value) "\303 \"\210\304\302!\205/ \204\305\n\306\"\307=\203\310\n\306\311#\207 \205/\305\n\306\"?\205/\310\n\306\307#\207" [sym value evil-motion-state-map set-default boundp lookup-key "" evil-scroll-up define-key nil] 4] evil-want-C-w-delete "Whether \"C-w\" deletes a word in Insert state." #[(sym value) "\303 \"\210\304\302!\2050 \204\305\n\306\"\307=\203\310\n\306\311#\207 \2050\305\n\312\"\311=\2050\310\n\312\307#\207" [sym value evil-motion-state-map set-default boundp lookup-key "" evil-delete-backward-word define-key evil-window-map ""] 4] evil-want-C-w-in-emacs-state "Whether \"C-w\" prefixes windows commands in Emacs state." evil-want-change-word-to-end "Whether \"cw\" behaves like \"ce\"." evil-echo-state "Whether to signal the current state in the echo area." evil-complete-all-buffers "Whether completion looks for matches in all buffers." evil-complete-next-func #'(lambda (arg) (require 'dabbrev) (let ((dabbrev-search-these-buffers-only (unless evil-complete-all-buffers (list (current-buffer)))) dabbrev-case-distinction) (condition-case nil (if (eq last-command this-command) (dabbrev-expand nil) (dabbrev-expand (- (abs (or arg 1))))) (error (dabbrev-expand nil))))) "Completion function used by \\\\[evil-complete-next]." function evil-complete-previous-func #'(lambda (arg) (require 'dabbrev) (let ((dabbrev-search-these-buffers-only (unless evil-complete-all-buffers (list (current-buffer)))) dabbrev-case-distinction) (dabbrev-expand arg))) "Completion function used by \\\\[evil-complete-previous]." evil-complete-next-minibuffer-func 'minibuffer-complete "Minibuffer completion function used by \\\\[evil-complete-next]." evil-complete-previous-minibuffer-func 'minibuffer-complete "Minibuffer completion function used by \\\\[evil-complete-previous]." evil-complete-next-line-func #'(lambda (arg) (let ((hippie-expand-try-functions-list '(try-expand-line try-expand-line-all-buffers))) (hippie-expand arg))) "Minibuffer completion function used by \\\\[evil-complete-next-line]." evil-complete-previous-line-func "Minibuffer completion function used by \\\\[evil-complete-previous-line]." evil-lookup-func #'woman "Lookup function used by \"\\\\[evil-lookup]\"." evil-toggle-key "C-z" "The key used to change to and from Emacs state.\nMust be readable by `read-kbd-macro'. For example: \"C-z\"." string #[(sym value) "\302!\210\303 \"\207" [value sym evil-set-toggle-key set-default] 3] evil-default-state 'normal "The default state.\nThis is the state a mode comes up in when it is not listed\nin `evil-emacs-state-modes', `evil-insert-state-modes' or\n`evil-motion-state-modes'. The value may be one of `normal',\n`insert', `visual', `replace', `operator', `motion' and\n`emacs'." symbol evil-buffer-regexps '(("^ \\*load\\*")) "Regular expression determining the initial state for a buffer.\nEntries have the form (REGEXP . STATE), where REGEXP is a regular\nexpression matching the buffer's name and STATE is one of `normal',\n`insert', `visual', `replace', `operator', `motion', `emacs' and nil.\nIf STATE is nil, Evil is disabled in the buffer." (alist :key-type string :value-type symbol) evil-emacs-state-modes '(archive-mode bbdb-mode bookmark-bmenu-mode bookmark-edit-annotation-mode browse-kill-ring-mode bzr-annotate-mode calc-mode cfw:calendar-mode completion-list-mode Custom-mode debugger-mode delicious-search-mode desktop-menu-blist-mode desktop-menu-mode doc-view-mode dvc-bookmarks-mode dvc-diff-mode dvc-info-buffer-mode dvc-log-buffer-mode dvc-revlist-mode dvc-revlog-mode dvc-status-mode dvc-tips-mode ediff-mode ediff-meta-mode efs-mode Electric-buffer-menu-mode emms-browser-mode emms-mark-mode emms-metaplaylist-mode emms-playlist-mode etags-select-mode fj-mode gc-issues-mode gdb-breakpoints-mode gdb-disassembly-mode gdb-frames-mode gdb-locals-mode gdb-memory-mode gdb-registers-mode gdb-threads-mode gist-list-mode git-commit-mode gnus-article-mode gnus-browse-mode gnus-group-mode gnus-server-mode gnus-summary-mode google-maps-static-mode ibuffer-mode jde-javadoc-checker-report-mode magit-cherry-mode magit-diff-mode magit-log-mode magit-log-select-mode magit-popup-mode magit-popup-sequence-mode magit-process-mode magit-reflog-mode magit-refs-mode magit-revision-mode magit-stash-mode magit-stashes-mode magit-status-mode magit-mode magit-branch-manager-mode magit-commit-mode magit-key-mode magit-rebase-mode magit-wazzup-mode mh-folder-mode monky-mode mu4e-main-mode mu4e-headers-mode mu4e-view-mode notmuch-hello-mode notmuch-search-mode notmuch-show-mode occur-mode org-agenda-mode package-menu-mode proced-mode rcirc-mode rebase-mode recentf-dialog-mode reftex-select-bib-mode reftex-select-label-mode reftex-toc-mode sldb-mode slime-inspector-mode slime-thread-control-mode slime-xref-mode sr-buttons-mode sr-mode sr-tree-mode sr-virtual-mode tar-mode tetris-mode tla-annotate-mode tla-archive-list-mode tla-bconfig-mode tla-bookmarks-mode tla-branch-list-mode tla-browse-mode tla-category-list-mode tla-changelog-mode tla-follow-symlinks-mode tla-inventory-file-mode tla-inventory-mode tla-lint-mode tla-logs-mode tla-revision-list-mode tla-revlog-mode tla-tree-lint-mode tla-version-list-mode twittering-mode urlview-mode vc-annotate-mode vc-dir-mode vc-git-log-view-mode vc-hg-log-view-mode vc-svn-log-view-mode vm-mode vm-summary-mode w3m-mode wab-compilation-mode xgit-annotate-mode xgit-changelog-mode xgit-diff-mode xgit-revlog-mode xhg-annotate-mode xhg-log-mode xhg-mode xhg-mq-mode xhg-mq-sub-mode xhg-status-extra-mode) "Modes that should come up in Emacs state." (repeat symbol) evil-insert-state-modes '(comint-mode erc-mode eshell-mode geiser-repl-mode gud-mode inferior-apl-mode inferior-caml-mode inferior-emacs-lisp-mode inferior-j-mode inferior-python-mode inferior-scheme-mode inferior-sml-mode internal-ange-ftp-mode prolog-inferior-mode reb-mode shell-mode slime-repl-mode term-mode wdired-mode) "Modes that should come up in Insert state." (repeat symbol) evil-motion-state-modes '(apropos-mode Buffer-menu-mode calendar-mode color-theme-mode command-history-mode compilation-mode dictionary-mode ert-results-mode help-mode Info-mode Man-mode speedbar-mode undo-tree-visualizer-mode view-mode woman-mode) "Modes that should come up in Motion state." (repeat symbol)] 10) #@38 An alist of pending overriding maps. (defvar evil-pending-overriding-maps nil (#$ . 19252)) #@37 An alist of pending intercept maps. (defvar evil-pending-intercept-maps nil (#$ . 19350)) (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313& \210\314\315\316\"\210\300\317\320\321\304\322\306\307\310\323\312\313& \210\300\324\325\326\304\327\306\307\310\330\312\313& \210\300\331\332\333\304\334\306\307\310\335\312\313& \210\300\336\337\340\304\341\306\307&\210\342\343\337\344\345\346\306\307&\210\300\347\337\350\304\341\306\343&\210\300\351\352\353\304\354\306\343&\210\300\355\356\357\304\360\306\343&\210\300\361\362\363\306\307\304\364&\210\365\366\367\370\306\307%\210\365\371\372\373\306\307%\210\300\374\337\375\306\307\304\341&\210\300\376\337\377\306\307\304\341&\210\201@\376!\210\300\201A\201B\201C\306\307\304\201D&\210\300\201E\337\201F\304\341\306\307&\210\300\201G\201H\201I\304\201J\306\307&\210\300\201K\201B\201L\304\341\306\307&\210\300\201M\201N\201O\304\201P\306\307&\210\300\201Q\337\201R\304\201S\306\307&\210\300\201T\201B\201U\304\341\306\307&\210\300\201V\201B\201W\304\341\306\307&\210\300\201X\201B\201Y\304\341\306\307&\210\300\201Z\201B\201[\304\341\306\307&\210\300\201\\\337\201]\304\341\306\307&\210\365\201^\201_\201`\306\307%\210\365\201a\201b\201c\306\307%\210\365\201d\201e\201f\306\307%\210\365\201g\201h\201i\306\307%\210\300\201j\201k\201l\304\201m\306\307&\210\300\201n\337\201o\304\341\306\307&\207" [custom-declare-variable evil-overriding-maps '((Buffer-menu-mode-map) (color-theme-mode-map) (comint-mode-map) (compilation-mode-map) (grep-mode-map) (dictionary-mode-map) (ert-results-mode-map . motion) (Info-mode-map . motion) (speedbar-key-map) (speedbar-file-key-map) (speedbar-buffers-key-map)) "Keymaps that should override Evil maps.\nEntries have the form (MAP-VAR . STATE), where MAP-VAR is\na keymap variable and STATE is the state whose bindings\nshould be overridden. If STATE is nil, all states are\noverridden." :type (alist :key-type symbol :value-type symbol) :group evil :set #[(var values) "\301\302\303\304\305%\207" [values evil-set-custom-state-maps evil-overriding-maps evil-pending-overriding-maps override-state evil-make-overriding-map] 6] :initialize evil-custom-initialize-pending-reset add-hook after-load-functions evil-update-pending-maps evil-intercept-maps '((edebug-mode-map)) "Keymaps that should intercept Evil maps.\nEntries have the form (MAP-VAR . STATE), where MAP-VAR is\na keymap variable and STATE is the state whose bindings\nshould be intercepted. If STATE is nil, all states are\nintercepted." (alist :key-type symbol :value-type symbol) #[(var values) "\301\302\303\304\305%\207" [values evil-set-custom-state-maps evil-intercept-maps evil-pending-intercept-maps intercept-state evil-make-intercept-map] 6] evil-motions '(back-to-indentation backward-char backward-list backward-paragraph backward-sentence backward-sexp backward-up-list backward-word beginning-of-buffer beginning-of-defun beginning-of-line beginning-of-visual-line c-beginning-of-defun c-end-of-defun diff-file-next diff-file-prev diff-hunk-next diff-hunk-prev down-list end-of-buffer end-of-defun end-of-line end-of-visual-line exchange-point-and-mark forward-char forward-list forward-paragraph forward-sentence forward-sexp forward-word goto-last-change ibuffer-backward-line ibuffer-forward-line isearch-abort isearch-cancel isearch-complete isearch-del-char isearch-delete-char isearch-edit-string isearch-exit isearch-highlight-regexp isearch-occur isearch-other-control-char isearch-other-meta-char isearch-printing-char isearch-query-replace isearch-query-replace-regexp isearch-quote-char isearch-repeat-backward isearch-repeat-forward isearch-ring-advance isearch-ring-retreat isearch-toggle-case-fold isearch-toggle-input-method isearch-toggle-regexp isearch-toggle-specified-input-method isearch-toggle-word isearch-yank-char isearch-yank-kill isearch-yank-line isearch-yank-word-or-char keyboard-quit left-char left-word mouse-drag-region mouse-save-then-kill mouse-set-point mouse-set-region mwheel-scroll move-beginning-of-line move-end-of-line next-error next-line paredit-backward paredit-backward-down paredit-backward-up paredit-forward paredit-forward-down paredit-forward-up pop-global-mark pop-tag-mark pop-to-mark-command previous-error previous-line right-char right-word scroll-down scroll-down-command scroll-up scroll-up-command sgml-skip-tag-backward sgml-skip-tag-forward up-list) "Non-Evil commands to initialize to motions." (repeat symbol) evil-set-custom-motions evil-visual-newline-commands '(LaTeX-section TeX-font) "Commands excluding the trailing newline of a Visual Line selection.\nThese commands work better without this newline." (repeat symbol) evil-set-visual-newline-commands evil-want-visual-char-semi-exclusive nil "Visual character selection to beginning/end of line is exclusive.\nIf non nil then an inclusive visual character selection which\nends at the beginning or end of a line is turned into an\nexclusive selection. Thus if the selected (inclusive) range ends\nat the beginning of a line it is changed to not include the first\ncharacter of that line, and if the selected range ends at the end\nof a line it is changed to not include the newline character of\nthat line." boolean custom-declare-group evil-cjk "CJK support" :prefix "evil-cjk-" evil-cjk-emacs-word-boundary "Determine word boundary exactly the same way as Emacs does." evil-cjk-word-separating-categories '((67 . 72) (67 . 75) (67 . 107) (67 . 65) (67 . 71) (72 . 67) (72 . 75) (72 . 107) (72 . 65) (72 . 71) (75 . 67) (75 . 72) (75 . 107) (75 . 65) (75 . 71) (107 . 67) (107 . 72) (107 . 75) (65 . 67) (65 . 72) (65 . 75) (71 . 67) (71 . 72) (71 . 75)) "List of pair (cons) of categories to determine word boundary\nused in `evil-cjk-word-boundary-p'. See the documentation of\n`word-separating-categories'. Use `describe-categories' to see\nthe list of categories." ((character . character)) evil-cjk-word-combining-categories '((nil . 94) (94) (114 . 107) (114 . 65) (114 . 71) (107 . 114) (107 . 65) (107 . 71) (65 . 114) (65 . 107) (65 . 71) (71 . 114) (71 . 107) (71 . 65)) "List of pair (cons) of categories to determine word boundary\nused in `evil-cjk-word-boundary-p'. See the documentation of\n`word-combining-categories'. Use `describe-categories' to see the\nlist of categories." ((character . character)) evil-ex-complete-emacs-commands 'in-turn "TAB-completion for Emacs commands in ex command line.\nThis variable determines when Emacs commands are considered for\ncompletion, always, never, or only if no Evil ex command is\navailable for completion." (radio (const :tag "Only if no ex-command." :value in-turn) (const :tag "Never" :value nil) (const :tag "Always" :value t)) custom-declare-face evil-ex-commands ((nil :underline t :slant italic)) "Face for the evil command in completion in ex mode." evil-ex-info ((((supports :slant)) :slant italic :foreground "red")) "Face for the info message in ex mode." evil-ex-visual-char-range "Type of default ex range in visual char state.\nIf non-nil the default range when starting an ex command from\ncharacter visual state is `<,`> otherwise it is '<,'>. In the\nfirst case the ex command will be passed a region covering only\nthe visual selection. In the second case the passed region will\nbe extended to contain full lines." evil-symbol-word-search "If nil then * and # search for words otherwise for symbols." make-variable-buffer-local evil-magic t "Meaning which characters in a pattern are magic.\nThe meaning of those values is the same as in Vim. Note that it\nonly has influence if the evil search module is chosen in\n`evil-search-module'." (radio (const :tag "Very magic." :value very-magic) (const :tag "Magic" :value t) (const :tag "Nomagic" :value nil) (const :tag "Very nomagic" :value very-nomagic)) evil-ex-search-vim-style-regexp "If non-nil Vim-style backslash codes are supported in search patterns.\nSee `evil-transform-vim-style-regexp' for the supported backslash\ncodes. Note that this only affects the search command if\n`evil-search-module' is set to 'evil. The isearch module always\nuses plain Emacs regular expressions." evil-ex-interactive-search-highlight 'all-windows "Determine in which windows the interactive highlighting should be shown." (radio (const :tag "All windows." all-windows) (const :tag "Selected window." selected-window) (const :tag "Disable highlighting." nil)) evil-ex-search-persistent-highlight "If non-nil matches remained highlighted when the search ends." evil-ex-search-case 'smart "The case behaviour of the search command.\nSmart case means that the pattern is case sensitive if and only\nif it contains an upper case letter, otherwise it is case\ninsensitive." (radio (const :tag "Case sensitive." sensitive) (const :tag "Case insensitive." insensitive) (const :tag "Smart case." smart)) evil-ex-substitute-case "The case behaviour of the search command.\nSmart case means that the pattern is case sensitive if and only\nif it contains an upper case letter, otherwise it is case\ninsensitive. If nil then the setting of `evil-ex-search-case' is\nused." (radio (const :tag "Same as interactive search." nil) (const :tag "Case sensitive." sensitive) (const :tag "Case insensitive." insensitive) (const :tag "Smart case." smart)) evil-ex-search-interactive "If t search is interactive." evil-ex-search-highlight-all "If t and interactive search is enabled, all matches are\nhighlighted." evil-ex-substitute-highlight-all "If t all matches for the substitute pattern are highlighted." evil-ex-substitute-interactive-replace "If t and substitute patterns are highlighted,\nthe replacement is shown interactively." evil-ex-substitute-global "If non-nil substitute patterns a global by default.\nUsually (if this variable is nil) a substitution works only on\nthe first match of a pattern in a line unless the 'g' flag is\ngiven, in which case the substitution happens on all matches in a\nline. If this option is non-nil, this behaviour is reversed: the\nsubstitution works on all matches unless the 'g' pattern is\nspecified, then is works only on the first match." evil-ex-search ((t :inherit isearch)) "Face for interactive search." evil-ex-lazy-highlight ((t :inherit lazy-highlight)) "Face for highlighting all matches in interactive search." evil-ex-substitute-matches ((t :inherit lazy-highlight)) "Face for interactive substitute matches." evil-ex-substitute-replacement ((((supports :underline)) :underline t :foreground "red")) "Face for interactive replacement text." evil-command-window-height 8 "Height (in lines) of the command line window.\nSet to 0 to use the default height for `split-window'." integer evil-display-shell-error-in-message "Show error output of a shell command in the error buffer.\nIf this variable is non-nil the error output of a shell command\ngoes to the messages buffer instead of being mixed with the\nregular output. This happens only of the exit status of the\ncommand is non-zero."] 12) #@171 Define SYMBOL as permanent buffer local variable, and return SYMBOL. The parameters are the same as for `defvar', but the variable SYMBOL is made permanent buffer local. (defalias 'evil-define-local-var '(macro . #[(symbol &optional initvalue docstring) "\303\304 \nF\305\306DD\307\306D\310BBF\207" [symbol initvalue docstring progn defvar make-variable-buffer-local quote put ('permanent-local t)] 6 (#$ . 30379)])) (byte-code "\300\301\302\303#\210\300\301\304\305#\207" [put evil-define-local-var lisp-indent-function defun edebug-form-spec (symbolp &optional form stringp)] 4) #@126 The current Evil state. To change the state, use `evil-change-state' or call the state function (e.g., `evil-normal-state'). (defvar evil-state nil (#$ . 30970)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-state put permanent-local t] 4) #@35 The Evil state being switched to. (defvar evil-next-state nil (#$ . 31251)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-next-state put permanent-local t] 4) #@57 For Each evil state the Evil state being switched from. (defvar evil-previous-state-alist nil (#$ . 31451)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-previous-state-alist put permanent-local t] 4) #@37 The Evil state being switched from. (defvar evil-previous-state nil (#$ . 31693)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-previous-state put permanent-local t] 4) #@225 The buffer of the latest `evil-execute-in-emacs-state'. When this command is being executed the current buffer is stored in this variable. This is necessary in case the Emacs-command to be called changes the current buffer. (defvar evil-execute-in-emacs-state-buffer nil (#$ . 31904)) #@44 Mode-Line indicator for the current state. (defvar evil-mode-line-tag nil (#$ . 32195)) (byte-code "\300\301!\210\302\301\303\304#\210\302\301\305\304#\207" [make-variable-buffer-local evil-mode-line-tag put permanent-local t risky-local-variable] 4) #@139 Association list of keymap variables. Entries have the form (MODE . KEYMAP), where KEYMAP is the variable containing the keymap for MODE. (defvar evil-global-keymaps-alist nil (#$ . 32453)) #@181 Association list of keymap variables that must be reinitialized in each buffer. Entries have the form (MODE . KEYMAP), where KEYMAP is the variable containing the keymap for MODE. (defvar evil-local-keymaps-alist nil (#$ . 32650)) #@205 Specifications made by `evil-define-state'. Entries have the form (STATE . PLIST), where PLIST is a property list specifying various aspects of the state. To access a property, use `evil-state-property'. (defvar evil-state-properties nil (#$ . 32888)) #@139 Association list of keymaps to use for Evil modes. Elements have the form (MODE . KEYMAP), with the first keymaps having higher priority. (defvar evil-mode-map-alist nil (#$ . 33147)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-mode-map-alist put permanent-local t] 4) #@47 Specifications made by `evil-define-command'. (defvar evil-command-properties nil (#$ . 33459)) #@54 List of variables pertaining to Transient Mark mode. (defvar evil-transient-vars '(cua-mode transient-mark-mode select-active-regions) (#$ . 33561)) #@178 Association list of old values for Transient Mark mode variables. Entries have the form (VARIABLE VALUE LOCAL), where LOCAL is whether the variable was previously buffer-local. (defvar evil-transient-vals nil (#$ . 33717)) #@109 If non-nil, various Evil displays are inhibited. Use the macro `evil-without-display' to set this variable. (defvar evil-no-display nil (#$ . 33947)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-no-display put permanent-local t] 4) #@191 Specifications made by `evil-define-type'. Entries have the form (TYPE . PLIST), where PLIST is a property list specifying functions for handling the type: expanding it, describing it, etc. (defvar evil-type-properties nil (#$ . 34222)) #@54 Association list of Evil-specific interactive codes. (defvar evil-interactive-alist nil (#$ . 34465)) #@55 Marker for storing the starting position of a motion. (defvar evil-motion-marker nil (#$ . 34573)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-motion-marker put permanent-local t] 4) #@22 Current motion type. (defvar evil-this-type nil (#$ . 34799)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-type put permanent-local t] 4) #@19 Current register. (defvar evil-this-register nil (#$ . 34984)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-register put permanent-local t] 4) #@25 Current macro register. (defvar evil-this-macro nil (#$ . 35174)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-macro put permanent-local t] 4) #@19 Current operator. (defvar evil-this-operator nil (#$ . 35364)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-operator put permanent-local t] 4) #@17 Current motion. (defvar evil-this-motion nil (#$ . 35554)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-motion put permanent-local t] 4) #@23 Current motion count. (defvar evil-this-motion-count nil (#$ . 35738)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-motion-count put permanent-local t] 4) #@29 The last executed register. (defvar evil-last-register nil (#$ . 35940)) #@132 Inhibit current operator. If an operator calls a motion and the motion sets this variable to t, the operator code is not executed. (defvar evil-inhibit-operator nil (#$ . 36020)) #@105 This variable is used to transfer the value of `evil-inhibit-operator' from one local scope to another. (defvar evil-inhibit-operator-value nil (#$ . 36206)) #@37 Beginning of `evil-operator-range'. (defvar evil-operator-range-beginning nil (#$ . 36370)) #@31 End of `evil-operator-range'. (defvar evil-operator-range-end nil (#$ . 36468)) #@32 Type of `evil-operator-range'. (defvar evil-operator-range-type nil (#$ . 36554)) #@34 Motion of `evil-operator-range'. (defvar evil-operator-range-motion nil (#$ . 36642)) #@144 List of previous restrictions. Using `evil-with-restriction' stores the previous values of `point-min' and `point-max' as a pair in this list. (defvar evil-restriction-stack nil (#$ . 36735)) #@449 Association list for markers. Entries have the form (CHAR . DATA), where CHAR is the marker's name and DATA is either a marker object as returned by `make-marker', a variable, a movement function, or a cons cell (STRING NUMBER), where STRING is a file path and NUMBER is a buffer position. The global value of this variable holds markers available from every buffer, while the buffer-local value holds markers available only in the current buffer. (defvar evil-markers-alist '((40 . evil-backward-sentence) (41 . evil-forward-sentence) (123 . evil-backward-paragraph) (125 . evil-forward-paragraph) (39 . evil-jump-backward) (96 . evil-jump-backward) (60 . evil-visual-beginning) (62 . evil-visual-goto-end) (46 lambda nil (let (last-command) (goto-last-change nil)))) (#$ . 36934)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-markers-alist put permanent-local t] 4) #@12 Jump list. (defvar evil-jump-list nil (#$ . 37844)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-jump-list put permanent-local t] 4) #@66 Full keymap disabling default bindings to `self-insert-command'. (defconst evil-suppress-map (make-keymap) (#$ . 38019)) (suppress-keymap evil-suppress-map t) #@216 Keymap active during `evil-read-key'. This keymap can be used to bind some commands during the execution of `evil-read-key' which is usually used to read a character argument for some commands, e.g. `evil-replace'. (defvar evil-read-key-map (make-sparse-keymap) (#$ . 38185)) #@59 A ring of repeat-informations to repeat the last command. (defvar evil-repeat-ring (make-ring 10) (#$ . 38467)) #@35 An alist of defined repeat-types. (defvar evil-repeat-types '((t . evil-repeat-keystrokes) (change . evil-repeat-changes) (motion . evil-repeat-motion) (insert-at-point . evil-repeat-insert-at-point) (ignore)) (#$ . 38585)) #@36 Whether we are recording a repeat. (defvar evil-recording-repeat nil (#$ . 38815)) #@58 Whether we are recording the current command for repeat. (defvar evil-recording-current-command nil (#$ . 38904)) #@56 Accumulated buffer changes for changed-based commands. (defvar evil-repeat-changes nil (#$ . 39024)) #@48 Information accumulated during current repeat. (defvar evil-repeat-info nil (#$ . 39131)) #@92 The buffer in which the repeat started. If the buffer is changed, the repeat is cancelled. (defvar evil-repeat-buffer nil (#$ . 39227)) #@81 The position of point at the beginning of an change-tracking editing command. (defvar evil-repeat-pos nil (#$ . 39369)) #@44 The keys that invoked the current command. (defvar evil-repeat-keys nil (#$ . 39497)) #@310 Information about the latest repeat command. This is a list of three elements (POINT COUNT UNDO-POINTER), where POINT is the position of point before the latest repeat, COUNT the count-argument of the latest repeat command and UNDO-POINTER the head of the undo-list before the last command has been repeated. (defvar evil-last-repeat nil (#$ . 39590)) #@46 The explicit count when repeating a command. (defvar evil-repeat-count nil (#$ . 39948)) #@64 The explicit count passed to an command starting Insert state. (defvar evil-insert-count nil (#$ . 40043)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-insert-count put permanent-local t] 4) #@364 The information about the number of following lines the insertion should be repeated. This is list (LINE COLUMN COUNT) where LINE is the line-number where the original insertion started and COLUMN is either a number of function determining the column where the repeated insertions should take place. COUNT is number of repeats (including the original insertion). (defvar evil-insert-vcount nil (#$ . 40277)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-insert-vcount put permanent-local t] 4) #@129 Non-nil of the current insertion should not take place on lines at which the insertion point is behind the end of the line. (defvar evil-insert-skip-empty-lines nil (#$ . 40813)) #@78 Non-nil if the current insertion command is a line-insertion command o or O. (defvar evil-insert-lines nil (#$ . 41002)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-insert-lines put permanent-local t] 4) #@53 Repeat information accumulated during an insertion. (defvar evil-insert-repeat-info nil (#$ . 41249)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-insert-repeat-info put permanent-local t] 4) #@90 Association list of characters overwritten in Replace state. The format is (POS . CHAR). (defvar evil-replace-alist nil (#$ . 41483)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-replace-alist put permanent-local t] 4) #@38 Previous value of `current-message'. (defvar evil-echo-area-message nil (#$ . 41744)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-echo-area-message put permanent-local t] 4) #@79 If set to t inside `evil-save-echo-area', then the echo area is not restored. (defvar evil-write-echo-area nil (#$ . 41961)) #@77 A pair (FUNCTION . CHAR) describing the lastest character search command. (defvar evil-last-find nil (#$ . 42092)) #@446 Information about the latest paste. This should be a list (CMD COUNT POINT BEG END FIRSTVISUAL) where CMD is the last paste-command (`evil-paste-before', `evil-paste-after' or `evil-visual-paste'), COUNT is the repeat count of the paste, POINT is the position of point before the paste, BEG end END are the region of the inserted text. FIRSTVISUAL is t if and only if the previous command was the first visual paste (i.e. before any paste-pop). (defvar evil-last-paste nil (#$ . 42216)) #@161 Information about the latest undo entry in the buffer. This should be a pair (OBJ . CONS) where OBJ is the entry as an object, and CONS is a copy of the entry. (defvar evil-last-undo-entry nil (#$ . 42710)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-last-undo-entry put permanent-local t] 4) #@152 Information about the latest insertion in insert state. This should be a pair (BEG . END) that describes the buffer-region of the newly inserted text. (defvar evil-current-insertion nil (#$ . 43047)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-current-insertion put permanent-local t] 4) #@34 The last piece of inserted text. (defvar evil-last-insertion nil (#$ . 43378)) #@70 The last piece of deleted text. The text should be less than a line. (defvar evil-last-small-deletion nil (#$ . 43463)) #@111 Whether text being saved to the numbered-register ring was not deleted and not yanked to a specific register. (defvar evil-was-yanked-without-register t (#$ . 43590)) #@50 The count argument of the current paste command. (defvar evil-paste-count nil (#$ . 43763)) #@126 When undo is disabled in current buffer. Certain commands depending on undo use this variable instead of `buffer-undo-list'. (defvar evil-temporary-undo nil (#$ . 43862)) #@56 Everything up to this mark is united in the undo-list. (defvar evil-undo-list-pointer nil (#$ . 44039)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-undo-list-pointer put permanent-local t] 4) #@57 Set to non-nil if the current undo steps are connected. (defvar evil-in-single-undo nil (#$ . 44274)) #@36 Timer for flashing search results. (defvar evil-flash-timer nil (#$ . 44382)) #@34 String to use for search prompt. (defvar evil-search-prompt nil (#$ . 44466)) #@30 History of forward searches. (defvar evil-search-forward-history nil (#$ . 44550)) #@31 History of backward searches. (defvar evil-search-backward-history nil (#$ . 44639)) #@32 Keymap for inner text objects. (defvar evil-inner-text-objects-map (make-sparse-keymap) (#$ . 44730)) #@32 Keymap for outer text objects. (defvar evil-outer-text-objects-map (make-sparse-keymap) (#$ . 44838)) #@37 Keymap for window-related commands. (defvar evil-window-map (make-sparse-keymap) (#$ . 44946)) #@52 Input method used in Insert state and Emacs state. (defvar evil-input-method nil (#$ . 45047)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-input-method put permanent-local t] 4) #@50 The beginning of the Visual selection, a marker. (defvar evil-visual-beginning nil (#$ . 45268)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-beginning put permanent-local t] 4) #@44 The end of the Visual selection, a marker. (defvar evil-visual-end nil (#$ . 45495)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-end put permanent-local t] 4) #@50 The position of point in Visual state, a marker. (defvar evil-visual-point nil (#$ . 45704)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-point put permanent-local t] 4) #@49 The position of mark in Visual state, a marker. (defvar evil-visual-mark nil (#$ . 45923)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-mark put permanent-local t] 4) #@53 The position of mark before Visual state, a marker. (defvar evil-visual-previous-mark nil (#$ . 46139)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-previous-mark put permanent-local t] 4) #@97 The kind of Visual selection. This is a selection as defined by `evil-define-visual-selection'. (defvar evil-visual-selection nil (#$ . 46377)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-selection put permanent-local t] 4) #@145 Whether point follows mark in Visual state. Negative if point precedes mark, otherwise positive. See also the function `evil-visual-direction'. (defvar evil-visual-direction 0 (#$ . 46652)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-direction put permanent-local t] 4) #@51 Property list of miscellaneous Visual properties. (defvar evil-visual-properties nil (#$ . 46972)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-properties put permanent-local t] 4) #@236 Whether the region matches the Visual selection. That is, whether the positions of point and mark have been expanded to coincide with the selection's boundaries. This makes the selection available to functions acting on Emacs' region. (defvar evil-visual-region-expanded nil (#$ . 47203)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-region-expanded put permanent-local t] 4) #@131 Overlay for highlighting the Visual selection. Not used for blockwise selections, in which case see `evil-visual-block-overlays'. (defvar evil-visual-overlay nil (#$ . 47629)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-overlay put permanent-local t] 4) #@94 Overlays for Visual Block selection, one for each line. They are reused to minimize flicker. (defvar evil-visual-block-overlays nil (#$ . 47933)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-block-overlays put permanent-local t] 4) #@91 Association list of Visual selection functions. Elements have the form (NAME . FUNCTION). (defvar evil-visual-alist nil (#$ . 48214)) #@53 Timer for updating the X selection in visual state. (defvar evil-visual-x-select-timer nil (#$ . 48354)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-visual-x-select-timer put permanent-local t] 4) #@52 Time in seconds for the update of the X selection. (defvar evil-visual-x-select-timeout 0.1 (#$ . 48594)) #@1279 Actions to be performed for various folding operations. The value should be a list of fold handlers, were a fold handler has the format: ((MODES) PROPERTIES) MODES acts as a predicate, containing the symbols of all major or minor modes for which the handler should match. For example: '((outline-minor-mode org-mode) ...) would match for either outline-minor-mode or org-mode, even though the former is a minor mode and the latter is a major. PROPERTIES specifies possible folding actions and the functions to be applied in the event of a match on one (or more) of the MODES; the supported properties are: - `:open-all' Open all folds. - `:close-all' Close all folds. - `:toggle' Toggle the display of the fold at point. - `:open' Open the fold at point. - `:open-rec' Open the fold at point recursively. - `:close' Close the fold at point. Each value must be a function. A value of `nil' will cause the action to be ignored for that respective handler. For example: `((org-mode) :close-all nil :open ,(lambda () (show-entry) (show-children)) :close hide-subtree) would ignore `:close-all' actions and invoke the provided functions on `:open' or `:close'. (defvar evil-fold-list (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313BBBBBBBBBE\207" [((hs-minor-mode) :open-all hs-show-all :close-all hs-hide-all :toggle hs-toggle-hiding :open hs-show-block :open-rec nil :close hs-hide-block) ((hide-ifdef-mode) :open-all show-ifdefs :close-all hide-ifdefs :toggle nil :open show-ifdef-block :open-rec nil :close hide-ifdef-block) (outline-mode outline-minor-mode org-mode) :open-all show-all :close-all #[nil "\300\301!\207" [hide-sublevels 1] 2] :toggle outline-toggle-children :open #[nil "\300 \210\301 \207" [show-entry show-children] 1] (:open-rec show-subtree :close hide-subtree)] 12) (#$ . 48708)) #@74 Keymap for Ex. Key sequences bound in this map are immediately executed. (defvar evil-ex-map (make-sparse-keymap) (#$ . 50649)) #@27 Completion keymap for Ex. (defvar evil-ex-completion-map (make-sparse-keymap) (#$ . 50783)) #@149 Additional initial content of the ex command line. This content of this variable is appended to the ex command line if ex is started interactively. (defvar evil-ex-initial-input nil (#$ . 50882)) #@123 This variable is set to t if shell command completion has been initialized. See `evil-ex-init-shell-argument-completion'. (defvar evil-ex-shell-argument-initialized nil (#$ . 51085)) #@53 Association list of command bindings and functions. (defvar evil-ex-commands nil (#$ . 51274)) #@25 History of Ex commands. (defvar evil-ex-history nil (#$ . 51375)) #@39 The buffer from which Ex was started. (defvar evil-ex-current-buffer nil (#$ . 51447)) #@22 The evaluation tree. (defvar evil-ex-expression nil (#$ . 51540)) #@18 The syntax tree. (defvar evil-ex-tree nil (#$ . 51612)) #@25 The current Ex command. (defvar evil-ex-command nil (#$ . 51674)) #@37 The previously executed Ex command. (defvar evil-ex-previous-command nil (#$ . 51746)) #@32 The current Ex command string. (defvar evil-ex-cmd nil (#$ . 51839)) #@62 The position of `point' when the ex command has been called. (defvar evil-ex-point nil (#$ . 51914)) #@38 The current range of the Ex command. (defvar evil-ex-range nil (#$ . 52021)) #@45 The "!" argument of the current Ex command. (defvar evil-ex-bang nil (#$ . 52104)) #@41 The current argument of the Ex command. (defvar evil-ex-argument nil (#$ . 52193)) #@50 The argument handler for the current Ex command. (defvar evil-ex-argument-handler nil (#$ . 52282)) #@40 Association list of argument handlers. (defvar evil-ex-argument-types nil (#$ . 52388)) #@25 The last shell command. (defvar evil-previous-shell-command nil (#$ . 52482)) #@37 The history for the search command. (defvar evil-ex-search-history nil (#$ . 52566)) #@68 The direction of the current search, either 'forward or 'backward. (defvar evil-ex-search-direction nil (#$ . 52657)) #@34 The count if the current search. (defvar evil-ex-search-count nil (#$ . 52781)) #@37 The point where the search started. (defvar evil-ex-search-start-point nil (#$ . 52867)) #@44 The overlay for the current search result. (defvar evil-ex-search-overlay nil (#$ . 52962)) #@26 The last search pattern. (defvar evil-ex-search-pattern nil (#$ . 53060)) #@25 The last search offset. (defvar evil-ex-search-offset nil (#$ . 53140)) #@43 The beginning position of the last match. (defvar evil-ex-search-match-beg nil (#$ . 53218)) #@37 The end position of the last match. (defvar evil-ex-search-match-end nil (#$ . 53317)) #@30 The last substitute pattern. (defvar evil-ex-substitute-pattern nil (#$ . 53410)) #@34 The last substitute replacement. (defvar evil-ex-substitute-replacement nil (#$ . 53498)) #@28 The last substitute flags. (defvar evil-ex-substitute-flags nil (#$ . 53594)) #@25 The actual replacement. (defvar evil-ex-substitute-current-replacement nil (#$ . 53678)) #@96 Non-nil if the previous was a search. Otherwise the previous command is assumed as substitute. (defvar evil-ex-last-was-search nil (#$ . 53773)) #@59 The buffer from which the command line window was called. (defvar evil-command-window-current-buffer nil (#$ . 53924)) #@62 The command to execute when exiting the command line window. (defvar evil-command-window-execute-fn nil (#$ . 54049)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-command-window-execute-fn put permanent-local t] 4) #@75 The key for the command that opened the command line window (:, /, or ?). (defvar evil-command-window-cmd-key nil (#$ . 54306)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-command-window-cmd-key put permanent-local t] 4) #@42 An alist of currently active highlights. (defvar evil-ex-active-highlights-alist nil (#$ . 54570)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-ex-active-highlights-alist put permanent-local t] 4) #@36 Time used for updating highlights. (defvar evil-ex-hl-update-timer nil (#$ . 54809)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-ex-hl-update-timer put permanent-local t] 4) #@32 Keymap used in ex-search-mode. (defvar evil-ex-search-keymap (make-sparse-keymap) (#$ . 55026)) (set-keymap-parent evil-ex-search-keymap minibuffer-local-map) #@29 The current version of Evil (defconst evil-version "1.2.2" (#$ . 55191)) (defalias 'evil-version #[nil "\301\302\"\207" [evil-version message "Evil version %s"] 3 nil nil]) (provide 'evil-vars)