diff options
Diffstat (limited to 'lisp/eshell/esh-mode.el')
| -rw-r--r-- | lisp/eshell/esh-mode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el index bdb5fd3179c..0fa6347edee 100644 --- a/lisp/eshell/esh-mode.el +++ b/lisp/eshell/esh-mode.el @@ -999,10 +999,10 @@ a key." (beginning-of-line) (let ((pos (point))) (if (bobp) - (if (interactive-p) + (if (called-interactively-p 'interactive) (message "Buffer too short to truncate")) (delete-region (point-min) (point)) - (if (interactive-p) + (if (called-interactively-p 'interactive) (message "Truncated buffer from %d to %d lines (%.1fk freed)" lines eshell-buffer-maximum-lines (/ pos 1024.0)))))))) |