scrolling line by line does not work

[MirkoLink (sent by Nabble.com)]

The follow function works correct:

(defun testMirko nil
  ""
  (interactive)
  (previous-line 1))

The screen scrolls line by line.

This works not correct, but I don't know, why:
(defun testMirko nil
  ""
  (interactive)
  (previous-line 1)
  (set-buffer-modified-p 1))
The upper line jump to the middle of the screen.
Can everybody help me?

Thanks!

Mirko

---

View this message in context: scrolling line by line does not work
Sent from the Emacs - Help forum at Nabble.com.