# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 940340395 0
# Node ID a1b5109f447a32247a0c76bff063f3e7aae0bd14
# Parent  b77d8a0d5ddd293659c8169f3dde8af5433367f0
(map-y-or-n-p): Remove extraneous `not'.

diff -r b77d8a0d5ddd -r a1b5109f447a lisp/map-ynp.el
--- a/lisp/map-ynp.el	Tue Oct 19 13:29:18 1999 +0000
+++ b/lisp/map-ynp.el	Tue Oct 19 13:39:55 1999 +0000
@@ -153,7 +153,7 @@
 				(setq char (read-event))
 				;; If we get -1, from end of keyboard
 				;; macro, try again.
-				(not (equal char -1))))
+                                (equal char -1)))
 		       ;; Show the answer to the question.
 		       (message "%s(y, n, !, ., q, %sor %s) %s"
 				prompt user-keys