diff options
author | Richard M. Stallman <rms@gnu.org> | 1998-08-12 02:58:02 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1998-08-12 02:58:02 +0000 |
commit | 9960e8a903c4a90a4b2cedac708d9229988ce8b4 (patch) | |
tree | 45654392818f76a900a799ad7c7fa212187bbcae | |
parent | b7db281a9788c216e9da2bd13c34c99e7f99d750 (diff) | |
download | emacs-9960e8a903c4a90a4b2cedac708d9229988ce8b4.tar.gz |
(recover-session): Add leading space on added text lines.
-rw-r--r-- | lisp/files.el | 10 |
1 files changed, 6 insertions, 4 deletions
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)) |