diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-07-02 22:11:40 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-07-02 22:11:40 +0000 |
| commit | 2dc2b7363e2201aa935df4374909e61ffc15d1d0 (patch) | |
| tree | 2a179e15390e2d0b467af23add7b423a03ecc53c /lisp/files.el | |
| parent | 35aaf00cff31d60c5d1a06a7db872d1facb5a8b5 (diff) | |
| download | emacs-2dc2b7363e2201aa935df4374909e61ffc15d1d0.tar.gz | |
*** empty log message ***
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index f795278945c..42607ff5e79 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1227,7 +1227,8 @@ do the work." (with-output-to-temp-buffer "*Directory*" (buffer-disable-undo standard-output) (call-process "ls" nil standard-output nil - "-l" file file-name))) + (if (file-symlink-p file) "-lL" "-l") + file file-name))) (yes-or-no-p (format "Recover auto save file %s? " file-name))) (switch-to-buffer (find-file-noselect file t)) (let ((buffer-read-only nil)) |