Re: recenter-top-bottom

[Lennart Borgman (gmail)]

Drew Adams wrote:
> > > The starting position of the window determines the cycling order:
> > >  If initially in the top or middle third: top -> middle -> bottom.
> > >  If initially in the bottom third: bottom -> middle -> top.
> > But why it does `middle -> bottom -> top' if initially in the 
> > middle third? I think `middle -> top -> bottom' would be
> > much more convenient!
>
> It's a toss-up, IMO. 
> I have no preference, in any case.

I think that you most often want to see something further down since 
writing pushes text downwards and also since reading is from the top to 
the bottom.

> If that's preferred by most, then just switch it:
>
> (otherwise
>  (let ((top (1+ (count-lines 1 (window-start))))
>        (current (1+ (count-lines 1 (point))))
>        (total (window-height)))
>    (if (< (- current top) (/ total 3))
>        (setq this-command 'recenter-tb-middle)
>      (setq this-command 'recenter-tb-middle-1)))
>  (recenter))

Thanks.