/[emacs]/emacs/lisp/comint.el
ViewVC logotype

Diff of /emacs/lisp/comint.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.333 by rms, Sun Oct 2 03:34:29 2005 UTC revision 1.334 by teirllm, Sun Oct 30 16:42:48 2005 UTC
# Line 1550  Similarly for Soar, Scheme, etc." Line 1550  Similarly for Soar, Scheme, etc."
1550                    ;; problems when `comint-prompt-read-only' is non-nil.                    ;; problems when `comint-prompt-read-only' is non-nil.
1551                    (let ((inhibit-read-only t))                    (let ((inhibit-read-only t))
1552                      (delete-region comint-last-input-end                      (delete-region comint-last-input-end
1553                                     (+ comint-last-input-end echo-len))))))                                     (+ comint-last-input-end echo-len))
1554                        (when comint-prompt-read-only
1555                          (save-excursion
1556                            (goto-char comint-last-input-end)
1557                            (comint-update-fence)))))))
1558    
1559            ;; This used to call comint-output-filter-functions,            ;; This used to call comint-output-filter-functions,
1560            ;; but that scrolled the buffer in undesirable ways.            ;; but that scrolled the buffer in undesirable ways.

Legend:
Removed from v.1.333  
changed lines
  Added in v.1.334

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26