;ELC ;;; Compiled ;;; in Emacs version 25.3.1 ;;; 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!\207" [require company cl-lib] 2) (defvar company-oddmuse-link-regexp "\\(\\<[A-Z][[:alnum:]]*\\>\\)\\|\\[\\[\\([[:alnum:]]+\\>\\|\\)") (defalias 'company-oddmuse-get-page-table #[nil "\303\304\"\203 \305 !\207\303\306\"\205\307\n!\207" [major-mode yaoddmuse-wikiname oddmuse-wiki eql yaoddmuse-mode yaoddmuse-get-pagename-table oddmuse-mode oddmuse-make-completion-table] 3]) #@55 `company-mode' completion backend for `oddmuse-mode'. (defalias 'company-oddmuse #[(command &optional arg &rest ignored) "\305\306\"\203 \307\310!\207\305\311\"\203-\312\n\313>\205+\314 \315 \"\205+\316\317!\206+\316\320!)\207\305\321\"\2059\322\f\323 \"\207" [command case-fold-search major-mode company-oddmuse-link-regexp arg eql interactive company-begin-backend company-oddmuse prefix nil (oddmuse-mode yaoddmuse-mode) looking-back point-at-bol match-string 1 2 candidates all-completions company-oddmuse-get-page-table] 3 (#$ . 826) (list 'interactive)]) (provide 'company-oddmuse)