show less event history on small screens

[micropolis] / src / tk / tkscrbar.c

diff --git a/src/tk/tkscrbar.c b/src/tk/tkscrbar.c
index 6cec27aa12f146ea0d2c66f217ad9dfac929e0fa..bb843bc31317b6b7d61fb867b85f8dc2ed54bffa 100644 (file)
--- a/src/tk/tkscrbar.c
+++ b/src/tk/tkscrbar.c
@@ -974,7 +974,7 @@ ScrollbarMouseProc(clientData, eventPtr)
                    eventPtr->xmotion.y));
        }
     } else if ((eventPtr->type == ButtonPress)
-           && (eventPtr->xbutton.state == 0)) {
+           && ((eventPtr->xbutton.state & ALL_BUTTONS) == 0)) {
        scrollPtr->pressField = scrollPtr->mouseField;
        if (scrollPtr->pressField != SLIDER) {
            scrollPtr->autoRepeat = Tk_CreateTimerHandler(