From: Po Lu <luangruo@yahoo.com>
Date: Sun, 13 Mar 2022 07:27:24 +0000 (+0000)
Subject: Fix small regression for horizontal scroll bars
X-Git-Tag: emacs-29.0.90~1931^2~1162
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6ea5b5e1b434eb57c6f476b242761c37b54515c7;p=emacs.git

Fix small regression for horizontal scroll bars

* src/haikuterm.c (haiku_read_socket): Restore previous
horizontal scrollbar code, since the change it was intended for
was never made.
---

diff --git a/src/haikuterm.c b/src/haikuterm.c
index c98ab13e1a9..6f8d2eaac59 100644
--- a/src/haikuterm.c
+++ b/src/haikuterm.c
@@ -3285,8 +3285,8 @@ haiku_read_socket (struct terminal *terminal, struct input_event *hold_quit)
 
 		if (bar->horizontal)
 		  {
-		    portion = bar->total * ceil ((double) b->position
-						 / BE_SB_MAX);
+		    portion = bar->total * ((float) b->position
+					    / BE_SB_MAX);
 		    whole = (bar->total
 			     * ((float) (BE_SB_MAX - bar->page_size)
 				/ BE_SB_MAX));