unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
* `scroll-conservatively'
@ 2007-05-27 18:17 Leo
  0 siblings, 0 replies; 3+ messages in thread
From: Leo @ 2007-05-27 18:17 UTC (permalink / raw)
  To: help-gnu-emacs

Hi all,

I try to set scroll-conservatively to an integer, however I fail to see
the difference for different integers. Ideas?

Thanks,
-- 
Leo <sdl.web AT gmail.com>                         (GPG Key: 9283AA3F)

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: `scroll-conservatively'
       [not found] <mailman.1334.1180289873.32220.help-gnu-emacs@gnu.org>
@ 2007-05-27 19:37 ` chming
  2007-05-27 20:22   ` `scroll-conservatively' chming
  0 siblings, 1 reply; 3+ messages in thread
From: chming @ 2007-05-27 19:37 UTC (permalink / raw)
  To: help-gnu-emacs

flet it go. try this way:

(defun scroll-one-line-up (&optional arg)
  "Scroll the selected window up (forward in the text) one line (or N
lines)."
  (interactive "p")
  (let ((pos
         (save-excursion
           (forward-line (* arg -1))
           (point))))
    (if (not (pos-visible-in-window-p pos))
        (progn
	  (scroll-down (or arg 1))
	  (forward-line -1))
      (forward-line (* arg -1)))))

(defun scroll-one-line-down (&optional arg)
  "Scroll the selected window down (backward in the text) one line (or
N)."
  (interactive "p")
  (let ((pos
         (save-excursion
           (forward-line (or arg 1))
           (point))))
    (if (not (pos-visible-in-window-p pos))
        (progn
	  (scroll-up (or arg 1))
	  (forward-line (or arg 1)))
      (forward-line (or arg 1)))))

(global-set-key   (kbd "C-p")     'scroll-one-line-up)
(global-set-key   (kbd "C-n")     'scroll-one-line-down)

On May 27, 11:17 am, Leo <sdl....@gmail.com> wrote:
> Hi all,
>
> I try to set scroll-conservatively to an integer, however I fail to see
> the difference for different integers. Ideas?
>
> Thanks,
> --
> Leo <sdl.web AT gmail.com>                         (GPG Key: 9283AA3F)

^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: `scroll-conservatively'
  2007-05-27 19:37 ` `scroll-conservatively' chming
@ 2007-05-27 20:22   ` chming
  0 siblings, 0 replies; 3+ messages in thread
From: chming @ 2007-05-27 20:22 UTC (permalink / raw)
  To: help-gnu-emacs

This might be better.

(defun scroll-one-line-up (&optional arg)
  "Scroll the selected window up (forward in the text) one line (or N
lines)."
  (interactive "p")
  (let ((pos
         (save-excursion
           (previous-line (or arg 1))
           (point))))
    (if (not (pos-visible-in-window-p pos))
        (progn
	  (scroll-down (or arg 1))
	  (previous-line (or arg 1)))
	(previous-line (or arg 1)))))

(defun scroll-one-line-down (&optional arg)
  "Scroll the selected window down (backward in the text) one line (or
N)."
  (interactive "p")
  (let ((pos
         (save-excursion
           (next-line (or arg 1))
           (point))))
    (if (not (pos-visible-in-window-p pos))
        (progn
	  (scroll-up (or arg 1))
	  (next-line (or arg 1)))
      (next-line (or arg 1)))))

^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2007-05-27 20:22 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
     [not found] <mailman.1334.1180289873.32220.help-gnu-emacs@gnu.org>
2007-05-27 19:37 ` `scroll-conservatively' chming
2007-05-27 20:22   ` `scroll-conservatively' chming
2007-05-27 18:17 `scroll-conservatively' Leo

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).