commit 28f1a51bde36e2770dd54c9e2ae69a26cafa5a64
author qsmodo <75080827+qsmodo@users.noreply.github.com> Mon Feb 07 15:57:50 2022 +0000
committer Bram Moolenaar <Bram@vim.org> Mon Feb 07 15:57:50 2022 +0000
tree 13ffaea9fbf64f42af13e039f2adcc5f4922d110
parent 4e713bafc0ae191b1830e3cd3c323ebd695bc3a1

patch 8.2.4320: Athena and Motif: when maximized scrollbar position is wrong

Problem:    Athena and Motif: when maximized scrollbar position is wrong.
Solution:   Implement the scrollbar padding functions. (closes #9712)

src/gui_motif.c

diff --git a/src/gui_motif.c b/src/gui_motif.c
index 8328045..ef3747d 100644
--- a/src/gui_motif.c
+++ b/src/gui_motif.c
@@ -1745,17 +1745,27 @@
     int
 gui_mch_get_scrollbar_xpadding(void)
 {
-    // TODO: Calculate the padding for adjust scrollbar position when the
-    // Window is maximized.
-    return 0;
+    int xpad;
+    Dimension tw, ww;
+    Position  tx;
+
+    XtVaGetValues(textArea, XtNwidth, &tw, XtNx, &tx, NULL);
+    XtVaGetValues(vimShell, XtNwidth, &ww, NULL);
+    xpad = ww - tw - tx - gui.scrollbar_width;
+    return (xpad < 0) ? 0 : xpad;
 }
 
     int
 gui_mch_get_scrollbar_ypadding(void)
 {
-    // TODO: Calculate the padding for adjust scrollbar position when the
-    // Window is maximized.
-    return 0;
+    int ypad;
+    Dimension th, wh;
+    Position  ty;
+
+    XtVaGetValues(textArea, XtNheight, &th, XtNy, &ty, NULL);
+    XtVaGetValues(vimShell, XtNheight, &wh, NULL);
+    ypad = wh - th - ty - gui.scrollbar_height;
+    return (ypad < 0) ? 0 : ypad;
 }
 
     void