HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4a65d2b
)
(set-visited-file-name): Avoid calling file-name-nondirectory with a
author
Luc Teirlinck
<teirllm@auburn.edu>
Sun, 10 Jul 2005 14:42:02 +0000
(14:42 +0000)
committer
Luc Teirlinck
<teirllm@auburn.edu>
Sun, 10 Jul 2005 14:42:02 +0000
(14:42 +0000)
nil argument.
lisp/files.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/files.el
b/lisp/files.el
index
0298007
..
f41a9b2
100644
(file)
--- a/
lisp/files.el
+++ b/
lisp/files.el
@@
-2545,7
+2545,7
@@
the old visited file has been renamed to the new name FILENAME."
(if find-file-visit-truename
(setq filename truename))))
(if filename
- (let ((new-name (file-name-nondirectory
buffer-file-
name)))
+ (let ((new-name (file-name-nondirectory
file
name)))
(if (string= new-name "")
(error "Empty file name"))))
(let ((buffer (and filename (find-buffer-visiting filename))))