From 0155aff44fbccfda1edb1c555bd58448cb468ed5 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 19 Sep 2011 16:54:20 +0000 Subject: quote the class.tcl file to be loaded using {} so spaces, special chars, etc. work in the path svn path=/trunk/externals/hcs/; revision=15309 --- cursor.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/cursor.c b/cursor.c index df747e8..c9e6b1c 100644 --- a/cursor.c +++ b/cursor.c @@ -161,8 +161,8 @@ void cursor_setup(void) class_addmethod(cursor_class, (t_method)cursor_setmethod, gensym("editmode_disconnect"), A_GIMME, 0); - /* TODO should this use t_class->c_name? */ - sys_vgui("eval [read [open %s/cursor.tcl]]\n", - cursor_class->c_externdir->s_name); + sys_vgui("eval [read [open {%s/%s.tcl}]]\n", + cursor_class->c_externdir->s_name, + cursor_class->c_name->s_name); sys_vgui("::hcs::cursor::setup %s\n", cursor_receive_symbol->s_name); } -- cgit v1.2.1