From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 23 Jun 1997 00:47:19 +0000 (+0000)
Subject: (Fdump_emacs): Error if not run in batch mode.
X-Git-Tag: emacs-20.1~1552
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=87a98b1a3107a25c723c89392a35527af78653d1;p=emacs.git

(Fdump_emacs): Error if not run in batch mode.
---

diff --git a/src/emacs.c b/src/emacs.c
index adf9660a837..67f78ff1540 100644
--- a/src/emacs.c
+++ b/src/emacs.c
@@ -1488,13 +1488,18 @@ This is used in the file `loadup.el' when building Emacs.\n\
 \n\
 Bind `command-line-processed' to nil before dumping,\n\
 if you want the dumped Emacs to process its command line\n\
-and announce itself normally when it is run.")
+and announce itself normally when it is run.\n\
+\n\
+You must run Emacs in batch mode in order to dump it.")
   (filename, symfile)
      Lisp_Object filename, symfile;
 {
   extern char my_edata[];
   Lisp_Object tem;
 
+  if (! noninteractive)
+    error ("Dumping Emacs works only in batch mode");
+
   CHECK_STRING (filename, 0);
   filename = Fexpand_file_name (filename, Qnil);
   if (!NILP (symfile))