From 02f244c8ed2af96f446bbb24213baa9cdf13e082 Mon Sep 17 00:00:00 2001 From: Lute Kamstra Date: Thu, 3 Feb 2005 19:42:19 +0000 Subject: [PATCH] (help-with-tutorial): Make sure that users cannot remove the entire text of the tutorial by means of `undo'. --- lisp/ChangeLog | 5 +++++ lisp/help-fns.el | 1 + 2 files changed, 6 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2cf391c4807..60f02018012 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-02-03 Lute Kamstra + + * help-fns.el (help-with-tutorial): Make sure that users cannot + remove the entire text of the tutorial by means of `undo'. + 2005-02-03 Stefan Monnier * textmodes/ispell.el (ispell-internal-change-dictionary): Fix problem diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 9acadaa2fa6..4bf0a4775a0 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -97,6 +97,7 @@ With ARG, you are asked to choose which language." (forward-line 1) (newline (- n (/ n 2))))) (goto-char (point-min)) + (setq buffer-undo-list nil) (set-buffer-modified-p nil)))) ;;;###autoload