From d07ca5863be9e0ec4c60aae3b4f6023ec027cb71 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
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/unauthorized/; revision=15309
---
 scratcher~.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scratcher~.c')

diff --git a/scratcher~.c b/scratcher~.c
index d0a8c90..94de48c 100644
--- a/scratcher~.c
+++ b/scratcher~.c
@@ -814,7 +814,7 @@ void scratcher_tilde_setup(void)
     class_addmethod(scratcher_class, (t_method)scratcher_reset, gensym("reset"), A_NULL);
     class_addmethod(scratcher_class, (t_method)scratcher_dialog, gensym("dialog"), A_GIMME, A_NULL);
 
-    sys_vgui("eval [read [open %s/%s.tcl]]\n",
+    sys_vgui("eval [read [open {%s/%s.tcl}]]\n",
              scratcher_class->c_externdir->s_name, 
              scratcher_class->c_name->s_name);
 }
-- 
cgit v1.2.1