[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/eshell/esh-mode.el [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/eshell/esh-mode.el [lexbind] |
Date: |
Thu, 11 Nov 2004 23:44:22 -0500 |
Index: emacs/lisp/eshell/esh-mode.el
diff -c emacs/lisp/eshell/esh-mode.el:1.16.2.2
emacs/lisp/eshell/esh-mode.el:1.16.2.3
*** emacs/lisp/eshell/esh-mode.el:1.16.2.2 Mon Feb 9 14:14:11 2004
--- emacs/lisp/eshell/esh-mode.el Fri Nov 12 04:21:24 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)"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/eshell/esh-mode.el [lexbind],
Miles Bader <=