[Emacs-diffs] /srv/bzr/emacs/emacs-24 r111147: comint-send-input tiny change

[Glenn Morris]

------------------------------------------------------------
revno: 111147
fixes bug: http://debbugs.gnu.org/13290
author: Vitalie Spinu <address@hidden>
committer: Glenn Morris <address@hidden>
branch nick: emacs-24
timestamp: Sun 2013-01-06 17:06:39 -0800
message:
  comint-send-input tiny change
  
  * lisp/comint.el (comint-send-input): Check size of buffer before
  waiting for process output, in case already accepted.
modified:
  lisp/ChangeLog
  lisp/comint.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-01-04 09:41:23 +0000
+++ b/lisp/ChangeLog    2013-01-07 01:06:39 +0000
@@ -1,3 +1,8 @@
+2013-01-07  Vitalie Spinu  <address@hidden>  (tiny change)
+
+       * comint.el (comint-send-input): Check size of buffer before
+       waiting for process output, in case already accepted.  (Bug#13290)
+
 2013-01-04  Michael Albinus  <address@hidden>
 
        * net/tramp-sh.el (tramp-set-file-uid-gid): UID and GID must be

=== modified file 'lisp/comint.el'
--- a/lisp/comint.el    2013-01-01 09:11:05 +0000
+++ b/lisp/comint.el    2013-01-07 01:06:39 +0000
@@ -1847,9 +1847,9 @@
           (let ((echo-len (- comint-last-input-end
                              comint-last-input-start)))
             ;; Wait for all input to be echoed:
-            (while (and (accept-process-output proc)
-                        (> (+ comint-last-input-end echo-len)
+            (while (and (> (+ comint-last-input-end echo-len)
                            (point-max))
+                        (accept-process-output proc)
                         (zerop
                          (compare-buffer-substrings
                           nil comint-last-input-start