branch: externals/denote
commit 24ab18b7051dbfbdc083e834dc981aa67f276d64
Author: Elias Storms <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Transform denote-org.el into denote-org-dblock.el
We narrow the scope of the additional code: it only introduces the Org
Dynamic block functionalities (rather than broader Org-mode
integration).
The file is renamed to denote-org-dblock.el and the commentary
updated. denote-org-extract-subtree is removed.
---
denote-org.el => denote-org-dblock.el | 29 ++++++++---------------------
1 file changed, 8 insertions(+), 21 deletions(-)
diff --git a/denote-org.el b/denote-org-dblock.el
similarity index 86%
rename from denote-org.el
rename to denote-org-dblock.el
index 82ac78a3ea..ad9415d757 100644
--- a/denote-org.el
+++ b/denote-org-dblock.el
@@ -1,4 +1,4 @@
-;;; denote-org.el --- Org-functionalities in addition to denote.el -*-
lexical-binding: t -*-
+;;; denote-org-dblock.el --- Org Dynamic blocks for denote.el -*-
lexical-binding: t -*-
;; Copyright (C) 2022 Free Software Foundation, Inc.
@@ -26,32 +26,19 @@
;;; Commentary:
;;
-;; This file provides specialized extensions to Denote that are
-;; specific to Org-mode. By "specialized", we refer to features that
-;; are likely not to be used in casual workflows.
+;; This file provides a specialized Org-mode extension to Denote: it
+;; introduces Org Dynamic blocks that collect links to Denote notes
+;; based on a provided regexp. In short, this automates
+;; 'denote-link-add-links' and 'denote-link-add-backlinks'.
+;;
+;; For more information, read the commented code below or refer to the
+;; Denote manual
;;; Code:
(require 'denote)
(require 'org)
-;;; Org-mode Subtree to new note
-
-;;;###autoload
-(defun denote-org-extract-subtree ()
- "Create new Denote note as an Org file using current Org subtree.
-
-The Org-tags are used as note keywords, and the subtree title as note title.
-This command deletes the original subtree."
- (interactive)
- (if-let ((text (org-get-entry))
- (heading (org-get-heading :no-tags :no-todo :no-priority
:no-comment)))
- (progn
- (delete-region (org-entry-beginning-position) (org-entry-end-position))
- (denote heading (org-get-tags) 'org)
- (insert text))
- (user-error "No subtree to extract; aborting")))
-
;;; Org-mode Dynamic blocks
;;;; Dynamic block to search links