From: Richard M. Stallman Date: Wed, 12 Aug 1998 02:58:02 +0000 (+0000) Subject: (recover-session): Add leading space on added text lines. X-Git-Tag: emacs-20.3~79 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d6046e457f578c8494afdd0f3a7ab1282927be13;p=emacs.git (recover-session): Add leading space on added text lines. --- diff --git a/lisp/files.el b/lisp/files.el index bc2a666b023..d3c8629759d 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2747,10 +2747,12 @@ Then you'll be asked about a number of files to recover." (goto-char (point-min)) (or (looking-at "Move to the session you want to recover,") (let ((inhibit-read-only t)) - (insert "Move to the session you want to recover,\n" - "then type C-c C-c to select it.\n\n" - "You can also delete some of these files;\n" - "type d on a line to mark that file for deletion.\n\n"))) + ;; Each line starts with a space + ;; so that Font Lock mode won't highlight the first character. + (insert " Move to the session you want to recover,\n" + " then type C-c C-c to select it.\n\n" + " You can also delete some of these files;\n" + " type d on a line to mark that file for deletion.\n\n"))) (use-local-map (nconc (make-sparse-keymap) (current-local-map))) (define-key (current-local-map) "\C-c\C-c" 'recover-session-finish))