| commit | author | age | ||
| 5cb5f7 | 1 | ;ELC |
| C | 2 | ;;; Compiled |
| 3 | ;;; in Emacs version 26.1 | |
| 4 | ;;; with all optimizations. | |
| 5 | ||
| 6 | ;;; This file uses dynamic docstrings, first added in Emacs 19.29. | |
| 7 | ||
| 8 | ;;; This file does not contain utf-8 non-ASCII characters, | |
| 9 | ;;; and so can be loaded in Emacs versions earlier than 23. | |
| 10 | ||
| 11 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 12 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 13 | ||
| 14 | ||
| 15 | (byte-code "\300\301!\210\300\302!\210\300\303!\207" [require company cl-lib abbrev] 2) | |
| 16 | #@41 Replace MATCH with the expanded abbrev. | |
| 17 | (defalias 'company-abbrev-insert #[(match) "\300 \207" [expand-abbrev] 1 (#$ . 496)]) | |
| 18 | #@47 `company-mode' completion backend for abbrev. | |
| 19 | (defalias 'company-abbrev #[(command &optional arg &rest ignored) "\304\267\202\" \305\306\307\"\207\310 \207\311\312\313 \n\"\"\311\312\313 \"\"\244\207\314 !\207\315\207" [command arg global-abbrev-table local-abbrev-table #s(hash-table size 4 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 11 candidates 14 meta 30)) company-begin-backend company-abbrev company-abbrev-insert company-grab-symbol delete "" all-completions abbrev-expansion nil] 6 (#$ . 628) (list 'interactive)]) | |
| 20 | (provide 'company-abbrev) | |
