]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix some minor glitches with Haiku scroll bars
authorPo Lu <luangruo@yahoo.com>
Tue, 15 Mar 2022 04:46:01 +0000 (04:46 +0000)
committerPo Lu <luangruo@yahoo.com>
Tue, 15 Mar 2022 04:46:01 +0000 (04:46 +0000)
* src/haiku_support.cc (MouseDown): Don't start overscroll if
dragging started inside a button.

src/haiku_support.cc

index 27d4bbafaf762f6fe00f97dac35861f79438b1fc..4bd801242af0c85cd6b286e81da967cb3f587eb7 100644 (file)
@@ -1785,7 +1785,6 @@ public:
 
     if (buttons == B_PRIMARY_MOUSE_BUTTON)
       {
-       maybe_overscroll = true;
        r = ButtonRegionFor (HAIKU_SCROLL_BAR_UP_BUTTON);
 
        if (r.Contains (pt))
@@ -1813,6 +1812,8 @@ public:
            haiku_write (SCROLL_BAR_PART_EVENT, &part);
            goto out;
          }
+
+       maybe_overscroll = true;
       }
 
     rq.dragging_p = 1;