[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 318e10d8e7 1/4: Remove useless denote-sort--dire
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 318e10d8e7 1/4: Remove useless denote-sort--dired-buffer variable |
Date: |
Mon, 23 Jun 2025 15:58:13 -0400 (EDT) |
branch: externals/denote
commit 318e10d8e77786fb466f1cc8bc99aa78a8f69167
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Remove useless denote-sort--dired-buffer variable
I am not sure why that was there. Maybe we were relying on it at some
point but our code is not doing anything with it right now.
---
denote.el | 4 ----
1 file changed, 4 deletions(-)
diff --git a/denote.el b/denote.el
index 3ca404a304..2b77bc1c4e 100644
--- a/denote.el
+++ b/denote.el
@@ -1773,9 +1773,6 @@ OMIT-CURRENT have been applied."
(format-prompt "Exclude files matching REGEXP" default)
default 'denote-sort-exclude-files-history)))
-(defvar-local denote-sort--dired-buffer nil
- "Buffer object of current `denote-sort-dired'.")
-
(defun denote-sort-dired--prompts ()
"Return list of prompts per `denote-sort-dired-extra-prompts'."
(let (sort-by-component reverse-sort exclude-rx)
@@ -1863,7 +1860,6 @@ When called from Lisp, the arguments are a string, a
symbol among
(files (denote-sort-get-directory-files files-matching-regexp
component reverse-sort nil exclude-rx)))
(let ((dired-buffer (dired (cons default-directory (if single-dir-p
(mapcar #'file-relative-name files) files))))
(buffer-name (funcall denote-sort-dired-buffer-name-function
files-matching-regexp component reverse-sort exclude-rx)))
- (setq denote-sort--dired-buffer dired-buffer)
(with-current-buffer dired-buffer
(rename-buffer buffer-name :unique))
buffer-name)