]> git.eshelyaron.com Git - emacs.git/commit
Allow 'make-cursor-line-fully-visible' name a function
authorEli Zaretskii <eliz@gnu.org>
Sun, 30 Sep 2018 11:14:59 +0000 (14:14 +0300)
committerEli Zaretskii <eliz@gnu.org>
Sun, 30 Sep 2018 11:14:59 +0000 (14:14 +0300)
commit8bd48212020ee206b782477ac32b918861bcaf08
treee0f3b1bb8ae2aac091da77e22b06809f5e4adada
parent6217746dd64b43a2a2b3b66ab50cfbbfc984f36c
Allow 'make-cursor-line-fully-visible' name a function

* src/xdisp.c (cursor_row_fully_visible_p): Handle the case of
make-cursor-line-fully-visible being a function.  Accept a 3rd
argument; if non-zero, assume the caller already tested the
conditions for the cursor being fully-visible, and don't
recheck them.  All callers changed.
(try_cursor_movement, try_window_id): Call
cursor_row_fully_visible_p instead of testing the value of
make-cursor-line-fully-visible directly.
(syms_of_xdisp) <make-cursor-line-fully-visible>: Update the
doc string.  Define a symbol Qmake_cursor_line_fully_visible.
(Bug#32848)

* lisp/cus-start.el (standard): Update the Custom form.

* etc/NEWS: Mention the change in possible values of
'make-cursor-line-fully-visible'.
etc/NEWS
lisp/cus-start.el
src/xdisp.c