mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-18 21067e7cbe6d7a0f65ff5c317a96b5c337b0b3d8
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!\210\304\305\306\307\310\301%\210\311\312\306\313\314\315%\207" [require company cl-lib ispell custom-declare-group company-ispell nil "Completion backend using Ispell." :group custom-declare-variable company-ispell-dictionary "Dictionary to use for `company-ispell'.\nIf nil, use `ispell-complete-word-dict'." :type (choice (const :tag "default (nil)" nil) (file :tag "dictionary" t))] 6)
16 (defvar company-ispell-available 'unknown)
17 (byte-code "\300\301\302\303!\203\f\303\202 \304\"\207" [defalias company-ispell--lookup-words fboundp ispell-lookup-words lookup-words] 4)
18 (defalias 'company-ispell-available #[nil "\302=\203\"\3031\304\305!\210\306\2110\202!\307\310\311    !\"\210\312\211)\210\207" [company-ispell-available err unknown (error) company-ispell--lookup-words "WHATEVER" t message "Company-Ispell: %s" error-message-string nil] 4])
19 #@49 `company-mode' completion backend using Ispell.
20 (defalias 'company-ispell #[(command &optional arg &rest ignored) "\306\267\2021\307\310!\207\311 \2052\312 \207\313    \n\206 \"\314    \315\230\203' \202+\316     \"*\207\314\207\317\207\320\207" [command arg company-ispell-dictionary ispell-complete-word-dict completion-ignore-case words #s(hash-table size 5 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 18 sorted 45 ignore-case 47)) company-begin-backend company-ispell company-ispell-available company-grab-word company-ispell--lookup-words t "" all-completions keep-prefix nil] 3 (#$ . 1311) (list 'interactive)])
21 (provide 'company-ispell)