aboutsummaryrefslogtreecommitdiff
path: root/tkwidgets.c
diff options
context:
space:
mode:
Diffstat (limited to 'tkwidgets.c')
-rw-r--r--tkwidgets.c10
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);