[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 86f91ea3fa 09/12: Fix regression with how 'denot
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 86f91ea3fa 09/12: Fix regression with how 'denote-link' was called |
Date: |
Mon, 25 Sep 2023 09:58:16 -0400 (EDT) |
branch: externals/denote
commit 86f91ea3fa636c9fc30952d1fd79dbdcdb52ed0f
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Fix regression with how 'denote-link' was called
These were caused by commit 2e444f3.
---
denote.el | 18 +++++++++++++++---
1 file changed, 15 insertions(+), 3 deletions(-)
diff --git a/denote.el b/denote.el
index 173a5aeb84..89ed9cf9f5 100644
--- a/denote.el
+++ b/denote.el
@@ -3169,7 +3169,12 @@ file."
(call-interactively #'denote)
(save-buffer)
(setq path (buffer-file-name)))
- (denote-link path id-only)))
+ (let ((type (denote-filetype-heuristics path)))
+ (denote-link
+ path
+ type
+ (denote--link-get-description path type)
+ id-only))))
;;;###autoload
(defun denote-link-after-creating-with-command (command &optional id-only)
@@ -3188,7 +3193,14 @@ Optional ID-ONLY has the same meaning as in the command
(call-interactively command)
(save-buffer)
(setq path (buffer-file-name)))
- (denote-link path id-only)))
+ (let ((type (denote-filetype-heuristics path)))
+ (denote-link
+ path
+ type
+ (if (eq command 'denote-signature)
+ (denote--link-get-description-with-signature path type)
+ (denote--link-get-description path type))
+ id-only))))
;;;###autoload
(defun denote-link-or-create (target &optional id-only)
@@ -3210,7 +3222,7 @@ consists of just the identifier. Else try to also
include the
file's title. This has the same meaning as in `denote-link'."
(interactive (list (denote-file-prompt) current-prefix-arg))
(if (and target (file-exists-p target))
- (denote-link target id-only)
+ (denote-link target (denote-filetype-heuristics target) target id-only)
(denote--command-with-title-history #'denote-link-after-creating)))
(defalias 'denote-link-to-existing-or-new-note 'denote-link-or-create
- [elpa] externals/denote 3a9404cd37 04/12: Add new denote-link-with-signature command, (continued)
- [elpa] externals/denote 3a9404cd37 04/12: Add new denote-link-with-signature command, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 2e444f3f22 03/12: BREAKING make 'denote-file-prompt' accept optional regexp filter, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 15bb6fe2f8 07/12: Make 'denote-command-prompt' return symbol, ELPA Syncer, 2023/09/25
- [elpa] externals/denote cc83083117 10/12: Add FIXME to avoid duplication with "link after creating" commands, ELPA Syncer, 2023/09/25
- [elpa] externals/denote f74c6380d3 08/12: Include default value in 'denote-command-prompt', ELPA Syncer, 2023/09/25
- [elpa] externals/denote beb1fc6d98 06/12: Fix prompt text in 'denote-command-prompt', ELPA Syncer, 2023/09/25
- [elpa] externals/denote ccdcbfb7b7 12/12: Placate the compiler about double space after dots in docs, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 45fe76ca24 05/12: Make denote-file-prompt record history, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 3ad974396d 02/12: Make 'denote-link' more abstract to also call it from Lisp, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 34c632c690 11/12: Simplify denote-dired-rename-marked-files interactive spec, ELPA Syncer, 2023/09/25
- [elpa] externals/denote 86f91ea3fa 09/12: Fix regression with how 'denote-link' was called,
ELPA Syncer <=