# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 785581890 0
# Node ID c1b138be512ebff7d4052c2cf1ec803245cc9530
# Parent  5803ff60cf47a138541b96b2afb4be8abb648291
(Fy_or_n_p): Handle exit-prefix in query-replace-map.

diff -r 5803ff60cf47 -r c1b138be512e src/fns.c
--- a/src/fns.c	Wed Nov 23 09:11:05 1994 +0000
+++ b/src/fns.c	Wed Nov 23 09:11:30 1994 +0000
@@ -1202,6 +1202,10 @@
 	}
       else if (EQ (def, intern ("quit")))
 	Vquit_flag = Qt;
+      /* We want to exit this command for exit-prefix,
+	 and this is the only way to do it.  */
+      else if (EQ (def, intern ("exit-prefix")))
+	Vquit_flag = Qt;
 
       QUIT;