diff options
| author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 2007-01-22 08:28:15 +0000 |
|---|---|---|
| committer | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> | 2007-01-22 08:28:15 +0000 |
| commit | 0f5c7719938013adc74e844069a6772ea46c0a67 (patch) | |
| tree | e1b2e384deb1d618965bb2c52bf3264577e71acf /src/macselect.c | |
| parent | 1879b65c3d6a2c939ef57008bbce0adf7f367e07 (diff) | |
| download | emacs-0f5c7719938013adc74e844069a6772ea46c0a67.tar.gz | |
[TARGET_API_MAC_CARBON] (mac_do_receive_drag): Don't
pass keyboard modifiers to mac_store_drag_event, but put them as
kEventParamKeyModifiers Apple event parameter.
Diffstat (limited to 'src/macselect.c')
| -rw-r--r-- | src/macselect.c | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/macselect.c b/src/macselect.c index f9193574bfb..8e86c7651e2 100644 --- a/src/macselect.c +++ b/src/macselect.c @@ -1562,10 +1562,17 @@ mac_do_receive_drag (window, refcon, drag) GlobalToLocal (&mouse_pos); err = GetDragModifiers (drag, NULL, NULL, &modifiers); } + if (err == noErr) + { + UInt32 key_modifiers = modifiers; + + err = AEPutParamPtr (&apple_event, kEventParamKeyModifiers, + typeUInt32, &key_modifiers, sizeof (UInt32)); + } if (err == noErr) { - mac_store_drag_event (window, mouse_pos, modifiers, &apple_event); + mac_store_drag_event (window, mouse_pos, 0, &apple_event); AEDisposeDesc (&apple_event); mac_wakeup_from_rne (); return noErr; |