scrolling line by line does not work

scrolling line by line does not work

[MirkoLink (sent by Nabble.com)]

[-- Attachment #1.1: Type: text/plain, Size: 523 bytes --]


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: http://www.nabble.com/scrolling-line-by-line-does-not-work-t944465.html#a2446768
Sent from the Emacs - Help forum at Nabble.com.

[-- Attachment #1.2: Type: text/html, Size: 804 bytes --]

[-- Attachment #2: Type: text/plain, Size: 152 bytes --]

_______________________________________________
help-gnu-emacs mailing list
help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs

Re: scrolling line by line does not work

[Kevin Rodgers]

MirkoLink (sent by Nabble.com) wrote:
> 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?

First, the doc string for previous-line suggests calling forward-line
with a negative argument instead.  Does that help?

Second, perhaps something is sensitive to the return value of your
function.  What happens if you reverse the order of the calls to
previous-line and set-buffer-modified-p, or change the body to

(prog1 (previous-line 1)
   (set-buffer-modified-p 1))

-- 
Kevin Rodgers