| 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!\207" [require company cl-lib] 2) | |
| 16 | (defvar company-oddmuse-link-regexp "\\(\\<[A-Z][[:alnum:]]*\\>\\)\\|\\[\\[\\([[:alnum:]]+\\>\\|\\)") | |
| 17 | (defalias 'company-oddmuse-get-page-table #[nil "\303\267\202 \304 !\207\305\n!\207\306\207" [major-mode yaoddmuse-wikiname oddmuse-wiki #s(hash-table size 2 test eql 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]) | |
| 18 | #@55 `company-mode' completion backend for `oddmuse-mode'. | |
| 19 | (defalias 'company-oddmuse #[(command &optional arg &rest ignored) "\305\267\202+ \306\307!\207\310\n\311>\205# \312 \313 \"\205# \314\315!\206# \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 eql 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 point-at-bol match-string 1 2 all-completions company-oddmuse-get-page-table] 3 (#$ . 907) (list 'interactive)]) | |
| 20 | (provide 'company-oddmuse) | |
