insertion and display

[山本和彦]

Hello,

Consider the following code:

(let ((buf (get-buffer-create "*tmp*"))
      (win (selected-window))
      (i 1)
      vpos)
  (pop-to-buffer buf)
  (erase-buffer)
  (while (< i 100)
    (insert (format "%d\n" i))
    (setq i (1+ i)))
  (goto-char (point-min))
  (forward-line 10)
  (setq vpos (point))
  (insert "Start")
  (recenter 0)
  (forward-line 70)
  (insert "End")
  ;; (set-window-start (selected-window) vpos)
  (select-window win))

If you evaluate this code on Emacs 20.7 or 21.3, "Start" is displayed
in the first line of a window.

Evaluating this code on Emacs 21.3.50 acts differently. Is this a bug
or a spec?

--Kazu