diff options
Diffstat (limited to 'lisp/ss-denote.el')
| -rw-r--r-- | lisp/ss-denote.el | 49 |
1 files changed, 0 insertions, 49 deletions
diff --git a/lisp/ss-denote.el b/lisp/ss-denote.el deleted file mode 100644 index 65b9b53..0000000 --- a/lisp/ss-denote.el +++ /dev/null @@ -1,49 +0,0 @@ -;;; ss-denote.el --- Denote configuration -*- lexical-binding: t; -*- - -;;; Commentary: - -;; Durable note creation and Denote integration. - -;;; Code: - -(require 'ss-core) - -(declare-function denote-keywords-prompt "denote") -(declare-function denote-org-capture "denote") -(declare-function denote-org-capture-with-prompts "denote") - -(defun ss-denote-capture-in-directory (directory &optional keywords &rest prompts) - "Start a Denote Org capture in DIRECTORY with KEYWORDS and PROMPTS. -If PROMPTS is empty, rely on `denote-prompts'." - (let* ((prompt-for-keywords (memq :keywords prompts)) - (directory (ss-require-existing-directory directory)) - (denote-directory directory) - (denote-use-directory (unless (memq :subdirectory prompts) directory)) - (denote-use-keywords - (if prompt-for-keywords - (delete-dups (append keywords (denote-keywords-prompt))) - keywords))) - (if prompts - (denote-org-capture-with-prompts - (memq :title prompts) - nil - (memq :subdirectory prompts) - (memq :date prompts) - (memq :template prompts)) - (denote-org-capture)))) - -(defun ss-denote-setup () - "Initialize Denote." - (use-package denote - :ensure t - :after org - :config - (setq denote-directory ss-org-directory - denote-known-keywords '("project") - denote-prompts '(title keywords) - denote-org-capture-specifiers "%?") - (denote-rename-buffer-mode 1))) - -(provide 'ss-denote) - -;;; ss-denote.el ends here |
