[Emacs-diffs] Changes to emacs/lisp/eshell/esh-mode.el

[Richard M . Stallman]

Index: emacs/lisp/eshell/esh-mode.el
diff -c emacs/lisp/eshell/esh-mode.el:1.18 emacs/lisp/eshell/esh-mode.el:1.19
*** emacs/lisp/eshell/esh-mode.el:1.18  Sun Feb  8 22:40:35 2004
--- emacs/lisp/eshell/esh-mode.el       Thu Nov  4 10:05:52 2004
***************
*** 943,952 ****
        (eshell-bol)
        (kill-region (point) here))))
  
! (defun eshell-show-maximum-output ()
!   "Put the end of the buffer at the bottom of the window."
!   (interactive)
!   (if (interactive-p)
        (widen))
    (goto-char (point-max))
    (recenter -1))
--- 943,953 ----
        (eshell-bol)
        (kill-region (point) here))))
  
! (defun eshell-show-maximum-output (&optional interactive)
!   "Put the end of the buffer at the bottom of the window.
! When run interactively, widen the buffer first."
!   (interactive "p")
!   (if interactive
        (widen))
    (goto-char (point-max))
    (recenter -1))
***************
*** 1002,1008 ****
        (let ((pos (point)))
        (if (bobp)
            (if (interactive-p)
!               (error "Buffer too short to truncate"))
          (delete-region (point-min) (point))
          (if (interactive-p)
              (message "Truncated buffer from %d to %d lines (%.1fk freed)"
--- 1003,1009 ----
        (let ((pos (point)))
        (if (bobp)
            (if (interactive-p)
!               (message "Buffer too short to truncate"))
          (delete-region (point-min) (point))
          (if (interactive-p)
              (message "Truncated buffer from %d to %d lines (%.1fk freed)"