* lisp/userlock.el (ask-user-about-supersession-threat): Accept 'y' strictly.

(Bug#51101)
2021-10-10 20:27:29 +03:00
parent ae61d7a57d
commit 013e3be832
1 changed files with 3 additions and 1 deletions
--- a/lisp/userlock.el
+++ b/lisp/userlock.el
@@ -194,7 +194,9 @@ really edit the buffer? (%s, %s, %s or %s) "
 		       (list "File reverted" filename)))
 	      ((eq answer ?n)
 	       (signal 'file-supersession
-		       (list "File changed on disk" filename)))))
+		       (list "File changed on disk" filename)))
+	      ((eq answer ?y))
+	      (t (setq answer nil))))
      (message
       "File on disk now will become a backup file if you save these changes.")
      (setq buffer-backed-up nil))))