aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormescalinum <mescalinum@users.sourceforge.net>2009-08-28 10:41:43 +0000
committermescalinum <mescalinum@users.sourceforge.net>2009-08-28 10:41:43 +0000
commitdf708ee8da3a30ff3509542791120a921089638c (patch)
tree23466299632b2915073fe5b56c29c2d9ee1fe458
parentacc57856c6188d2f13b140c4fcdbbfd1852fce09 (diff)
svn path=/trunk/externals/tclpd/; revision=12121
-rw-r--r--tcl_loader.cxx3
1 files changed, 1 insertions, 2 deletions
diff --git a/tcl_loader.cxx b/tcl_loader.cxx
index 47d8cc0..d4b45d1 100644
--- a/tcl_loader.cxx
+++ b/tcl_loader.cxx
@@ -19,7 +19,7 @@ extern "C" int tclpd_do_load_lib(t_canvas *canvas, char *objectname)
if ((fd = canvas_open(canvas, objectname, ".tcl",
dirbuf, &nameptr, MAXPDSTRING, 1)) >= 0)
goto gotone;
- /* next try (objectname)/(classname).(sys_dllextent) ... */
+ /* next try (objectname)/(classname).(tcl) ... */
strncpy(filename, objectname, MAXPDSTRING);
filename[MAXPDSTRING-2] = 0;
strcat(filename, "/");
@@ -28,7 +28,6 @@ extern "C" int tclpd_do_load_lib(t_canvas *canvas, char *objectname)
if ((fd = canvas_open(canvas, filename, ".tcl",
dirbuf, &nameptr, MAXPDSTRING, 1)) >= 0)
goto gotone;
- //post("Tcl_loader: tried and failed");
return (0);
gotone:
close(fd);