branch: externals/denote-org
commit 049e13770d9c407906f421a2b37f9c3989cc5afa
Author: Protesilaos Stavrou <[email protected]>
Commit: Protesilaos Stavrou <[email protected]>
Remove unused and incomplete code I have pushed without realising
---
denote-org.el | 101 ----------------------------------------------------------
1 file changed, 101 deletions(-)
diff --git a/denote-org.el b/denote-org.el
index 3b6133c5c0..b2e13f1076 100644
--- a/denote-org.el
+++ b/denote-org.el
@@ -40,107 +40,6 @@
:link '(url-link :tag "Denote homepage"
"https://protesilaos.com/emacs/denote";)
:link '(url-link :tag "Denote Org homepage"
"https://protesilaos.com/emacs/denote-org";))
-(defconst denote-org--common-extra-parameters
- '((list :inline t
- :not-regexp
- (choice (const :tag "Do not exclude anything" nil)
- (string :tag "Regular expression to exclude")))
- (list :inline t
- :excluded-dirs-regexp
- (choice (const :tag "Do not exclude directories" nil)
- (string :tag "Regular expression to exclude directories")))
- (list :inline t
- :sort-by-component
- ;; TODO 2025-07-30: Check the other sort options we provide.
- (choice (const :tag "Sort by title" title)
- (const :tag "Sort by signature" signature)
- (const :tag "Sort by keywords" keywords)))
- (list :inline t
- :reverse-sort
- (choice (const :tag "No reverse sort" nil)
- (const :tag "Reverse sort" t)))
- (list :inline t
- :id-only
- (choice (const :tag "Links with full description" nil)
- (const :tag "Links with just the identifier" t)))
- (list :inline t
- :include-date
- (choice (const :tag "Do not show the date" nil)
- (const :tag "Show the date" t))))
- "For use in the :type of `denote-org-extra-parameters-alist'.")
-
-(defcustom denote-org-extra-parameters-alist
- '((denote-links :not-regexp nil :excluded-dirs-regexp nil :sort-by-component
nil :reverse-sort nil :id-only nil :include-date nil)
- (denote-missing-links :not-regexp nil :excluded-dirs-regexp nil
:sort-by-component nil :reverse-sort nil :id-only nil :include-date nil)
- (denote-backlinks :not-regexp nil :excluded-dirs-regexp nil
:sort-by-component nil :reverse-sort nil :id-only nil :this-heading-only nil
:include-date nil)
- (denote-files :not-regexp nil :excluded-dirs-regexp nil :sort-by-component
title :reverse-sort nil :no-front-matter nil :file-separator nil :add-links nil)
- (denote-files-as-headings :not-regexp nil :excluded-dirs-regexp nil
:sort-by-component title :reverse-sort nil :add-links nil))
- "Extra parameters for each Denote Org dynamic block.
-Those are in addition to the mandatory parameters that will always be
-present in a dynamic block."
- :type '(set
- (list
- (list :inline t
- (const denote-links)
- (set
- (list :inline t
- :not-regexp
- (choice (const :tag "Do not exclude anything" nil)
- (string :tag "Regular expression to exclude")))
- (list :inline t
- :excluded-dirs-regexp
- (choice (const :tag "Do not exclude directories" nil)
- (string :tag "Regular expression to exclude
directories")))
- (list :inline t
- :sort-by-component
- ;; TODO 2025-07-30: Check the other sort options we
provide.
- (choice (const :tag "Sort by title" title)
- (const :tag "Sort by signature" signature)
- (const :tag "Sort by keywords" keywords)))
- (list :inline t
- :reverse-sort
- (choice (const :tag "No reverse sort" nil)
- (const :tag "Reverse sort" t)))
- (list :inline t
- :id-only
- (choice (const :tag "Links with full description" nil)
- (const :tag "Links with just the identifier"
t)))
- (list :inline t
- :include-date
- (choice (const :tag "Do not show the date" nil)
- (const :tag "Show the date" t)))))
-
- (list :inline t
- (const denote-missing-links)
- (set
- (list :inline t
- :excluded-dirs-regexp
- (choice (const :tag "Do not exclude directories" nil)
- (string :tag "Regular expression to exclude
directories")))
- (list :inline t
- :sort-by-component
- (choice (const :tag "Sort by title" title)
- (const :tag "Sort by title" signature)
- (const :tag "Sort by title" keywords)))
- (list :inline t
- :reverse-sort
- (choice (const :tag "No reverse sort" nil)
- (const :tag "Reverse sort" t)))
- (list :inline t
- :id-only
- (choice (const :tag "Links with full description" nil)
- (const :tag "Links with just the identifier"
t)))
- (list :inline t
- :include-date
- (choice (const :tag "Do not show the date" nil)
- (const :tag "Show the date" t)))))))
-
- ;; (const denote-missing-links)
- ;; (const denote-backlinks)
- ;; (const denote-files)
- ;; (const denote-files-as-headings))
- :group 'denote-org)
-
;;;; Link to file and heading
(defun denote-org--get-outline (file)
