plug-ins/script-fu/tinyscheme/scheme.[ch] small changes to tinyscheme -
2007-08-30 Simon Budig <simon@gimp.org> * plug-ins/script-fu/tinyscheme/scheme.[ch] * plug-ins/script-fu/tinyscheme/scheme-private.h: small changes to tinyscheme - mostly removing workarounds for message output. * plug-ins/script-fu/scheme-wrapper.[ch]: try to channel the output through a central function, have various output functions to handle the messages. Remove some hacks. * plug-ins/script-fu/script-fu-text-console.c * plug-ins/script-fu/script-fu-scripts.[ch] * plug-ins/script-fu/script-fu-interface.c * plug-ins/script-fu/script-fu.c * plug-ins/script-fu/script-fu-server.c * plug-ins/script-fu/script-fu-console.[ch]: use the new infrastructure. Remove more hacks. * plug-ins/script-fu/servertest.py: small script to test the communication with the script-fu-server. svn path=/trunk/; revision=23400
This commit is contained in:
@ -762,7 +762,7 @@ static void
|
||||
script_fu_ok (SFScript *script)
|
||||
{
|
||||
gchar *escaped;
|
||||
GString *s;
|
||||
GString *s, *output;
|
||||
gchar *command;
|
||||
gchar buffer[G_ASCII_DTOSTR_BUF_SIZE];
|
||||
gint i;
|
||||
@ -898,8 +898,11 @@ script_fu_ok (SFScript *script)
|
||||
command = g_string_free (s, FALSE);
|
||||
|
||||
/* run the command through the interpreter */
|
||||
output = g_string_new ("");
|
||||
ts_register_output_func (ts_gstring_output_func, output);
|
||||
if (ts_interpret_string (command))
|
||||
script_fu_error_msg (command);
|
||||
script_fu_error_msg (command, output->str);
|
||||
g_string_free (output, TRUE);
|
||||
|
||||
g_free (command);
|
||||
}
|
||||
|
Reference in New Issue
Block a user