branch: externals/denote
commit d915fae73df60ac45959e8bb1d69b09d5dace990
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Move two denote-query user options closer to their group
---
denote.el | 122 +++++++++++++++++++++++++++++++-------------------------------
1 file changed, 61 insertions(+), 61 deletions(-)
diff --git a/denote.el b/denote.el
index 694aca09ae..5da8594dbf 100644
--- a/denote.el
+++ b/denote.el
@@ -596,69 +596,8 @@ command."
:link '(info-link "(denote) The denote-templates option")
:group 'denote)
-(make-obsolete-variable 'denote-backlinks-show-context nil "4.0.0")
-
(make-obsolete-variable 'denote-rename-no-confirm 'denote-rename-confirmations
"3.0.0")
-(define-obsolete-variable-alias
- 'denote-link-backlinks-display-buffer-action
- 'denote-backlinks-display-buffer-action
- "3.1.0")
-
-(defcustom denote-backlinks-display-buffer-action
- '((display-buffer-reuse-mode-window display-buffer-below-selected)
- (mode . denote-query-mode)
- (window-height . fit-window-to-buffer))
- "The action used to display the current file's backlinks buffer.
-
-The value has the form (FUNCTION . ALIST), where FUNCTION is
-either an \"action function\", a list thereof, or possibly an
-empty list. ALIST is a list of \"action alist\" which may be
-omitted (or be empty).
-
-Sample configuration to display the buffer in a side window on
-the left of the Emacs frame:
-
- (setq denote-backlinks-display-buffer-action
- (quote ((display-buffer-reuse-window display-buffer-in-side-window)
- (side . left)
- (slot . 99)
- (window-width . 0.3)
- (dedicated . t)
- (preserve-size . (t . t)))))
-
-See Info node `(elisp) Displaying Buffers' for more details
-and/or the documentation string of `display-buffer'."
- :risky t
- :type `(choice
- (alist :key-type
- (choice :tag "Condition"
- regexp
- (function :tag "Matcher function"))
- :value-type ,display-buffer--action-custom-type)
- (function :tag "Custom function to return an action alist"))
- :package-version '(denote . "3.1.0")
- :group 'denote)
-
-(defcustom denote-query-links-display-buffer-action
- '((display-buffer-reuse-mode-window display-buffer-below-selected)
- (mode . (denote-query-mode dired))
- (window-height . 0.3)
- (preserve-size . (t . t)))
- "The action used to display query links.
-This is the same as `denote-backlinks-display-buffer-action'. Refer to
-its documentation for the technicalities."
- :risky t
- :type `(choice
- (alist :key-type
- (choice :tag "Condition"
- regexp
- (function :tag "Matcher function"))
- :value-type ,display-buffer--action-custom-type)
- (function :tag "Custom function to return an action alist"))
- :package-version '(denote . "4.0.0")
- :group 'denote)
-
(defcustom denote-rename-confirmations '(rewrite-front-matter modify-file-name)
"Make renaming commands prompt for confirmations.
@@ -5154,6 +5093,67 @@ others."
"Integration between Denote and Xref for grep/query/backlink buffers."
:group 'denote)
+(make-obsolete-variable 'denote-backlinks-show-context nil "4.0.0")
+
+(define-obsolete-variable-alias
+ 'denote-link-backlinks-display-buffer-action
+ 'denote-backlinks-display-buffer-action
+ "3.1.0")
+
+(defcustom denote-backlinks-display-buffer-action
+ '((display-buffer-reuse-mode-window display-buffer-below-selected)
+ (mode . denote-query-mode)
+ (window-height . fit-window-to-buffer))
+ "The action used to display the current file's backlinks buffer.
+
+The value has the form (FUNCTION . ALIST), where FUNCTION is
+either an \"action function\", a list thereof, or possibly an
+empty list. ALIST is a list of \"action alist\" which may be
+omitted (or be empty).
+
+Sample configuration to display the buffer in a side window on
+the left of the Emacs frame:
+
+ (setq denote-backlinks-display-buffer-action
+ (quote ((display-buffer-reuse-window display-buffer-in-side-window)
+ (side . left)
+ (slot . 99)
+ (window-width . 0.3)
+ (dedicated . t)
+ (preserve-size . (t . t)))))
+
+See Info node `(elisp) Displaying Buffers' for more details
+and/or the documentation string of `display-buffer'."
+ :risky t
+ :type `(choice
+ (alist :key-type
+ (choice :tag "Condition"
+ regexp
+ (function :tag "Matcher function"))
+ :value-type ,display-buffer--action-custom-type)
+ (function :tag "Custom function to return an action alist"))
+ :package-version '(denote . "3.1.0")
+ :group 'denote-query)
+
+(defcustom denote-query-links-display-buffer-action
+ '((display-buffer-reuse-mode-window display-buffer-below-selected)
+ (mode . (denote-query-mode dired))
+ (window-height . 0.3)
+ (preserve-size . (t . t)))
+ "The action used to display query links.
+This is the same as `denote-backlinks-display-buffer-action'. Refer to
+its documentation for the technicalities."
+ :risky t
+ :type `(choice
+ (alist :key-type
+ (choice :tag "Condition"
+ regexp
+ (function :tag "Matcher function"))
+ :value-type ,display-buffer--action-custom-type)
+ (function :tag "Custom function to return an action alist"))
+ :package-version '(denote . "4.0.0")
+ :group 'denote-query)
+
(defcustom denote-query-format-heading-function #'identity
"Function used to construct headings for files matched by a query.
