From: Karl Heuer <kwzh@gnu.org>
Date: Sat, 4 Nov 1995 00:39:25 +0000 (+0000)
Subject: (tex-send-command): Give meaningful error message.
X-Git-Tag: emacs-19.34~2461
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c93931c390d8cf5fb0455f4afb03e2503a64755b;p=emacs.git

(tex-send-command): Give meaningful error message.
---

diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index 3a28ea73e0e..427583a88f8 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -883,7 +883,7 @@ substitution will be made in COMMAND.  COMMAND can be any expression that
 evaluates to a command string."
   (save-excursion
     (let* ((cmd (eval command))
-	   (proc (get-process "tex-shell"))
+	   (proc (or (get-process "tex-shell") (error "No TeX subprocess")))
 	   (buf (process-buffer proc))
            (star (string-match "\\*" cmd))
 	   (string