(uniquify-rationalize-file-buffer-names): If
newbuffile is nil, don't call expand-file-name on it.
This commit is contained in:
parent
7ac098ffa9
commit
04f3a6563a
1 changed files with 2 additions and 1 deletions
|
@ -147,7 +147,8 @@ pathname elements. Arguments cause only a subset of buffers to be renamed."
|
|||
(while buffers
|
||||
(let* ((buffer (car buffers))
|
||||
(bfn (if (eq buffer newbuf)
|
||||
(expand-file-name newbuffile)
|
||||
(and newbuffile
|
||||
(expand-file-name newbuffile))
|
||||
(uniquify-buffer-file-name buffer)))
|
||||
(rawname (and bfn (file-name-nondirectory bfn)))
|
||||
(deserving (and rawname
|
||||
|
|
Loading…
Add table
Reference in a new issue