Allow client connections when in recursive-edit

* lisp/server.el (server-goto-toplevel): Check minibuffer
depth, not recursion depth.  This avoids exiting
recursive-edit if a client connection is accepted during
recursive-edit.  (Bug#37176)

diff --git a/lisp/server.el b/lisp/server.el
index d491a260377111a533c7142026df8435026aef78..45e3d007e45b7bbbf26d311b24e3e44f6ad00eb3 100644 (file)
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -926,7 +926,7 @@ This handles splitting the command if it would be bigger than
             (isearch-cancel))))
     ;; Signaled by isearch-cancel.
     (quit (message nil)))
-  (when (> (recursion-depth) 0)
+  (when (> (minibuffer-depth) 0)
     ;; We're inside a minibuffer already, so if the emacs-client is trying
     ;; to open a frame on a new display, we might end up with an unusable
     ;; frame because input from that display will be blocked (until exiting