summaryrefslogtreecommitdiffstats
path: root/generic/tkBind.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2012-04-22 22:03:10 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2012-04-22 22:03:10 (GMT)
commita0029792b685e19df1d79a8170579d88416055b0 (patch)
tree55e1cdc16274037a80a6c3cce95cf2c323a5fdb7 /generic/tkBind.c
parent8077dd948e9d7c758be18837a1cc637007e50084 (diff)
downloadtk-a0029792b685e19df1d79a8170579d88416055b0.zip
tk-a0029792b685e19df1d79a8170579d88416055b0.tar.gz
tk-a0029792b685e19df1d79a8170579d88416055b0.tar.bz2
[Bug 3520202]: %K must not work with <MouseWheel> or effects are undefined!
Diffstat (limited to 'generic/tkBind.c')
-rw-r--r--[-rwxr-xr-x]generic/tkBind.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkBind.c b/generic/tkBind.c
index 3f05ccc..7e8d823 100755..100644
--- a/generic/tkBind.c
+++ b/generic/tkBind.c
@@ -2428,7 +2428,7 @@ ExpandPercents(winPtr, before, eventPtr, keySym, dsPtr)
string = numStorage;
goto doString;
case 'k':
- if (flags & KEY) {
+ if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) {
number = eventPtr->xkey.keycode;
goto doNumber;
}
@@ -2567,7 +2567,7 @@ ExpandPercents(winPtr, before, eventPtr, keySym, dsPtr)
/*
* This is used only by the MouseWheel event.
*/
- if (flags & KEY) {
+ if ((flags & KEY) && (eventPtr->type == MouseWheelEvent)) {
number = eventPtr->xkey.keycode;
goto doNumber;
}
@@ -2576,7 +2576,7 @@ ExpandPercents(winPtr, before, eventPtr, keySym, dsPtr)
number = (int) eventPtr->xany.send_event;
goto doNumber;
case 'K':
- if (flags & KEY) {
+ if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) {
char *name;
name = TkKeysymToString(keySym);
@@ -2586,7 +2586,7 @@ ExpandPercents(winPtr, before, eventPtr, keySym, dsPtr)
}
goto doString;
case 'N':
- if (flags & KEY) {
+ if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) {
number = (int) keySym;
goto doNumber;
}