| | 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) |
projects / config.git / blame_incremental