Mercurial > emacs
diff lisp/simple.el @ 15305:29ba4949d3d5
(shell-command-on-region): In output buffer, display
first page by setting point, not window-start (which can leave
point in an unexpected place).
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 30 May 1996 20:44:17 +0000 |
parents | c23c9712ef5c |
children | 68cca71d69bd |
line wrap: on
line diff
--- a/lisp/simple.el Thu May 30 19:46:24 1996 +0000 +++ b/lisp/simple.el Thu May 30 20:44:17 1996 +0000 @@ -926,7 +926,10 @@ (buffer-substring (point) (progn (end-of-line) (point)))))) (t - (set-window-start (display-buffer buffer) 1)))))))) + (save-excursion + (set-buffer buffer) + (goto-char (point-min))) + (display-buffer buffer)))))))) (defconst universal-argument-map (let ((map (make-sparse-keymap)))