Fix spacemacs/rename-current-buffer-file on non-file buffers.

fix issue #8415
This commit is contained in:
Igor Avdeev 2017-02-20 23:55:35 +03:00 committed by bmag
parent 7ce71c711f
commit 750563961f
1 changed files with 3 additions and 3 deletions

View File

@ -295,11 +295,11 @@ projectile cache when it's possible and update recentf list."
"Renames current buffer and file it is visiting."
(interactive)
(let* ((name (buffer-name))
(filename (buffer-file-name))
(dir (file-name-directory filename)))
(filename (buffer-file-name)))
(if (not (and filename (file-exists-p filename)))
(error "Buffer '%s' is not visiting a file!" name)
(let ((new-name (read-file-name "New name: " dir)))
(let* ((dir (file-name-directory filename))
(new-name (read-file-name "New name: " dir)))
(cond ((get-buffer new-name)
(error "A buffer named '%s' already exists!" new-name))
(t