21 lines
1.1 KiB
Plaintext
21 lines
1.1 KiB
Plaintext
|
;ELC
|
|||
|
|
;;; Compiled
|
|||
|
|
;;; in Emacs version 26.3
|
|||
|
|
;;; 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.
|
|||
|
|
|
|||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|||
|
|
|
|||
|
|
|
|||
|
|
(byte-code "\300\301!\210\300\302!\210\300\303!\207" [require company cl-lib abbrev] 2)
|
|||
|
|
#@41 Replace MATCH with the expanded abbrev.
|
|||
|
|
(defalias 'company-abbrev-insert #[(match) "\300 \207" [expand-abbrev] 1 (#$ . 496)])
|
|||
|
|
#@47 `company-mode' completion backend for abbrev.
|
|||
|
|
(defalias 'company-abbrev #[(command &optional arg &rest ignored) "\304\305\"\203\f \306\307\310\"\207\304\311\"\203 \312 \207\304\313\"\203- \314\315\316 \n\"\"\314\315\316 \"\"\244\207\304\317\"\2057 \320 !\207" [command arg global-abbrev-table local-abbrev-table eql interactive company-begin-backend company-abbrev company-abbrev-insert prefix company-grab-symbol candidates delete "" all-completions meta abbrev-expansion] 6 (#$ . 628) (list 'interactive)])
|
|||
|
|
(provide 'company-abbrev)
|