[Emacs-diffs] Changes to emacs/lisp/comint.el

[Luc Teirlinck]

Index: emacs/lisp/comint.el
diff -c emacs/lisp/comint.el:1.333 emacs/lisp/comint.el:1.334
*** emacs/lisp/comint.el:1.333  Sun Oct  2 03:34:29 2005
--- emacs/lisp/comint.el        Sun Oct 30 16:42:48 2005
***************
*** 1550,1556 ****
                  ;; problems when `comint-prompt-read-only' is non-nil.
                  (let ((inhibit-read-only t))
                    (delete-region comint-last-input-end
!                                  (+ comint-last-input-end echo-len))))))
  
          ;; This used to call comint-output-filter-functions,
          ;; but that scrolled the buffer in undesirable ways.
--- 1550,1560 ----
                  ;; problems when `comint-prompt-read-only' is non-nil.
                  (let ((inhibit-read-only t))
                    (delete-region comint-last-input-end
!                                  (+ comint-last-input-end echo-len))
!                   (when comint-prompt-read-only
!                     (save-excursion
!                       (goto-char comint-last-input-end)
!                       (comint-update-fence)))))))
  
          ;; This used to call comint-output-filter-functions,
          ;; but that scrolled the buffer in undesirable ways.