Mercurial > emacs
comparison lisp/files.el @ 13118:94df38316b4f
(recover-session): Use auto-save-list-file-prefix.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Wed, 04 Oct 1995 19:42:04 +0000 |
| parents | b4601a8c1e5c |
| children | 55c6e0f3c2f4 |
comparison
equal
deleted
inserted
replaced
| 13117:3753d2ea3ab1 | 13118:94df38316b4f |
|---|---|
| 2151 This command first displays a Dired buffer showing you the | 2151 This command first displays a Dired buffer showing you the |
| 2152 previous sessions that you could recover from. | 2152 previous sessions that you could recover from. |
| 2153 To choose one, move point to the proper line and then type C-c C-c. | 2153 To choose one, move point to the proper line and then type C-c C-c. |
| 2154 Then you'll be asked about a number of files to recover." | 2154 Then you'll be asked about a number of files to recover." |
| 2155 (interactive) | 2155 (interactive) |
| 2156 (dired "~/.save*") | 2156 (dired (concat auto-save-list-file-prefix "*")) |
| 2157 (goto-char (point-min)) | 2157 (goto-char (point-min)) |
| 2158 (or (looking-at "Move to the session you want to recover,") | 2158 (or (looking-at "Move to the session you want to recover,") |
| 2159 (let ((inhibit-read-only t)) | 2159 (let ((inhibit-read-only t)) |
| 2160 (insert "Move to the session you want to recover,\n" | 2160 (insert "Move to the session you want to recover,\n" |
| 2161 "then type C-c C-c to select it.\n\n" | 2161 "then type C-c C-c to select it.\n\n" |