(Fy_or_n_p): Handle exit-prefix in query-replace-map.

1 files changed, 4 insertions, 0 deletions

diff --git a/src/fns.c b/src/fns.c
index 0ef7ed3c9e7..c08d8361147 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1202,6 +1202,10 @@ Also accepts Space to mean yes, or Delete to mean no.")
         }
       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;