summaryrefslogtreecommitdiff
path: root/lisp/userlock.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2002-09-27 19:08:41 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2002-09-27 19:08:41 +0000
commit9156807006bc584deb9723ccbc0fd98ff9a6b4fd (patch)
treec03edf9a07a331fbc24c475bf5ecc8dea3a79bdb /lisp/userlock.el
parent5b8b9fa77678cc56db02224a26e209b7c0e4d827 (diff)
downloademacs-9156807006bc584deb9723ccbc0fd98ff9a6b4fd.tar.gz
(ask-user-about-supersession-threat): Don't abort when the user hits mouse-2.
Diffstat (limited to 'lisp/userlock.el')
-rw-r--r--lisp/userlock.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/userlock.el b/lisp/userlock.el
index 3b3d1fbd728..752c3bc90c7 100644
--- a/lisp/userlock.el
+++ b/lisp/userlock.el
@@ -115,7 +115,7 @@ The buffer in question is current when this function is called."
(message "%s changed on disk; really edit the buffer? (y, n, r or C-h) "
(file-name-nondirectory fn))
(let ((tem (downcase (let ((cursor-in-echo-area t))
- (read-char)))))
+ (read-char-exclusive)))))
(setq answer
(if (= tem help-char)
'help