Commit f9cb7772 authored by Jonathan Wilkes's avatar Jonathan Wilkes
Browse files

quick fix for backslashes in legacy tcl commands breaking the GUI parser--...

quick fix for backslashes in legacy tcl commands breaking the GUI parser-- just send "dummy" command arg
parent c7e380ab
...@@ -347,7 +347,7 @@ function gui_post_error(objectid, loglevel, errormsg) { ...@@ -347,7 +347,7 @@ function gui_post_error(objectid, loglevel, errormsg) {
} }
function gui_legacy_tcl_command(file, line_number, text) { function gui_legacy_tcl_command(file, line_number, text) {
post("legacy tcl command at " + line_number + " of " + file + ": " + text); post("legacy tcl command at " + line_number + " of " + file);
} }
function clear_console() { function clear_console() {
......
...@@ -951,8 +951,11 @@ void sys_vguid(const char *file, int line, const char *fmt, ...) ...@@ -951,8 +951,11 @@ void sys_vguid(const char *file, int line, const char *fmt, ...)
strncat(bufp, "...", MAXPDSTRING); strncat(bufp, "...", MAXPDSTRING);
} }
} }
/* For now, we're sending a dummy string instead of bufp to the GUI.
Unlike Pd messages, old tcl commands can contain stray backslashes
that can mess up the double quote delimiters for strings in gui_vmess.*/
gui_vmess("gui_legacy_tcl_command", "sis", gui_vmess("gui_legacy_tcl_command", "sis",
file, line, bufp); file, line, "dummy");
//sys_vvguid(file,line,fmt,ap); //sys_vvguid(file,line,fmt,ap);
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment