aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/userlock.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/userlock.el')
-rw-r--r--lisp/userlock.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/userlock.el b/lisp/userlock.el
index 781023c7449..52a3eb176b6 100644
--- a/lisp/userlock.el
+++ b/lisp/userlock.el
@@ -38,7 +38,7 @@
38(defun ask-user-about-lock (file opponent) 38(defun ask-user-about-lock (file opponent)
39 "Ask user what to do when he wants to edit FILE but it is locked by OPPONENT. 39 "Ask user what to do when he wants to edit FILE but it is locked by OPPONENT.
40This function has a choice of three things to do: 40This function has a choice of three things to do:
41 do (signal 'file-locked (list FILE OPPONENT)) 41 do (signal \\='file-locked (list FILE OPPONENT))
42 to refrain from editing the file 42 to refrain from editing the file
43 return t (grab the lock on the file) 43 return t (grab the lock on the file)
44 return nil (edit the file even though it is locked). 44 return nil (edit the file even though it is locked).
@@ -101,7 +101,7 @@ You can <q>uit; don't modify this file.")
101(defun ask-user-about-supersession-threat (fn) 101(defun ask-user-about-supersession-threat (fn)
102 "Ask a user who is about to modify an obsolete buffer what to do. 102 "Ask a user who is about to modify an obsolete buffer what to do.
103This function has two choices: it can return, in which case the modification 103This function has two choices: it can return, in which case the modification
104of the buffer will proceed, or it can (signal 'file-supersession (file)), 104of the buffer will proceed, or it can (signal \\='file-supersession (file)),
105in which case the proposed buffer modification will not be made. 105in which case the proposed buffer modification will not be made.
106 106
107You can rewrite this to use any criterion you like to choose which one to do. 107You can rewrite this to use any criterion you like to choose which one to do.