(desktop-save): Don't use concat to form a file

name, use expand-file-name.
This commit is contained in:
Gerd Moellmann 2001-08-09 15:50:09 +00:00
parent 6b48d742c0
commit 14d8c7f0c9

View file

@ -475,8 +475,7 @@ MODE is the major mode."
(interactive "DDirectory to save desktop file in: ")
(run-hooks 'desktop-save-hook)
(save-excursion
(let ((filename (expand-file-name
(concat dirname desktop-basefilename)))
(let ((filename (expand-file-name desktop-basefilename dirname))
(info (nreverse
(mapcar
(function