1 files changed, 1 insertions, 0 deletions

diff --git a/lisp/files.el b/lisp/files.el
index 4698ff0beaf..f4473bf9d7c 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -3267,6 +3267,7 @@ With prefix arg, silently save all file-visiting buffers, then kill."
                     (setq active t))
                (setq processes (cdr processes)))
              (or (not active)
+                 (list-processes)
                  (yes-or-no-p "Active processes exist; kill them and exit anyway? "))))
        ;; Query the user for other things, perhaps.
        (run-hook-with-args-until-failure 'kill-emacs-query-functions)