# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 807488984 0
# Node ID 69dcdd99fd8d46596fad7799954c565847eab6cc
# Parent  b8e986069a5828ffbc9abbb4c194116ed1ac472c
(command-line-1): Mention recover-session if there's a .saves file.

diff -r b8e986069a58 -r 69dcdd99fd8d lisp/startup.el
--- a/lisp/startup.el	Thu Aug 03 17:39:53 1995 +0000
+++ b/lisp/startup.el	Thu Aug 03 22:29:44 1995 +0000
@@ -645,6 +645,12 @@
 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