From 33c35d79588f9067c19db2197d5eb6e679246bb5 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 29 Oct 2001 19:00:06 +0000 Subject: [PATCH] (Fscroll_left, Fscroll_right): Doc fix. --- src/ChangeLog | 4 ++++ src/window.c | 16 ++++++++++++++-- 2 files changed, 18 insertions(+), 2 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 16942091754..222abb71b14 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2001-10-29 Eli Zaretskii + + * window.c (Fscroll_left, Fscroll_right): Doc fix. + 2001-10-29 Gerd Moellmann * xterm.c (x_display_and_set_cursor): If cursor_in_echo_area, diff --git a/src/window.c b/src/window.c index b99d48b9c85..38f9d772e4e 100644 --- a/src/window.c +++ b/src/window.c @@ -4430,7 +4430,13 @@ showing that buffer, popping the buffer up if necessary.") DEFUN ("scroll-left", Fscroll_left, Sscroll_left, 0, 1, "P", "Scroll selected window display ARG columns left.\n\ -Default for ARG is window width minus 2.") +Default for ARG is window width minus 2.\n\ +Value is the total amount of leftward horizontal scrolling in\n\ +effect after the change.\n\ +If `automatic-hscrolling' is non-nil, the argument ARG modifies\n\ +a lower bound for automatic scrolling, i.e. automatic scrolling\n\ +will not scroll a window to a column less than the value returned\n\ +by this function.") (arg) register Lisp_Object arg; { @@ -4454,7 +4460,13 @@ Default for ARG is window width minus 2.") DEFUN ("scroll-right", Fscroll_right, Sscroll_right, 0, 1, "P", "Scroll selected window display ARG columns right.\n\ -Default for ARG is window width minus 2.") +Default for ARG is window width minus 2.\n\ +Value is the total amount of leftward horizontal scrolling in\n\ +effect after the change.\n\ +If `automatic-hscrolling' is non-nil, the argument ARG modifies\n\ +a lower bound for automatic scrolling, i.e. automatic scrolling\n\ +will not scroll a window to a column less than the value returned\n\ +by this function.") (arg) register Lisp_Object arg; { -- 2.39.2