diff options
| author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2010-09-14 04:50:26 +0000 |
|---|---|---|
| committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2010-09-14 04:50:26 +0000 |
| commit | fc2c93fe82978abda4b3a5f0d349ac298a42767d (patch) | |
| tree | a718604cf12e72ba0f2329d23a9923ee468c8b0f /tkwidgets.c | |
| parent | b84ccf92049f602e6a18e4d4677454bdc9752f2f (diff) | |
fixed to work on Pd < 0.43
svn path=/trunk/externals/tkwidgets/; revision=14136
Diffstat (limited to 'tkwidgets.c')
| -rw-r--r-- | tkwidgets.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tkwidgets.c b/tkwidgets.c index 1100bbe..b37e03f 100644 --- a/tkwidgets.c +++ b/tkwidgets.c @@ -228,14 +228,14 @@ void tkwidgets_erase_y_scrollbar(t_symbol *widget_id, t_symbol *scrollbar_id) void tkwidgets_bind_key_events(t_symbol *canvas_id, t_symbol *widget_id) { #ifdef __APPLE__ - sys_vgui("bind %s <Mod1-Key> {::pd_bindings::sendkey %s %%K 0}\n", + sys_vgui("bind %s <Mod1-Key> {pdtk_canvas_ctrlkey %s %%K 0}\n", widget_id->s_name, canvas_id->s_name); - sys_vgui("bind %s <Mod1-Shift-Key> {::pd_bindings::sendkey %s %%K 1}\n", + sys_vgui("bind %s <Mod1-Shift-Key> {pdtk_canvas_ctrlkey %s %%K 1}\n", widget_id->s_name, canvas_id->s_name); #else - sys_vgui("bind %s <Control-Key> {::pd_bindings::sendkey %s %%K 0}\n", + sys_vgui("bind %s <Control-Key> {pdtk_canvas_ctrlkey %s %%K 0}\n", widget_id->s_name, canvas_id->s_name); - sys_vgui("bind %s <Control-Shift-Key> {::pd_bindings::sendkey %s %%K 1}\n", + sys_vgui("bind %s <Control-Shift-Key> {pdtk_canvas_ctrlkey %s %%K 1}\n", widget_id->s_name, canvas_id->s_name); #endif } @@ -243,7 +243,7 @@ void tkwidgets_bind_key_events(t_symbol *canvas_id, t_symbol *widget_id) void tkwidgets_bind_mouse_events(t_symbol *canvas_id, t_symbol *widget_id) { /* mouse buttons */ - sys_vgui("bind %s <Button> {pdtk_canvas_mouse %s \ + sys_vgui("bind %s <Button> {pdtk_canvas_sendclick %s \ [expr %%X - [winfo rootx %s]] [expr %%Y - [winfo rooty %s]] %%b 0}\n", widget_id->s_name, canvas_id->s_name, canvas_id->s_name, canvas_id->s_name); |