1 files changed, 1 insertions, 1 deletions

diff --git a/src/emacs.c b/src/emacs.c
index 96040e17a86..2e6527e4e7e 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -649,7 +649,7 @@ all of which are called before Emacs is actually killed.")
   stop_vms_input ();
  #endif  */
 
-  shut_down_emacs (0, 0);
+  shut_down_emacs (0, 0, STRINGP (arg) ? arg : Qnil);
 
   exit ((XTYPE (arg) == Lisp_Int) ? XINT (arg)
 #ifdef VMS