;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\211J\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\326\327\314\330\304\301&\210\310\331\312\332\314\315\304\301&\210\310\333\302\334\314\315\304\301&\210\310\335\312\336\314\315\304\301&\210\310\337\302\340\314\341\304\301&\210\310\342\312\343\314\315\304\301&\210\310\344\345\346\314\347\304\301&\210\310\350\351\352\314\353\304\301&\210\310\354\355\356\314\357\304\301&\210\316\354!\210\310\360\302\361\314\315\304\301&\210\310\362\312\363\314\315\304\301&\210\310\364\312\365\314\315\304\301&\210\310\366\367\370\314\371\304\301&\210\310\372\373\374\314\322\304\301&\210\310\375\376\377\314\371\304\301&\210\310\201@ \373\201A \314\322\304\301&\210\310\201B \201C \201D \314\371\304\301&\210\310\201E \201F \201G \314\201H \304\301&\210\310\201I \312\201J \314\315\304\301&\210\310\201K \302\201L \314\315\304\301&\210\310\201M \312\201N \314\315\304\301&\210\310\201O \302\201P \314\315\304\301&\210\310\201Q \312\201R \314\315\304\301&\210\310\201S \312\201T \314\315\304\301&\210\310\201U \312\201V \314\315\304\301&\210\310\201W \201X \201Y \314\201Z \304\301&\210\310\201[ \201\\ \201] \314\201Z \304\301&\210\310\201^ \201_ \201` \314\201Z \304\301&\210\310\201a \201b \201c \314\201Z \304\301&\210\310\201d \201e \201f \314\201Z \304\301&\210\310\201g \201d \201h \314\201Z \304\301&\210\310\201i \201j \201k \314\201Z \304\301&\210\310\201l \201m \201n \314\357\304\301\201o \201p &	\210\310\201q \201r \201s \314\353\304\301&\210\310\201t \201u \201v \314\201w \304\301&\210\310\201x \201y \201z \314\201{ \304\301&\210\310\201| \201} \201~ \314\201 \304\301&\210\310\201\200 \201\201 \201\202 \314\201\203 \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-normal-state-map>\\[evil-shift-right] and \\[evil-shift-left]." integer evil-shift-round "Whether \\<evil-normal-state-map>\\[evil-shift-right] and \\[evil-shift-left] round to the nearest multiple of `evil-shift-width'." evil-default-cursor (list (or (frame-parameter nil 'cursor-color) "black") t) "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-normal-state-map>\\[evil-repeat]\" moves the cursor." evil-cross-lines "Whether motions may cross newlines." evil-move-cursor-back "Whether the cursor is moved backwards when exiting Insert state." 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-move-word "The (movement) function to be used for double click selection.\nThe double-click starts visual state in a special word selection\nmode. This function is used to determine the words to be\nselected. Possible values are 'evil-move-word or\n'evil-move-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 "Whether actions like \"cw\" are undone in several steps." 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-esc-delay 0.01 "Time in seconds to wait for another key after ESC." evil-show-paren-range "The minimal distance between point and a parenthesis\nwhich causes the parenthesis to be highlighted." 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." 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 "Whether \"C-i\" jumps forward like in Vim." evil-want-C-u-scroll "Whether \"C-u\" scrolls like in Vim." evil-want-C-w-delete "Whether \"C-w\" deletes a word in Insert state." 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-insert-state-map>\\[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-insert-state-map>\\[evil-complete-previous]." evil-complete-next-minibuffer-func 'minibuffer-complete "Minibuffer completion function used by \\<evil-insert-state-map>\\[evil-complete-next]." evil-complete-previous-minibuffer-func 'minibuffer-complete "Minibuffer completion function used by \\<evil-insert-state-map>\\[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-insert-state-map>\\[evil-complete-next-line]." evil-complete-previous-line-func "Minibuffer completion function used by \\<evil-insert-state-map>\\[evil-complete-previous-line]." evil-lookup-func #'woman "Lookup function used by \"\\<evil-motion-state-map>\\[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\"." :set #[(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'." 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 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-commit-mode magit-diff-mode magit-key-mode magit-log-mode magit-mode magit-reflog-mode magit-show-branches-mode magit-stash-mode magit-status-mode magit-wazzup-mode mh-folder-mode monky-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-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-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 speedbar-mode undo-tree-visualizer-mode view-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 (#$ . 16008))
#@37 An alist of pending intercept maps.
(defvar evil-pending-intercept-maps nil (#$ . 16106))
(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\361\362\363\364\306\307%\210\300\365\366\367\306\307\304\370&\210\300\371\337\372\304\341\306\307&\210\300\373\374\375\304\376\306\307&\210\300\377\201@ \201A \304\201B \306\307&\210\300\201C \337\201D \304\201E \306\307&\210\300\201F \366\201G \304\341\306\307&\210\300\201H \366\201I \304\341\306\307&\210\300\201J \366\201K \304\341\306\307&\210\300\201L \366\201M \304\341\306\307&\210\361\201N \201O \201P \306\307%\210\361\201Q \201R \201S \306\307%\210\361\201T \201U \201V \306\307%\210\361\201W \201X \201Y \306\307%\207" [custom-declare-variable evil-overriding-maps '((Buffer-menu-mode-map) (color-theme-mode-map) (comint-mode-map) (compilation-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 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 redo right-char right-word scroll-down scroll-up undo undo-tree-redo undo-tree-undo 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)) custom-declare-face evil-ex-info ((((supports :slant)) :slant italic :foreground "red")) "Face for the info message in ex mode." 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-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-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."] 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\306DD\307\306D\310BBF\207" [symbol initvalue docstring progn defvar make-variable-buffer-local quote put ('permanent-local t)] 6 (#$ . 24695)]))
(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 (#$ . 25286))
(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 (#$ . 25567))
(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 (#$ . 25767))
(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 (#$ . 26009))
(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 (#$ . 26220))
#@44 Mode-Line indicator for the current state.
(defvar evil-mode-line-tag nil (#$ . 26511))
(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 (#$ . 26769))
#@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 (#$ . 26966))
#@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 (#$ . 27204))
#@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 (#$ . 27463))
(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 (#$ . 27775))
#@54 List of variables pertaining to Transient Mark mode.
(defvar evil-transient-vars '(cua-mode transient-mark-mode select-active-regions) (#$ . 27877))
#@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 (#$ . 28033))
#@109 If non-nil, various Evil displays are inhibited.
Use the macro `evil-without-display' to set this variable.
(defvar evil-no-display nil (#$ . 28263))
(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 (#$ . 28538))
#@54 Association list of Evil-specific interactive codes.
(defvar evil-interactive-alist nil (#$ . 28781))
#@55 Marker for storing the starting position of a motion.
(defvar evil-motion-marker nil (#$ . 28889))
(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 (#$ . 29115))
(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 (#$ . 29300))
(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 (#$ . 29490))
(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 (#$ . 29680))
(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 (#$ . 29870))
(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 (#$ . 30054))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local evil-this-motion-count put permanent-local t] 4)
#@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 (#$ . 30257))
#@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 (#$ . 30443))
#@37 Beginning of `evil-operator-range'.
(defvar evil-operator-range-beginning nil (#$ . 30607))
#@31 End of `evil-operator-range'.
(defvar evil-operator-range-end nil (#$ . 30705))
#@32 Type of `evil-operator-range'.
(defvar evil-operator-range-type nil (#$ . 30791))
#@34 Motion of `evil-operator-range'.
(defvar evil-operator-range-motion nil (#$ . 30879))
#@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 (#$ . 30972))
#@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)))) (#$ . 31171))
(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 (#$ . 32081))
(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) (#$ . 32256))
(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) (#$ . 32422))
#@59 A ring of repeat-informations to repeat the last command.
(defvar evil-repeat-ring (make-ring 10) (#$ . 32704))
#@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)) (#$ . 32822))
#@36 Whether we are recording a repeat.
(defvar evil-recording-repeat nil (#$ . 33052))
#@58 Whether we are recording the current command for repeat.
(defvar evil-recording-current-command nil (#$ . 33141))
#@56 Accumulated buffer changes for changed-based commands.
(defvar evil-repeat-changes nil (#$ . 33261))
#@48 Information accumulated during current repeat.
(defvar evil-repeat-info nil (#$ . 33368))
#@92 The buffer in which the repeat started.
If the buffer is changed, the repeat is cancelled.
(defvar evil-repeat-buffer nil (#$ . 33464))
#@81 The position of point at the beginning of an change-tracking
  editing command.
(defvar evil-repeat-pos nil (#$ . 33606))
#@44 The keys that invoked the current command.
(defvar evil-repeat-keys nil (#$ . 33734))
#@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 (#$ . 33827))
#@46 The explicit count when repeating a command.
(defvar evil-repeat-count nil (#$ . 34185))
#@64 The explicit count passed to an command starting Insert state.
(defvar evil-insert-count nil (#$ . 34280))
(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 (#$ . 34514))
(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 (#$ . 35050))
#@78 Non-nil if the current insertion command is a line-insertion
command o or O.
(defvar evil-insert-lines nil (#$ . 35239))
(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 (#$ . 35486))
(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 (#$ . 35720))
(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 (#$ . 35981))
(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 (#$ . 36198))
#@77 A pair (FUNCTION . CHAR) describing the lastest character
  search command.
(defvar evil-last-find nil (#$ . 36329))
#@265 Information about the latest paste.
This should be a list (CMD POINT BEG END) where CMD is the last
paste-command (either `evil-paste-before' or `evil-paste-after'),
POINT is the position of point before the paste,
BEG end END are the region of the inserted text.
(defvar evil-last-paste nil (#$ . 36453))
#@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 (#$ . 36766))
(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 (#$ . 37103))
(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 (#$ . 37434))
#@70 The last piece of deleted text.
The text should be less than a line.
(defvar evil-last-small-deletion nil (#$ . 37519))
#@50 The count argument of the current paste command.
(defvar evil-paste-count nil (#$ . 37645))
#@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 (#$ . 37744))
#@56 Everything up to this mark is united in the undo-list.
(defvar evil-undo-list-pointer nil (#$ . 37921))
(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 (#$ . 38156))
#@36 Timer for flashing search results.
(defvar evil-flash-timer nil (#$ . 38264))
#@34 String to use for search prompt.
(defvar evil-search-prompt nil (#$ . 38348))
#@32 Keymap for inner text objects.
(defvar evil-inner-text-objects-map (make-sparse-keymap) (#$ . 38432))
#@32 Keymap for outer text objects.
(defvar evil-outer-text-objects-map (make-sparse-keymap) (#$ . 38540))
#@37 Keymap for window-related commands.
(defvar evil-window-map (make-sparse-keymap) (#$ . 38648))
#@52 Input method used in Insert state and Emacs state.
(defvar evil-input-method nil (#$ . 38749))
(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 (#$ . 38970))
(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 (#$ . 39197))
(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 (#$ . 39406))
(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 (#$ . 39625))
(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 (#$ . 39841))
(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 (#$ . 40079))
(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 (#$ . 40354))
(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 (#$ . 40674))
(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 (#$ . 40905))
(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 (#$ . 41331))
(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 (#$ . 41635))
(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 (#$ . 41916))
#@53 Timer for updating the X selection in visual state.
(defvar evil-visual-x-select-timer nil (#$ . 42056))
(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 (#$ . 42296))
#@74 Keymap for Ex.
Key sequences bound in this map are immediately executed.
(defvar evil-ex-map (make-sparse-keymap) (#$ . 42408))
#@27 Completion keymap for Ex.
(defvar evil-ex-completion-map (make-sparse-keymap) (#$ . 42542))
(byte-code "\302	\"\210\303\304\305#\207" [evil-ex-completion-map minibuffer-local-completion-map set-keymap-parent define-key " " self-insert-command] 4)
#@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 (#$ . 42798))
#@53 Association list of command bindings and functions.
(defvar evil-ex-commands nil (#$ . 42987))
#@25 History of Ex commands.
(defvar evil-ex-history nil (#$ . 43088))
#@39 The buffer from which Ex was started.
(defvar evil-ex-current-buffer nil (#$ . 43160))
#@22 The evaluation tree.
(defvar evil-ex-expression nil (#$ . 43253))
#@18 The syntax tree.
(defvar evil-ex-tree nil (#$ . 43325))
#@25 The current Ex command.
(defvar evil-ex-command nil (#$ . 43387))
#@37 The previously executed Ex command.
(defvar evil-ex-previous-command nil (#$ . 43459))
#@38 The current range of the Ex command.
(defvar evil-ex-range nil (#$ . 43552))
#@45 The "!" argument of the current Ex command.
(defvar evil-ex-bang nil (#$ . 43635))
#@41 The current argument of the Ex command.
(defvar evil-ex-argument nil (#$ . 43724))
#@50 The argument handler for the current Ex command.
(defvar evil-ex-argument-handler nil (#$ . 43813))
#@40 Association list of argument handlers.
(defvar evil-ex-argument-types nil (#$ . 43919))
#@25 The last shell command.
(defvar evil-previous-shell-command nil (#$ . 44013))
#@37 The history for the search command.
(defvar evil-ex-search-history nil (#$ . 44097))
#@68 The direction of the current search, either 'forward or 'backward.
(defvar evil-ex-search-direction nil (#$ . 44188))
#@34 The count if the current search.
(defvar evil-ex-search-count nil (#$ . 44312))
#@37 The point where the search started.
(defvar evil-ex-search-start-point nil (#$ . 44398))
#@44 The overlay for the current search result.
(defvar evil-ex-search-overlay nil (#$ . 44493))
#@26 The last search pattern.
(defvar evil-ex-search-pattern nil (#$ . 44591))
#@25 The last search offset.
(defvar evil-ex-search-offset nil (#$ . 44671))
#@43 The beginning position of the last match.
(defvar evil-ex-search-match-beg nil (#$ . 44749))
#@37 The end position of the last match.
(defvar evil-ex-search-match-end nil (#$ . 44848))
#@30 The last substitute pattern.
(defvar evil-ex-substitute-pattern nil (#$ . 44941))
#@34 The last substitute replacement.
(defvar evil-ex-substitute-replacement nil (#$ . 45029))
#@28 The last substitute flags.
(defvar evil-ex-substitute-flags nil (#$ . 45125))
#@25 The actual replacement.
(defvar evil-ex-substitute-current-replacement nil (#$ . 45209))
#@42 An alist of currently active highlights.
(defvar evil-ex-active-highlights-alist nil (#$ . 45304))
(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 (#$ . 45543))
(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) (#$ . 45760))
(set-keymap-parent evil-ex-search-keymap minibuffer-local-map)
#@29 The current version of Evil
(defconst evil-version "1.0.8" (#$ . 45925))
(defalias 'evil-version #[nil "\301\302\"\207" [evil-version message "Evil version %s"] 3 nil nil])
(provide 'evil-vars)
