Mercurial > emacs
changeset 2600:615f7101473a
(file-truename): Undo last change.
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Wed, 28 Apr 1993 17:33:42 +0000 |
| parents | 5122736c0a03 |
| children | c6fef1c54d00 |
| files | lisp/files.el |
| diffstat | 1 files changed, 1 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Wed Apr 28 17:08:18 1993 +0000 +++ b/lisp/files.el Wed Apr 28 17:33:42 1993 +0000 @@ -314,10 +314,7 @@ both at the level of the file and at the level of the directories containing it, until no links are left at any level." (if (string= filename "~") - (progn - (setq filename (expand-file-name filename)) - (if (string= filename "") - (setq filename "/")))) + (setq filename (expand-file-name filename))) (let ((handler (find-file-name-handler filename))) ;; For file name that has a special handler, call handler. ;; This is so that ange-ftp can save time by doing a no-op.