Doc fix.

1 files changed, 3 insertions, 0 deletions

diff --git a/src/fns.c b/src/fns.c
index 2527f268aae..0bcf414179b 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1114,6 +1114,9 @@ Also accepts Space to mean yes, or Delete to mean no.")
       if (ans == 7 || ans == '\035')
         Vquit_flag = Qt;
       QUIT;
+
+      /* If we don't clear this, then the next call to read_char will
+         return quit_char again, and we'll enter an infinite loop.  */
       Vquit_flag = Qnil;
       if (ans >= 0)
         ans = DOWNCASE (ans);