diff options
author | Richard M. Stallman <rms@gnu.org> | 1995-08-03 22:29:44 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1995-08-03 22:29:44 +0000 |
commit | 9b4bb75ea92c0f32d5444a494083f8dd2e8847d4 (patch) | |
tree | 42117667b14fbf800753af9140eef6bd3d7f9804 /lisp | |
parent | 58d84dc2b3b70352093276853cf86b8ba105c2cc (diff) | |
download | emacs-9b4bb75ea92c0f32d5444a494083f8dd2e8847d4.tar.gz |
(command-line-1): Mention recover-session if there's a .saves file.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/startup.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index a21a2041c15..0bccb4f4bec 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -645,6 +645,12 @@ Type C-h C-d for information on getting the latest version.") GNU Emacs comes with ABSOLUTELY NO WARRANTY; type \\[describe-no-warranty] for full details. You may give out copies of Emacs; type \\[describe-copying] to see the conditions. Type \\[describe-distribution] for information on getting the latest version."))) + + (if (directory-files "~/" nil "\\`\\.saves-" t) + (insert "\n\nIf an Emacs session crashed recently,\n" + "type M-x recover-session RET to recover" + " the files you were editing.)) + (set-buffer-modified-p nil) (sit-for 120)) (save-excursion |