emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/denote 95f8c14e48 03/17: Simplify denote-link-return-li


From: ELPA Syncer
Subject: [elpa] externals/denote 95f8c14e48 03/17: Simplify denote-link-return-links and denote-link-return-backlinks
Date: Thu, 23 Nov 2023 00:57:59 -0500 (EST)

branch: externals/denote
commit 95f8c14e48304370048ad492293d83dc94242455
Author: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>
Commit: Jean-Philippe Gagné Guay <jeanphilippe150@gmail.com>

    Simplify denote-link-return-links and denote-link-return-backlinks
---
 denote.el | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/denote.el b/denote.el
index 8e97603835..90cfed9079 100644
--- a/denote.el
+++ b/denote.el
@@ -3124,10 +3124,9 @@ Also see `denote-link-return-backlinks'."
   (when-let ((current-file (or file (buffer-file-name)))
              ((denote-file-has-supported-extension-p current-file))
              (file-type (denote-filetype-heuristics current-file))
-             (regexp (denote--link-in-context-regexp file-type))
-             (links (with-current-buffer (find-file-noselect current-file)
-                      (denote-link--expand-identifiers regexp))))
-    links))
+             (regexp (denote--link-in-context-regexp file-type)))
+    (with-current-buffer (find-file-noselect current-file)
+      (denote-link--expand-identifiers regexp))))
 
 (defalias 'denote-link-return-forelinks 'denote-link-return-links
   "Alias for `denote-link-return-links'.")
@@ -3150,9 +3149,8 @@ Also see `denote-link-return-backlinks'."
   "Return list of backlinks in current or optional FILE.
 Also see `denote-link-return-links'."
   (when-let ((current-file (or file (buffer-file-name)))
-             (id (denote-retrieve-filename-identifier current-file))
-             (backlinks (delete current-file (denote--retrieve-files-in-xrefs 
id))))
-    backlinks))
+             (id (denote-retrieve-filename-identifier current-file)))
+    (delete current-file (denote--retrieve-files-in-xrefs id))))
 
 (define-obsolete-function-alias
   'denote-link-find-backlink



reply via email to

[Prev in Thread] Current Thread [Next in Thread]