# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1107459674 0
# Node ID 87be0a82769ac8328ccbf776f3e4d7c8436d4b48
# Parent  de5deb63979f21305a0121aa22ded4cfdccf7a1e
(help-with-tutorial): Make sure that users cannot remove the entire
text of the tutorial by means of `undo'.

diff -r de5deb63979f -r 87be0a82769a lisp/help-fns.el
--- a/lisp/help-fns.el	Thu Feb 03 16:20:22 2005 +0000
+++ b/lisp/help-fns.el	Thu Feb 03 19:41:14 2005 +0000
@@ -97,6 +97,7 @@
 	  (forward-line 1)
 	  (newline (- n (/ n 2)))))
       (goto-char (point-min))
+      (setq buffer-undo-list nil)
       (set-buffer-modified-p nil))))
 
 ;;;###autoload