[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/crux f8789f67a9: Tweak a couple of messages
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/crux f8789f67a9: Tweak a couple of messages |
Date: |
Mon, 21 Nov 2022 04:58:29 -0500 (EST) |
branch: elpa/crux
commit f8789f67a9d2e1eb31a0e4531aec9bb6d6ec1282
Author: Bozhidar Batsov <bozhidar@batsov.dev>
Commit: Bozhidar Batsov <bozhidar@batsov.dev>
Tweak a couple of messages
---
crux.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/crux.el b/crux.el
index deb45d9f93..bc5c741a6e 100644
--- a/crux.el
+++ b/crux.el
@@ -417,11 +417,12 @@ there's a region, all lines that region covers will be
duplicated."
(when-let* ((filename (buffer-file-name))
(new-name (or (read-file-name "New name: " (file-name-directory
filename) nil 'confirm)))
(containing-dir (file-name-directory new-name)))
+ ;; make sure the current buffer is saved and backed by some file
(when (or (buffer-modified-p) (not (file-exists-p filename)))
- (if (y-or-n-p "Can't move file before saving. Would you like to save it
now?")
+ (if (y-or-n-p "Can't move file before saving it. Would you like to save
it now?")
(save-buffer)))
(if (get-file-buffer new-name)
- (message "Already editing new file name")
+ (message "There already exists a buffer named %s" new-name)
(progn
(make-directory containing-dir t)
(cond
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/crux f8789f67a9: Tweak a couple of messages,
ELPA Syncer <=