aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHans-Christoph Steiner <eighthave@users.sourceforge.net>2011-10-25 04:14:33 +0000
committerHans-Christoph Steiner <eighthave@users.sourceforge.net>2011-10-25 04:14:33 +0000
commit395274265ff73f92aaa00eaf1c5a37c0acd4e767 (patch)
treecb3c46128045f9fcef46e72409a4b4d2066e2764
parent0e92c962dabd566146d84295041961856593eb90 (diff)
updated to support 0.43 (renamed pdtk_enquote to enquote_path and added after idle/after 100 to launch panels that were hanging)
svn path=/trunk/externals/tof/; revision=15651
-rw-r--r--src/folderpanel.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/folderpanel.c b/src/folderpanel.c
index 1de13b3..e8184c0 100644
--- a/src/folderpanel.c
+++ b/src/folderpanel.c
@@ -13,7 +13,7 @@ proc pdtk_folderpanel {target localdir} {
set filename [tk_getSaveFile -initialdir $localdir]
}
if {$filename != ""} {
- pd [concat $target callback [pdtk_enquote $filename] \;]
+ pd [concat $target callback [enquote_path $filename] \;]
}
}
@@ -35,7 +35,7 @@ typedef struct _folderpanel
static void folderpanel_symbol(t_folderpanel *x, t_symbol *s)
{
char *path = (s && s->s_name) ? s->s_name : "\"\"";
- sys_vgui("tof_folderpanel %s \n", x->x_s->s_name);
+ sys_vgui("after idle [list after 100 tof_folderpanel %s]\n", x->x_s->s_name);
}
static void folderpanel_bang(t_folderpanel *x)
@@ -78,7 +78,7 @@ void folderpanel_setup(void)
sys_gui("proc tof_folderpanel {target} {\n");
sys_gui(" set path [tk_chooseDirectory] \n");
sys_gui(" if {$path != \"\"} {\n");
- sys_gui(" pdsend \"$target callback [pdtk_enquote $path]\"\n");
+ sys_gui(" pdsend \"$target callback [enquote_path $path]\"\n");
sys_gui(" }\n");
sys_gui("}\n");