changeset 9843:f96b7683e3c5

(ask-user-about-lock-help, ask-user-about-supersession-help): Set help-mode in *Help* buffer.
author Karl Heuer <kwzh@gnu.org>
date Wed, 09 Nov 1994 05:45:49 +0000
parents 6f9b0830f124
children 089ea68c1fdb
files lisp/userlock.el
diffstat 1 files changed, 8 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/userlock.el	Wed Nov 09 05:45:00 1994 +0000
+++ b/lisp/userlock.el	Wed Nov 09 05:45:49 1994 +0000
@@ -76,7 +76,10 @@
 You can <s>teal the file; The other user becomes the
   intruder if (s)he ever unmodifies the file and then changes it again.
 You can <p>roceed; you edit at your own (and the other user's) risk.
-You can <q>uit; don't modify this file.")))
+You can <q>uit; don't modify this file.")
+    (save-excursion
+      (set-buffer standard-output)
+      (help-mode))))
 
 (put
  'file-supersession 'error-conditions '(file-supersession file-error error))
@@ -129,6 +132,9 @@
 If you say `n', the change you started to make will be aborted.
 
 Usually, you should type `n' and then `M-x revert-buffer',
-to get the latest version of the file, then make the change again.")))
+to get the latest version of the file, then make the change again.")
+    (save-excursion
+      (set-buffer standard-output)
+      (help-mode))))
 
 ;;; userlock.el ends here