diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/files.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/files.el b/lisp/files.el index c8587b5c781..91da8a4c2c7 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -663,13 +663,12 @@ The truename of a file name is found by chasing symbolic links | |||
| 663 | both at the level of the file and at the level of the directories | 663 | both at the level of the file and at the level of the directories |
| 664 | containing it, until no links are left at any level. | 664 | containing it, until no links are left at any level. |
| 665 | 665 | ||
| 666 | The arguments COUNTER and PREV-DIRS are used only in recursive calls. | 666 | \(fn FILENAME)" |
| 667 | Do not specify them in other calls." | 667 | ;; COUNTER and PREV-DIRS are only used in recursive calls. |
| 668 | ;; COUNTER can be a cons cell whose car is the count of how many more links | 668 | ;; COUNTER can be a cons cell whose car is the count of how many |
| 669 | ;; to chase before getting an error. | 669 | ;; more links to chase before getting an error. |
| 670 | ;; PREV-DIRS can be a cons cell whose car is an alist | 670 | ;; PREV-DIRS can be a cons cell whose car is an alist |
| 671 | ;; of truenames we've just recently computed. | 671 | ;; of truenames we've just recently computed. |
| 672 | |||
| 673 | (cond ((or (string= filename "") (string= filename "~")) | 672 | (cond ((or (string= filename "") (string= filename "~")) |
| 674 | (setq filename (expand-file-name filename)) | 673 | (setq filename (expand-file-name filename)) |
| 675 | (if (string= filename "") | 674 | (if (string= filename "") |