From 0dc07483effb3b81aff45ae9744df256e33b22b5 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Wed, 9 Nov 1994 05:45:49 +0000 Subject: [PATCH] (ask-user-about-lock-help, ask-user-about-supersession-help): Set help-mode in *Help* buffer. --- lisp/userlock.el | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/userlock.el b/lisp/userlock.el index 316a1a4c892..ca4f216c0ac 100644 --- a/lisp/userlock.el +++ b/lisp/userlock.el @@ -76,7 +76,10 @@ already started modifying in EMACS. You can teal the file; The other user becomes the intruder if (s)he ever unmodifies the file and then changes it again. You can

roceed; you edit at your own (and the other user's) risk. -You can uit; don't modify this file."))) +You can 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 @@ you risk ruining the work of whoever rewrote the file. 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 -- 2.39.5