Mercurial > emacs
diff lisp/startup.el @ 81692:5daa11039ff2
(command-line): Set buffer-offer-save in *scratch* and enable auto-save in it.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 03 Jul 2007 02:54:42 +0000 |
parents | 0e3f82f9067d |
children | 55013a02cac0 0ece58f6e0aa 988f1edc9674 |
line wrap: on
line diff
--- a/lisp/startup.el Tue Jul 03 02:54:27 2007 +0000 +++ b/lisp/startup.el Tue Jul 03 02:54:42 2007 +0000 @@ -1055,7 +1055,10 @@ (if (get-buffer "*scratch*") (with-current-buffer "*scratch*" (if (eq major-mode 'fundamental-mode) - (funcall initial-major-mode)))) + (funcall initial-major-mode)) + ;; Don't lose text that users type in *scratch*. + (setq buffer-offer-save t) + (auto-save-mode 1))) ;; Load library for our terminal type. ;; User init file can set term-file-prefix to nil to prevent this.