# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1011231671 0
# Node ID aeec841a65cf930278af5740e84537efa1ce1a8a
# Parent  d72ace523825faedbf5a7115026727b9e6ba59dd
(comint-simple-send): Fix previous change.

diff -r d72ace523825 -r aeec841a65cf lisp/comint.el
--- a/lisp/comint.el	Thu Jan 17 01:40:47 2002 +0000
+++ b/lisp/comint.el	Thu Jan 17 01:41:11 2002 +0000
@@ -1850,7 +1850,7 @@
 set the hook `comint-input-sender'."
   (comint-send-string proc string)
   (if comint-input-sender-no-newline
-      (if (not (string-equal input ""))
+      (if (not (string-equal string ""))
 	  (process-send-eof))
     (comint-send-string proc "\n")))