diff options
| author | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-23 21:58:24 (GMT) |
|---|---|---|
| committer | patthoyts <patthoyts@users.sourceforge.net> | 2008-11-23 21:58:24 (GMT) |
| commit | 5eff66ecd844065a708ad18238f114174ef9ffe1 (patch) | |
| tree | 4ca0f6008e131429c87d3d92fa685222f04a00d5 /generic/tkBind.c | |
| parent | 972c1858b2265633c051f38792c0761763f5a870 (diff) | |
| download | tk-5eff66ecd844065a708ad18238f114174ef9ffe1.zip tk-5eff66ecd844065a708ad18238f114174ef9ffe1.tar.gz tk-5eff66ecd844065a708ad18238f114174ef9ffe1.tar.bz2 | |
[Bug 1389270] event generate silently ignored focus events. These can now be generated.
Diffstat (limited to 'generic/tkBind.c')
| -rw-r--r-- | generic/tkBind.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tkBind.c b/generic/tkBind.c index 42186c0..ed2a6ae 100644 --- a/generic/tkBind.c +++ b/generic/tkBind.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkBind.c,v 1.48 2008/11/08 19:04:05 dkf Exp $ + * RCS: @(#) $Id: tkBind.c,v 1.49 2008/11/23 21:58:24 patthoyts Exp $ */ #include "tkInt.h" @@ -3388,6 +3388,10 @@ HandleEventGenerate( event.xkey.y_root = -1; } + if (event.xany.type == FocusIn || event.xany.type == FocusOut) { + event.xany.send_event = GENERATED_FOCUS_EVENT_MAGIC; + } + /* * Process the remaining arguments to fill in additional fields of the * event. |