mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(set-visited-file-name): Avoid crash if TRUENAME is nil.

Browse source
This commit is contained in:
Richard M. Stallman 1994-07-05 22:36:54 +00:00
parent ba9f641384
commit 4826e97fbc
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/files.el
View file

@ -1232,7 +1232,8 @@ if you wish to pass an empty string as the argument."
(rename-buffer new-name t))))
(setq buffer-backed-up nil)
(clear-visited-file-modtime)
(setq buffer-file-truename (abbreviate-file-name truename))
(if truename
(setq buffer-file-truename (abbreviate-file-name truename)))
(setq buffer-file-number
(if filename
(nth 10 (file-attributes buffer-file-name))