Mercurial > emacs

comparison lisp/userlock.el @ 74258:26cf15a2cb37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ask-user-about-lock-help): Fix typos in output message.
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 27 Nov 2006 16:49:39 +0000
parents 3bd95f4f2941
children b2e5081b9320
comparison
equal deleted inserted replaced
74257:5c36efa11051 74258:26cf15a2cb37
85 (cdr answer)))) 85 (cdr answer))))
86 86
87 (defun ask-user-about-lock-help () 87 (defun ask-user-about-lock-help ()
88 (with-output-to-temp-buffer "*Help*" 88 (with-output-to-temp-buffer "*Help*"
89 (princ "It has been detected that you want to modify a file that someone else has 89 (princ "It has been detected that you want to modify a file that someone else has
90 already started modifying in EMACS. 90 already started modifying in Emacs.
91 91
92 You can <s>teal the file; The other user becomes the 92 You can <s>teal the file; the other user becomes the
93 intruder if (s)he ever unmodifies the file and then changes it again. 93 intruder if (s)he ever unmodifies the file and then changes it again.
94 You can <p>roceed; you edit at your own (and the other user's) risk. 94 You can <p>roceed; you edit at your own (and the other user's) risk.
95 You can <q>uit; don't modify this file.") 95 You can <q>uit; don't modify this file.")
96 (save-excursion 96 (save-excursion
97 (set-buffer standard-output) 97 (set-buffer standard-output)