From: Glenn Morris <rgm@gnu.org>
Date: Sat, 11 May 2013 02:17:45 +0000 (-0700)
Subject: * lisp/emulation/edt-mapper.el: In batch mode, error rather than hang.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~2026^2~229^2~124
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0da7ad96c4f13101543a194f38de23f2b63a4244;p=emacs.git

* lisp/emulation/edt-mapper.el: In batch mode, error rather than hang.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ec747affc95..5b9cf1dc455 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2013-05-11  Glenn Morris  <rgm@gnu.org>
 
+	* emulation/edt-mapper.el: In batch mode, error rather than hang.
+
 	* term.el (term-set-escape-char): Make it idempotent.
 
 2013-05-10  Leo Liu  <sdl.web@gmail.com>
diff --git a/lisp/emulation/edt-mapper.el b/lisp/emulation/edt-mapper.el
index 5ddb9513f0a..138e3e6d0da 100644
--- a/lisp/emulation/edt-mapper.el
+++ b/lisp/emulation/edt-mapper.el
@@ -96,6 +96,10 @@
 
 ;;; Code:
 
+;; Otherwise it just hangs.  This seems preferable.
+(if noninteractive
+    (error "edt-mapper cannot be loaded in batch mode"))
+
 ;;;
 ;;;  Decide Emacs Variant, GNU Emacs or XEmacs (aka Lucid Emacs).
 ;;;  Determine Window System, and X Server Vendor (if appropriate).