mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-24 07:20:37 +00:00
* window.c (Fscroll_left, Fscroll_right): Don't forget to apply
XWINDOW to selected_window before passing it to window_internal_width.
This commit is contained in:
parent
c4e5d591e0
commit
b8baad4034
@ -2275,7 +2275,7 @@ Default for ARG is window width minus 2.")
|
||||
{
|
||||
|
||||
if (NILP (arg))
|
||||
XFASTINT (arg) = window_internal_width (selected_window) - 2;
|
||||
XFASTINT (arg) = window_internal_width (XWINDOW (selected_window)) - 2;
|
||||
else
|
||||
arg = Fprefix_numeric_value (arg);
|
||||
|
||||
@ -2292,7 +2292,7 @@ Default for ARG is window width minus 2.")
|
||||
register Lisp_Object arg;
|
||||
{
|
||||
if (NILP (arg))
|
||||
XFASTINT (arg) = window_internal_width (selected_window) - 2;
|
||||
XFASTINT (arg) = window_internal_width (XWINDOW (selected_window)) - 2;
|
||||
else
|
||||
arg = Fprefix_numeric_value (arg);
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user