-
Notifications
You must be signed in to change notification settings - Fork 2
/
auto-complete-config.elc
executable file
·69 lines (64 loc) · 14.5 KB
/
auto-complete-config.elc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
;ELC
;;; Compiled by [email protected] on Sun Dec 16 17:19:07 2012
;;; from file /home/work/tmp/auto-complete-1.3.1/auto-complete-config.el
;;; in Emacs version 24.2.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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'auto-complete)
(defvar ac-imenu-index nil)
(ac-clear-variable-every-10-minutes 'ac-imenu-index)
(defalias 'ac-imenu-candidates #[nil "\306\307\301!\204\f \310\301!\210 \206 \311\312\313\217\211\311\211 \n\203{ \250\203* W\203{ \n\211A@\211:\203 \f@\fA :\203L \314\315\"\210\202w ;\203w \316\317\320!P\"\203w \316\321\"\203o \306\322\224O BT*\202 \237,\207" [i ac-imenu-index stack result node ac-limit 0 local-variable-p make-local-variable nil (imenu--make-index-alist) ((error)) mapc #[(child) " B\211\207" [child stack] 2] string-match "^" regexp-quote "^.*\\(()\\|=\\|<>\\)$" 1 cdr car ac-prefix] 5])
(defvar ac-source-imenu '((depends imenu) (candidates . ac-imenu-candidates) (symbol . "s")))
(defalias 'ac-complete-imenu #[nil "\300\301!\207" [auto-complete (ac-source-imenu)] 2 nil nil])
(byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\207" [custom-declare-face ac-gtags-candidate-face ((t (:background "lightgray" :foreground "navy"))) "Face for gtags candidate" :group auto-complete ac-gtags-selection-face ((t (:background "navy" :foreground "white"))) "Face for the gtags selected candidate."] 6)
(defalias 'ac-gtags-candidate #[nil "\300\301\302\217\207" [nil (byte-code "\301\302\303\304\"!\305\"\207" [ac-prefix split-string shell-command-to-string format "global -ci %s" "\n"] 5) ((error))] 3])
(defvar ac-source-gtags '((candidates . ac-gtags-candidate) (candidate-face . ac-gtags-candidate-face) (selection-face . ac-gtags-selection-face) (requires . 3) (symbol . "s")))
(defalias 'ac-complete-gtags #[nil "\300\301!\207" [auto-complete (ac-source-gtags)] 2 nil nil])
(byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\207" [custom-declare-face ac-yasnippet-candidate-face ((t (:background "sandybrown" :foreground "black"))) "Face for yasnippet candidate." :group auto-complete ac-yasnippet-selection-face ((t (:background "coral3" :foreground "white"))) "Face for the yasnippet selected candidate."] 6)
(defalias 'ac-yasnippet-table-hash #[(table) "\301\302!\203\n \302!\207\301\303!\205 \303!\207" [table fboundp yas/snippet-table-hash yas/table-hash] 2])
(defalias 'ac-yasnippet-table-parent #[(table) "\301\302!\203\n \302!\207\301\303!\205 \303!\207" [table fboundp yas/snippet-table-parent yas/table-parent] 2])
(defalias 'ac-yasnippet-candidate-1 #[(table) "\305!\306!\307\310\311 \"\210\312\f \237\"\n\203 \313 \314\n!\" +\207" [table candidates parent hashtab ac-prefix ac-yasnippet-table-hash ac-yasnippet-table-parent nil maphash #[(key value) " B\211\207" [key candidates] 2] all-completions append ac-yasnippet-candidate-1] 4])
(defalias 'ac-yasnippet-candidates #[nil "\302\303!\203 \304\305\306\307\303!\"\"\207\302\310!\203 \310!\202 \311 \211\205& \307 !)\207" [major-mode table fboundp yas/get-snippet-tables apply append mapcar ac-yasnippet-candidate-1 yas/snippet-table yas/current-snippet-table] 7])
(defvar ac-source-yasnippet '((depends yasnippet) (candidates . ac-yasnippet-candidates) (action . yas/expand) (candidate-face . ac-yasnippet-candidate-face) (selection-face . ac-yasnippet-selection-face) (symbol . "a")))
(defalias 'ac-complete-yasnippet #[nil "\300\301!\207" [auto-complete (ac-source-yasnippet)] 2 nil nil])
(defalias 'ac-semantic-candidates #[(prefix) "\300\301\302\303\304\305\306\217\"\"\207" [delete "" mapcar semantic-tag-name nil (byte-code "\301\302 !\206\n \303!\207" [prefix semantic-analyze-possible-completions semantic-analyze-current-context senator-find-tag-for-completion] 2) ((error))] 7])
(defvar ac-source-semantic '((available or (require 'semantic-ia nil t) (require 'semantic/ia nil t)) (candidates ac-semantic-candidates ac-prefix) (prefix . c-dot-ref) (requires . 0) (symbol . "m")))
(defalias 'ac-complete-semantic #[nil "\300\301!\207" [auto-complete (ac-source-semantic)] 2 nil nil])
(defvar ac-source-semantic-raw '((available or (require 'semantic-ia nil t) (require 'semantic/ia nil t)) (candidates ac-semantic-candidates ac-prefix) (symbol . "s")))
(defalias 'ac-complete-semantic-raw #[nil "\300\301!\207" [auto-complete (ac-source-semantic-raw)] 2 nil nil])
(defalias 'ac-eclim-candidates #[nil "\303 \304\211:\203 @\211A@\nBA\211\202 \n\237+\207" [#1=#:--cl-var-- c #2=#:--cl-var-- eclim/java-complete nil] 3])
(defvar ac-source-eclim '((candidates . ac-eclim-candidates) (prefix . c-dot) (requires . 0) (symbol . "f")))
(defalias 'ac-complete-eclim #[nil "\300\301!\207" [auto-complete (ac-source-eclim)] 2 nil nil])
#@53 A list of CSS properties and their possible values.
(defconst ac-css-property-alist '(("azimuth" angle "left-side" "far-left" "left" "center-left" "center" "center-right" "right" "far-right" "right-side" "behind" "leftwards" "rightwards") ("background" background-color background-image background-repeat background-attachment background-position) ("background-attachment" "scroll" "fixed") ("background-color" color "transparent") ("background-image" uri "none") ("background-position" percentage length "left" "center" "right" percentage length "top" "center" "bottom" "left" "center" "right" "top" "center" "bottom") ("background-repeat" "repeat" "repeat-x" "repeat-y" "no-repeat") ("border" border-width border-style border-color) ("border-bottom" border) ("border-bottom-color" border-color) ("border-bottom-style" border-style) ("border-bottom-width" border-width) ("border-collapse" "collapse" "separate") ("border-color" color "transparent") ("border-left" border) ("border-left-color" border-color) ("border-left-style" border-style) ("border-left-width" border-width) ("border-right" border) ("border-right-color" border-color) ("border-right-style" border-style) ("border-right-width" border-width) ("border-spacing" length length) ("border-style" border-style) ("border-top" border) ("border-top-color" border-color) ("border-top-style" border-style) ("border-top-width" border-width) ("border-width" border-width) ("bottom" length percentage "auto") ("caption-side" "top" "bottom") ("clear" "none" "left" "right" "both") ("clip" shape "auto") ("color" color) ("content" "normal" "none" string uri counter "attr()" "open-quote" "close-quote" "no-open-quote" "no-close-quote") ("counter-increment" identifier integer "none") ("counter-reset" identifier integer "none") ("cue" cue-before cue-after) ("cue-after" uri "none") ("cue-before" uri "none") ("cursor" uri "*" "auto" "crosshair" "default" "pointer" "move" "e-resize" "ne-resize" "nw-resize" "n-resize" "se-resize" "sw-resize" "s-resize" "w-resize" "text" "wait" "help" "progress") ("direction" "ltr" "rtl") ("display" "inline" "block" "list-item" "run-in" "inline-block" "table" "inline-table" "table-row-group" "table-header-group" "table-footer-group" "table-row" "table-column-group" "table-column" "table-cell" "table-caption" "none") ("elevation" angle "below" "level" "above" "higher" "lower") ("empty-cells" "show" "hide") ("float" "left" "right" "none") ("font" font-style font-variant font-weight font-size "/" line-height font-family "caption" "icon" "menu" "message-box" "small-caption" "status-bar") ("font-family" family-name generic-family) ("font-size" absolute-size relative-size length percentage) ("font-style" "normal" "italic" "oblique") ("font-variant" "normal" "small-caps") ("font-weight" "normal" "bold" "bolder" "lighter" "100" "200" "300" "400" "500" "600" "700" "800" "900") ("height" length percentage "auto") ("left" length percentage "auto") ("letter-spacing" "normal" length) ("line-height" "normal" number length percentage) ("list-style" list-style-type list-style-position list-style-image) ("list-style-image" uri "none") ("list-style-position" "inside" "outside") ("list-style-type" "disc" "circle" "square" "decimal" "decimal-leading-zero" "lower-roman" "upper-roman" "lower-greek" "lower-latin" "upper-latin" "armenian" "georgian" "lower-alpha" "upper-alpha" "none") ("margin" margin-width) ("margin-bottom" margin-width) ("margin-left" margin-width) ("margin-right" margin-width) ("margin-top" margin-width) ("max-height" length percentage "none") ("max-width" length percentage "none") ("min-height" length percentage) ("min-width" length percentage) ("orphans" integer) ("outline" outline-color outline-style outline-width) ("outline-color" color "invert") ("outline-style" border-style) ("outline-width" border-width) ("overflow" "visible" "hidden" "scroll" "auto") ("padding" padding-width) ("padding-bottom" padding-width) ("padding-left" padding-width) ("padding-right" padding-width) ("padding-top" padding-width) ("page-break-after" "auto" "always" "avoid" "left" "right") ("page-break-before" "auto" "always" "avoid" "left" "right") ("page-break-inside" "avoid" "auto") ("pause" time percentage) ("pause-after" time percentage) ("pause-before" time percentage) ("pitch" frequency "x-low" "low" "medium" "high" "x-high") ("pitch-range" number) ("play-during" uri "mix" "repeat" "auto" "none") ("position" "static" "relative" "absolute" "fixed") ("quotes" string string "none") ("richness" number) ("right" length percentage "auto") ("speak" "normal" "none" "spell-out") ("speak-header" "once" "always") ("speak-numeral" "digits" "continuous") ("speak-punctuation" "code" "none") ("speech-rate" number "x-slow" "slow" "medium" "fast" "x-fast" "faster" "slower") ("stress" number) ("table-layout" "auto" "fixed") ("text-align" "left" "right" "center" "justify") ("text-decoration" "none" "underline" "overline" "line-through" "blink") ("text-indent" length percentage) ("text-transform" "capitalize" "uppercase" "lowercase" "none") ("top" length percentage "auto") ("unicode-bidi" "normal" "embed" "bidi-override") ("vertical-align" "baseline" "sub" "super" "top" "text-top" "middle" "bottom" "text-bottom" percentage length) ("visibility" "visible" "hidden" "collapse") ("voice-family" specific-voice generic-voice "*" specific-voice generic-voice) ("volume" number percentage "silent" "x-soft" "soft" "medium" "loud" "x-loud") ("white-space" "normal" "pre" "nowrap" "pre-wrap" "pre-line") ("widows" integer) ("width" length percentage "auto") ("word-spacing" "normal" length) ("z-index" "auto" integer)) (#$ . 5066))
#@58 A list of CSS property value classes and their contents.
(defconst ac-css-value-classes '((absolute-size "xx-small" "x-small" "small" "medium" "large" "x-large" "xx-large") (border-style "none" "hidden" "dotted" "dashed" "solid" "double" "groove" "ridge" "inset" "outset") (color "aqua" "black" "blue" "fuchsia" "gray" "green" "lime" "maroon" "navy" "olive" "orange" "purple" "red" "silver" "teal" "white" "yellow" "rgb") (counter "counter") (family-name "Courier" "Helvetica" "Times") (generic-family "serif" "sans-serif" "cursive" "fantasy" "monospace") (generic-voice "male" "female" "child") (margin-width "auto") (relative-size "larger" "smaller") (shape "rect") (uri "url")) (#$ . 10704))
#@57 Identifiers for CSS pseudo-elements and pseudo-classes.
(defconst ac-css-pseudo-classes '("active" "after" "before" "first" "first-child" "first-letter" "first-line" "focus" "hover" "lang" "left" "link" "right" "visited") (#$ . 11405))
#@27 Current editing property.
(defvar ac-css-property nil (#$ . 11647))
(defalias 'ac-css-prefix #[nil "\212\301\302\303\304#)\205 \305\306!\307 \206 `\207" [ac-css-property re-search-backward "\\_<\\(.+?\\)\\_>\\s *:.*\\=" nil t match-string 1 ac-prefix-symbol] 4])
(defalias 'ac-css-property-candidates #[nil "\306 \"\307\211 \307 \n\211A@\211\203A \f9\203: \f >\204 \f B\310\n\306\f\n\"\2064 \306\311\f! \"\"\211\202\f \fB\202 \237,\206I \207" [ac-css-property ac-css-property-alist list seen value #1=#:--cl-var-- assoc-default nil append symbol-name ac-css-value-classes ac-css-pseudo-classes] 6])
(defvar ac-source-css-property '((candidates . ac-css-property-candidates) (prefix . ac-css-prefix) (requires . 0)))
(defvar ac-ropemacs-loaded nil)
(defalias 'ac-ropemacs-require #[nil "?\205 \302\303\304\"\210\305\301!\203 \306\306\211\207" [ac-ropemacs-loaded ropemacs-enable-autoimport pymacs-load "ropemacs" "rope-" boundp t] 3])
(defalias 'ac-ropemacs-setup #[nil "\301 \210\302\211\207" [ac-omni-completion-sources ac-ropemacs-require (("\\." ac-source-ropemacs))] 2])
(defalias 'ac-ropemacs-initialize #[nil "\300\301\302\"\210\300\303\302\"\210\300\304\302\305\306$\210\300\307\302\305\306$\210\300\310\302\305\306$\210\311\312\313\"\210\306\207" [autoload pymacs-apply "pymacs" pymacs-call pymacs-eval nil t pymacs-exec pymacs-load add-hook python-mode-hook ac-ropemacs-setup] 5])
(defvar ac-ropemacs-completions-cache nil)
(defvar ac-source-ropemacs '((init lambda nil (setq ac-ropemacs-completions-cache (mapcar (lambda (completion) (concat ac-prefix completion)) (ignore-errors (rope-completions))))) (candidates . ac-ropemacs-completions-cache)))
(defvar ac-source-rcodetools '((init lambda nil (require 'rcodetools) (condition-case x (save-excursion (rct-exec-and-eval rct-complete-command-name "--completion-emacs-icicles")) (error) (setq rct-method-completion-table nil))) (candidates lambda nil (all-completions ac-prefix (mapcar (lambda (completion) (replace-regexp-in-string " .*$" "" (car completion))) rct-method-completion-table)))))
(defalias 'ac-common-setup #[nil "\300\301\302\"\207" [add-to-list ac-sources ac-source-filename] 3])
(defalias 'ac-emacs-lisp-mode-setup #[nil "\301\302\"\211\207" [ac-sources append (ac-source-features ac-source-functions ac-source-yasnippet ac-source-variables ac-source-symbols)] 3])
(defalias 'ac-cc-mode-setup #[nil "\301\302\"\211\207" [ac-sources append (ac-source-yasnippet ac-source-gtags)] 3])
(defalias 'ac-ruby-mode-setup #[nil "\300\301!\210\302\301\303\"\207" [make-local-variable ac-ignores add-to-list "end"] 3])
(defalias 'ac-css-mode-setup #[nil "\301\302\"\211\207" [ac-sources append (ac-source-css-property)] 3])
(defalias 'ac-config-default #[nil "\300\301\302\"\210\303\304\305\"\210\303\306\307\"\210\303\310\311\"\210\303\312\313\"\210\303\314\315\"\210\316\317!\207" [set-default ac-sources (ac-source-abbrev ac-source-dictionary ac-source-words-in-same-mode-buffers) add-hook emacs-lisp-mode-hook ac-emacs-lisp-mode-setup c-mode-common-hook ac-cc-mode-setup ruby-mode-hook ac-ruby-mode-setup css-mode-hook ac-css-mode-setup auto-complete-mode-hook ac-common-setup global-auto-complete-mode t] 3])
(provide 'auto-complete-config)