summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--doc/colors.n4
-rw-r--r--generic/tkBind.c16
-rw-r--r--macosx/tkMacOSXTest.c3
-rw-r--r--xlib/X11/Xlib.h17
4 files changed, 12 insertions, 28 deletions
diff --git a/doc/colors.n b/doc/colors.n
index 589dea7..9234824 100644
--- a/doc/colors.n
+++ b/doc/colors.n
@@ -943,9 +943,9 @@ predecessor.
systemControlAccentColor
systemControlTextColor
systemDisabledControlTextColor
-systemLabelColor
+systemLabelColor
systemLinkColor
-systemSelectedTextBackgroundColor
+systemSelectedTextBackgroundColor
systemSelectedTextColor
systemTextBackgroundColor
systemTextColor
diff --git a/generic/tkBind.c b/generic/tkBind.c
index f2a7930..e8827b3 100644
--- a/generic/tkBind.c
+++ b/generic/tkBind.c
@@ -575,7 +575,7 @@ static int eventArrayIndex[TK_LASTEVENT];
#define HAS_XKEY_HEAD (KEY|BUTTON|MOTION|VIRTUAL|CROSSING|WHEEL)
-/*
+/*
* The xcrossing struct puts the state field in a different location, but the other
* events above agree on where state is located.
*/
@@ -2945,13 +2945,13 @@ ExpandPercents(
evPtr = &eventPtr->xev;
flags = (evPtr->type < TK_LASTEVENT) ? flagArray[evPtr->type] : 0;
-#define SET_NUMBER(value) { number = value; \
- snprintf(numStorage, sizeof(numStorage), "%ld", number); \
+#define SET_NUMBER(value) { number = (value); \
+ snprintf(numStorage, sizeof(numStorage), "%" TCL_LL_MODIFIER "d", number); \
string = numStorage; \
}
-#define SET_UNUMBER(value) { unumber = value; \
- snprintf(numStorage, sizeof(numStorage), "%lu", unumber); \
+#define SET_UNUMBER(value) { unumber = (value); \
+ snprintf(numStorage, sizeof(numStorage), "%" TCL_LL_MODIFIER "u", unumber); \
string = numStorage; \
}
@@ -3153,7 +3153,7 @@ ExpandPercents(
break;
case 'D':
if (flags & WHEEL) {
- SET_NUMBER(evPtr->xwheel.delta);
+ SET_NUMBER((int)evPtr->xbutton.button); /* mis-use button field for this */
}
break;
case 'E':
@@ -3232,7 +3232,7 @@ ExpandPercents(
}
#undef SET_NUMBER
-#undef SET_UNUMBER
+#undef SET_UNUMBER
Tcl_DStringFree(&buf);
}
@@ -4036,7 +4036,7 @@ HandleEventGenerate(
return TCL_ERROR;
}
if (flags & WHEEL) {
- event.general.xwheel.delta = number;
+ event.general.xbutton.button = (unsigned)number; /* mis-use button field for this */
} else {
badOpt = 1;
}
diff --git a/macosx/tkMacOSXTest.c b/macosx/tkMacOSXTest.c
index ef633aa..4a3bfb1 100644
--- a/macosx/tkMacOSXTest.c
+++ b/macosx/tkMacOSXTest.c
@@ -224,7 +224,7 @@ PressButtonObjCmd(
static int
InjectKeyEventObjCmd(
- ClientData clientData,
+ ClientData dummy,
Tcl_Interp *interp,
int objc,
Tcl_Obj *const objv[])
@@ -241,6 +241,7 @@ InjectKeyEventObjCmd(
NSEvent *keyEvent;
NSUInteger type;
MacKeycode macKC;
+ (void)dummy;
if (objc < 3) {
wrongArgs:
diff --git a/xlib/X11/Xlib.h b/xlib/X11/Xlib.h
index a83efde..0971191 100644
--- a/xlib/X11/Xlib.h
+++ b/xlib/X11/Xlib.h
@@ -627,22 +627,6 @@ typedef struct {
int x, y; /* pointer x, y coordinates in event window */
int x_root, y_root; /* coordinates relative to root */
unsigned int state; /* key or button mask */
- int delta; /* detail */
- Bool same_screen; /* same screen flag */
-} XWheelEvent;
-
-typedef struct {
- int type; /* of event */
- unsigned long serial; /* # of last request processed by server */
- Bool send_event; /* true if this came from a SendEvent request */
- Display *display; /* Display the event was read from */
- Window window; /* "event" window it is reported relative to */
- Window root; /* root window that the event occured on */
- Window subwindow; /* child window */
- Time time; /* milliseconds */
- int x, y; /* pointer x, y coordinates in event window */
- int x_root, y_root; /* coordinates relative to root */
- unsigned int state; /* key or button mask */
unsigned int button; /* detail */
Bool same_screen; /* same screen flag */
} XButtonEvent;
@@ -1033,7 +1017,6 @@ typedef union _XEvent {
int type; /* must not be changed; first element */
XAnyEvent xany;
XKeyEvent xkey;
- XWheelEvent xwheel;
XButtonEvent xbutton;
XMotionEvent xmotion;
XCrossingEvent xcrossing;