]>
Commit | Line | Data |
---|---|---|
53e6db90 DC |
1 | ;ELC\1c\0\0\0 |
2 | ;;; Compiled | |
3 | ;;; in Emacs version 28.2 | |
4 | ;;; with all optimizations. | |
5 | ||
6 | ||
7 | ||
8 | (byte-code "\300\301!\210\300\302!\207" [require company cl-lib] 2) | |
9 | (defvar company-oddmuse-link-regexp "\\(\\<[A-Z][[:alnum:]]*\\>\\)\\|\\[\\[\\([[:alnum:]]+\\>\\|\\)") | |
10 | (defalias 'company-oddmuse-get-page-table #[nil "\b\303\267\202\ e\0\304 !\207\305\n!\207\306\207" [major-mode yaoddmuse-wikiname oddmuse-wiki #s(hash-table size 2 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (yaoddmuse-mode 6 oddmuse-mode 10)) yaoddmuse-get-pagename-table oddmuse-make-completion-table nil] 2]) | |
11 | #@55 `company-mode' completion backend for `oddmuse-mode'.\1f | |
12 | (defalias 'company-oddmuse #[(command &optional arg &rest ignored) "\b\305\267\202+\0\306\307!\207\310\19\n\311>\205#\0\312\v\313 \"\205#\0\314\315!\206#\0\314\316!)\207\317\f\320 \"\207\310\207" [command case-fold-search major-mode company-oddmuse-link-regexp arg #s(hash-table size 3 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (interactive 6 prefix 10 candidates 37)) company-begin-backend company-oddmuse nil (oddmuse-mode yaoddmuse-mode) looking-back line-beginning-position match-string 1 2 all-completions company-oddmuse-get-page-table] 3 (#$ . 582) (list 'interactive)]) | |
13 | (provide 'company-oddmuse) |