* lisp/simple.el: Minor fixes to commentary.

This commit is contained in:
Paul Eggert 2020-01-22 11:03:22 -08:00
parent 196c42b8bf
commit d02f2a793e

View file

@ -3502,10 +3502,9 @@ whose `car' is BUFFER."
(let ((win (car (get-buffer-window-list buf))) (let ((win (car (get-buffer-window-list buf)))
(pmax (with-current-buffer buf (point-max)))) (pmax (with-current-buffer buf (point-max))))
;; The first time we run a command in a fresh created buffer ;; The first time we run a command in a freshly created buffer
;; we have not saved positions yet; advance to `point-max', so that ;; we have not saved positions yet; advance to `point-max', so that
;; succesive commands knows the position where the new comman start. ;; successive commands know where to start.
;; (unless (and pos (memq sym '(save-point beg-last-out)))
(unless (and pos (memq sym '(save-point beg-last-out end-last-out))) (unless (and pos (memq sym '(save-point beg-last-out end-last-out)))
(setq pos pmax)) (setq pos pmax))
;; Set point in the window displaying buf, if any; otherwise ;; Set point in the window displaying buf, if any; otherwise