diff --git a/pd/nw/pdgui.js b/pd/nw/pdgui.js index 242c64b23a85829fcf27d64d2000d9e332703517..80664e7afaae85cd519d5dc1f195b84f6ac44cd5 100644 --- a/pd/nw/pdgui.js +++ b/pd/nw/pdgui.js @@ -347,7 +347,7 @@ function gui_post_error(objectid, loglevel, errormsg) { } function gui_legacy_tcl_command(file, line_number, text) { - post("legacy tcl command at " + line_number + " of " + file); + post("legacy tcl command at " + line_number + " of " + file + ": " + text); } function clear_console() { diff --git a/pd/src/s_inter.c b/pd/src/s_inter.c index 88fb1974a0c17f55a81e8ee0caaad96e8550b193..b6e4d129fc07baf03f64e043a02b2db1bdb2946b 100644 --- a/pd/src/s_inter.c +++ b/pd/src/s_inter.c @@ -951,11 +951,8 @@ void sys_vguid(const char *file, int line, const char *fmt, ...) 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", - file, line, "dummy"); + file, line, bufp); //sys_vvguid(file,line,fmt,ap); }