branch: elpa/aidermacs
commit e598ae9e9a2f6ee00fe2865f9f9655e9a37a60dd
Author: springhan <3379184...@qq.com>
Commit: Matthew Zeng <matthew...@posteo.net>
Do not insert file name when adding file to session
---
aidermacs.el | 8 +++-----
1 file changed, 3 insertions(+), 5 deletions(-)
diff --git a/aidermacs.el b/aidermacs.el
index a1e2faaf80..16e3aa27d6 100644
--- a/aidermacs.el
+++ b/aidermacs.el
@@ -704,11 +704,9 @@ With prefix argument `C-u', add as READ-ONLY.
If current buffer is visiting a file, its name is used as initial input.
Multiple files can be selected by calling the command multiple times."
(interactive "P")
- (let* ((initial (when buffer-file-name
- (file-name-nondirectory buffer-file-name)))
- (file (expand-file-name
- (read-file-name "Select file to add: "
- nil nil t initial))))
+ (let ((file (expand-file-name
+ (read-file-name "Select file to add: "
+ nil nil t))))
(cond
((file-directory-p file)
(when (yes-or-no-p (format "Add all files in directory %s? " file))
