[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/denote 6b200b31ef 308/355: Simplify denote-dired--renam
From: |
ELPA Syncer |
Subject: |
[elpa] externals/denote 6b200b31ef 308/355: Simplify denote-dired--rename-buffer |
Date: |
Sun, 26 Jun 2022 23:58:35 -0400 (EDT) |
branch: externals/denote
commit 6b200b31ef8ec51780a3febad5744d18c06936fe
Author: Damien Cassou <damien@cassou.me>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Simplify denote-dired--rename-buffer
The new code is basically what `dired-rename-file' does.
---
denote-dired.el | 16 +++-------------
1 file changed, 3 insertions(+), 13 deletions(-)
diff --git a/denote-dired.el b/denote-dired.el
index 1e10ae264e..026dc6f6bb 100644
--- a/denote-dired.el
+++ b/denote-dired.el
@@ -180,19 +180,9 @@ everything works as intended."
(defun denote-dired--rename-buffer (old-name new-name)
"Rename OLD-NAME buffer to NEW-NAME, when appropriate."
- (when-let ((old-buf (find-buffer-visiting old-name)))
- (with-current-buffer old-buf
- ;; We get the window to replace the buffer without affecting the
- ;; window layout.
- (let ((win (get-buffer-window old-buf)))
- (rename-buffer (file-name-nondirectory new-name))
- ;; TODO 2022-06-17: Is there a better way to avoid duplication
- ;; between old and new? It seems wrong to kill-buffer and then
- ;; find-file.
- (kill-buffer (find-buffer-visiting old-name))
- (when win
- (with-selected-window win
- (find-file new-name)))))))
+ (when-let* ((buffer (find-buffer-visiting old-name)))
+ (with-current-buffer buffer
+ (set-visited-file-name new-name nil t))))
(defun denote-dired--rename-dired-file-or-prompt ()
"Return Dired file at point, else prompt for one."
- [elpa] externals/denote bb0211aa66 280/355: Fix indentantion in one point, (continued)
- [elpa] externals/denote bb0211aa66 280/355: Fix indentantion in one point, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 27e02a0436 329/355: Add outline heading for denote-link-add-links, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 51db899aab 284/355: Clarify doc string of internal display-buffer fn, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 0cc0e609ed 276/355: Add minor clarification, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 66bb8083ec 323/355: Tweak indentation of function, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 2fdd20dc0f 311/355: Tweak spacing in denote-org-capture.el Commentary, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 8c7808eab8 328/355: Remove completed to-do about links, backlinks, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 1b71e736c8 336/355: Fix format for denote-org-front-matter, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 5a1b05d6c7 310/355: Update denote.el Commentary, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 047b396f16 314/355: Remove superfluous word, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 6b200b31ef 308/355: Simplify denote-dired--rename-buffer,
ELPA Syncer <=
- [elpa] externals/denote 1b5634ba1c 324/355: Clarify that xrefs are returned as an alist, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 6985217de6 350/355: Set denote-link-use-org-id to t in sample config, ELPA Syncer, 2022/06/27
- [elpa] externals/denote d6543cfa0d 333/355: Add support for org-id, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 72f77178af 344/355: Refine denote-link-use-org-id doc string, ELPA Syncer, 2022/06/27
- [elpa] externals/denote f307e32693 011/355: Expand the README, ELPA Syncer, 2022/06/27
- [elpa] externals/denote bfb2cdefd7 195/355: Rewrite manual on links (getting closer to v0.1.0), ELPA Syncer, 2022/06/27
- [elpa] externals/denote e37e429844 198/355: Add possible to-do for using xref, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 2327b5beb6 212/355: Add helper FNs to return title and date values, ELPA Syncer, 2022/06/27
- [elpa] externals/denote 98113698a7 202/355: Expand sample configuration, ELPA Syncer, 2022/06/27
- [elpa] externals/denote cbaab43170 240/355: Update Acknowledgement: svnsbck => Sven Seebeck, ELPA Syncer, 2022/06/27