From 2eea6a545fdf9b26a3d62a42b07556e904b5af01 Mon Sep 17 00:00:00 2001 From: JaeYoo-Im Date: Thu, 9 Sep 2021 18:19:42 +0900 Subject: [PATCH] =?UTF-8?q?=F0=9F=90=81company=20org=20mode=20support=20ad?= =?UTF-8?q?ded.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .emacs.d.vanilla/emacs.org | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) diff --git a/.emacs.d.vanilla/emacs.org b/.emacs.d.vanilla/emacs.org index 22b4e06..0fcb15c 100644 --- a/.emacs.d.vanilla/emacs.org +++ b/.emacs.d.vanilla/emacs.org @@ -427,6 +427,24 @@ https://nathantypanski.com/blog/2014-08-03-a-vim-like-emacs-config.html ;;:hook (company-mode . company-box-mode)) #+end_src ++ ORG mode =#+= Candidates +https://emacs.stackexchange.com/a/30691 + #+begin_src emacs-lisps + ;; (defun org-keyword-backend (command &optional arg &rest ignored) + ;; (interactive (list 'interactive)) + ;; (cl-case command + ;; (interactive (company-begin-backend 'org-keyword-backend)) + ;; (prefix (and (eq major-mode 'org-mode) + ;; (cons (company-grab-line "^#\\+\\(\\w*\\)" 1) + ;; t))) + ;; (candidates (mapcar #'upcase + ;; (cl-remove-if-not + ;; (lambda (c) (string-prefix-p arg c)) + ;; (pcomplete-completions)))) + ;; (ignore-case t) + ;; (duplicates t))) + ;; (add-to-list 'company-backends 'org-keyword-backend) + #+end_src ** Prescient #+begin_src emacs-lisp (use-package prescient @@ -665,6 +683,7 @@ https://nathantypanski.com/blog/2014-08-03-a-vim-like-emacs-config.html ("XXX" font-lock-constant-face bold)))) #+end_src * Org mode ++ Initial Setup #+begin_src emacs-lisp (defun efs/org-mode-setup () (org-indent-mode)