Commit d6046e45 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(recover-session): Add leading space on added text lines.

parent c4c65c33
......@@ -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))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment