diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-22 22:05:44 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-04-22 22:05:44 (GMT) |
commit | bcc1d86678bcd77495a02ca7b58041f6c9ff3d1a (patch) | |
tree | 2a15c9c515b47019cd45cebbd1f7d1495db6f87e /generic/tkBind.c | |
parent | 72dea207ae279d05cfa07445b767e0efb4bb6702 (diff) | |
parent | a0029792b685e19df1d79a8170579d88416055b0 (diff) | |
download | tk-bcc1d86678bcd77495a02ca7b58041f6c9ff3d1a.zip tk-bcc1d86678bcd77495a02ca7b58041f6c9ff3d1a.tar.gz tk-bcc1d86678bcd77495a02ca7b58041f6c9ff3d1a.tar.bz2 |
[Bug 3520202]: %K must not work with <MouseWheel> or effects are undefined!
Diffstat (limited to 'generic/tkBind.c')
-rw-r--r-- | generic/tkBind.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkBind.c b/generic/tkBind.c index 11b2122..abdee59 100644 --- a/generic/tkBind.c +++ b/generic/tkBind.c @@ -2383,7 +2383,7 @@ ExpandPercents( string = numStorage; goto doString; case 'k': - if (flags & KEY) { + if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) { number = eventPtr->xkey.keycode; goto doNumber; } @@ -2523,7 +2523,7 @@ ExpandPercents( * This is used only by the MouseWheel event. */ - if (flags & KEY) { + if ((flags & KEY) && (eventPtr->type == MouseWheelEvent)) { number = eventPtr->xkey.keycode; goto doNumber; } @@ -2532,7 +2532,7 @@ ExpandPercents( number = (int) eventPtr->xany.send_event; goto doNumber; case 'K': - if (flags & KEY) { + if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) { char *name = TkKeysymToString(keySym); if (name != NULL) { @@ -2541,7 +2541,7 @@ ExpandPercents( } goto doString; case 'N': - if (flags & KEY) { + if ((flags & KEY) && (eventPtr->type != MouseWheelEvent)) { number = (int) keySym; goto doNumber; } |