From fb3afe8779daaa1ee72d6b62cefea79c219e4acd Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 3 Aug 1995 22:29:44 +0000 Subject: [PATCH] (command-line-1): Mention recover-session if there's a .saves file. --- lisp/startup.el | 6 ++++++ 1 file changed, 6 insertions(+) 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 -- 2.39.2