[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 2f42ff7bbd 5/6: Reposition some convenience comm
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 2f42ff7bbd 5/6: Reposition some convenience commands |
Date: |
Sun, 18 Sep 2022 08:57:31 -0400 (EDT) |
branch: externals/denote
commit 2f42ff7bbd1e52aba2b1f859df3c0a0f94fa660f
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Reposition some convenience commands
---
denote.el | 116 ++++++++++++++++++++++++++++++++------------------------------
1 file changed, 59 insertions(+), 57 deletions(-)
diff --git a/denote.el b/denote.el
index 30328814b4..090cd0d4f5 100644
--- a/denote.el
+++ b/denote.el
@@ -1484,6 +1484,65 @@ set to \\='(template title keywords)."
(defalias 'denote-create-note-with-template (symbol-function 'denote-template))
+;;;;; Other convenience commands
+
+;;;###autoload
+(defun denote-open-or-create (target)
+ "Visit file in variable `denote-directory'.
+If file does not exist, invoke `denote' to create a file."
+ (interactive (list (denote-file-prompt)))
+ (if (file-exists-p target)
+ (find-file target)
+ (call-interactively #'denote)))
+
+;;;###autoload
+(defun denote-open-or-create-with-date ()
+ "Invoke `denote-link-or-create' but also prompt for date.
+
+The date can be in YEAR-MONTH-DAY notation like 2022-06-30 or
+that plus the time: 2022-06-16 14:30. When the user option
+`denote-date-prompt-use-org-read-date' is non-nil, the date
+prompt uses the more powerful Org+calendar system.
+
+This is the equivalent to calling `denote-link-or-create' when
+`denote-prompts' is set to \\='(date title keywords)."
+ (declare (interactive-only t))
+ (interactive)
+ (let ((denote-prompts '(date title keywords)))
+ (call-interactively #'denote-open-or-create)))
+
+;;;###autoload
+(defun denote-open-or-create-with-type ()
+ "Invoke `denote-open-or-create' but also prompt for file type.
+This is the equivalent to calling `denote-open-or-create' when
+`denote-prompts' is set to \\='(type title keywords)."
+ (declare (interactive-only t))
+ (interactive)
+ (let ((denote-prompts '(type title keywords)))
+ (call-interactively #'denote-open-or-create)))
+
+;;;###autoload
+(defun denote-open-or-create-with-subdirectory ()
+ "Invoke `denote-open-or-create' but also prompt for subdirectory.
+This is the equivalent to calling `denote-open-or-create' when
+`denote-prompts' is set to \\='(subdirectory title keywords)."
+ (declare (interactive-only t))
+ (interactive)
+ (let ((denote-prompts '(subdirectory title keywords)))
+ (call-interactively #'denote-open-or-create)))
+
+;;;###autoload
+(defun denote-open-or-create-with-template ()
+ "Invoke `denote-open-or-create' but also prompt for template.
+This is the equivalent to calling `denote-open-or-create' when
+`denote-prompts' is set to \\='(template title keywords).
+
+For templates, refer to `denote-templates'."
+ (declare (interactive-only t))
+ (interactive)
+ (let ((denote-prompts '(template title keywords)))
+ (call-interactively #'denote-open-or-create)))
+
;;;; Note modification
;;;;; Common helpers for note modifications
@@ -2321,63 +2380,6 @@ For templates, refer to `denote-templates'."
(let ((denote-prompts '(template title keywords)))
(call-interactively #'denote-link-or-create)))
-;;;###autoload
-(defun denote-open-or-create (target)
- "Visit file in variable `denote-directory'.
-If file does not exist, invoke `denote' to create a file."
- (interactive (list (denote-file-prompt)))
- (if (file-exists-p target)
- (find-file target)
- (call-interactively #'denote)))
-
-;;;###autoload
-(defun denote-open-or-create-with-date ()
- "Invoke `denote-link-or-create' but also prompt for date.
-
-The date can be in YEAR-MONTH-DAY notation like 2022-06-30 or
-that plus the time: 2022-06-16 14:30. When the user option
-`denote-date-prompt-use-org-read-date' is non-nil, the date
-prompt uses the more powerful Org+calendar system.
-
-This is the equivalent to calling `denote-link-or-create' when
-`denote-prompts' is set to \\='(date title keywords)."
- (declare (interactive-only t))
- (interactive)
- (let ((denote-prompts '(date title keywords)))
- (call-interactively #'denote-open-or-create)))
-
-;;;###autoload
-(defun denote-open-or-create-with-type ()
- "Invoke `denote-open-or-create' but also prompt for file type.
-This is the equivalent to calling `denote-open-or-create' when
-`denote-prompts' is set to \\='(type title keywords)."
- (declare (interactive-only t))
- (interactive)
- (let ((denote-prompts '(type title keywords)))
- (call-interactively #'denote-open-or-create)))
-
-;;;###autoload
-(defun denote-open-or-create-with-subdirectory ()
- "Invoke `denote-open-or-create' but also prompt for subdirectory.
-This is the equivalent to calling `denote-open-or-create' when
-`denote-prompts' is set to \\='(subdirectory title keywords)."
- (declare (interactive-only t))
- (interactive)
- (let ((denote-prompts '(subdirectory title keywords)))
- (call-interactively #'denote-open-or-create)))
-
-;;;###autoload
-(defun denote-open-or-create-with-template ()
- "Invoke `denote-open-or-create' but also prompt for template.
-This is the equivalent to calling `denote-open-or-create' when
-`denote-prompts' is set to \\='(template title keywords).
-
-For templates, refer to `denote-templates'."
- (declare (interactive-only t))
- (interactive)
- (let ((denote-prompts '(template title keywords)))
- (call-interactively #'denote-open-or-create)))
-
;;;;; Link buttons
;; Evaluate: (info "(elisp) Button Properties")
- [elpa] externals/denote updated (92d85a2ed3 -> 73ffe18348), ELPA Syncer, 2022/09/18
- [elpa] externals/denote 5fedf8eaf6 3/6: Mention Org+calendar date prompt in denote-date, ELPA Syncer, 2022/09/18
- [elpa] externals/denote 2f42ff7bbd 5/6: Reposition some convenience commands,
ELPA Syncer <=
- [elpa] externals/denote 67c80d6766 4/6: Expand "link or create", "open or create" commands, ELPA Syncer, 2022/09/18
- [elpa] externals/denote 4c4187ee3a 2/6: Tweak denote-prompts doc string, ELPA Syncer, 2022/09/18
- [elpa] externals/denote 73ffe18348 6/6: Acknowledge Alan Schmitt for commit 570ac0e, ELPA Syncer, 2022/09/18
- [elpa] externals/denote 570ac0eebd 1/6: New utility functions, ELPA Syncer, 2022/09/18