🚀 go-pugleaf

In article <9008101512.AA12186@.dupuis.gr.osf.org.> macrakis@ri.osf.fr writes:

   It appears that the effect of recenter is deferred in a funny way.

   [example deleted]

   The screen display is what you'd expect from the (recenter -1), but
   with point halfway down the screen !  i.e. the effect of the last
   goto-char is annulled by some deferred effect of recenter.

recenter does this:

    w->force_start = Qt;

When the screen is next redisplayed, point is forced to lie within the
window rather than the window being moved to display point.

You can write your own version of recenter in Lisp that does not have this
behavior.  Just copy the code for recenter in src/window.c and make it
into Lisp.  Then use the third argument to set-window-start to get the
behavior you want:

    set-window-start:
    Make display in WINDOW start at position POS in WINDOW's buffer.
    Optional third arg NOFORCE non-nil inhibits next redisplay
    from overriding motion of point in order to display at this exact start.

-- 
Joe Wells <jbw@uswest.com>