dallasgroot/Gimp
dallasgroot/Gimp
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Finish the reverting here.

Browse source 
2005-12-18  Manish Singh  <yosh@gimp.org>

        * plug-ins/script-fu/siod-wrapper.c: Finish the reverting here.
This commit is contained in:
Manish Singh 2005-12-18 19:27:21 +00:00 committed by Manish Singh
parent 4c36751144
commit b5044904b9
3 changed files with 22 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
ChangeLog
View file

@ -1,3 +1,7 @@
2005-12-18 Manish Singh <yosh@gimp.org>
* plug-ins/script-fu/siod-wrapper.c: Finish the reverting here.
2005-12-16 Kevin Cozens <kcozens@cvs.gnome.org>
* plug-ins/script-fu/siod/siod.h

11
plug-ins/script-fu/scheme-wrapper.c
View file

@ -725,12 +725,13 @@ marshall_proc_db_call (LISP a)
break;
case GIMP_PDB_STRINGARRAY:
if (!TYPEP (car (a), tc_string_array))
if (!TYPEP (car (a), tc_cons))
success = FALSE;
if (success)
{
gint n_elements = args[i - 1].data.d_int32;
LISP list = car (a);
gint j;
if ((n_elements < 0) || (n_elements > nlength (list)))
{
@ -742,7 +743,13 @@ marshall_proc_db_call (LISP a)
}
args[i].type = GIMP_PDB_STRINGARRAY;
args[i].data.d_stringarray = list->storage_as.string_array.data;
args[i].data.d_stringarray = g_new0 (gchar *, n_elements);
for (j = 0; j < n_elements; j++)
{
args[i].data.d_stringarray[j] = get_c_string (car (list));
list = cdr (list);
}
}
break;

11
plug-ins/script-fu/siod-wrapper.c
View file

@ -725,12 +725,13 @@ marshall_proc_db_call (LISP a)
break;
case GIMP_PDB_STRINGARRAY:
if (!TYPEP (car (a), tc_string_array))
if (!TYPEP (car (a), tc_cons))
success = FALSE;
if (success)
{
gint n_elements = args[i - 1].data.d_int32;
LISP list = car (a);
gint j;
if ((n_elements < 0) || (n_elements > nlength (list)))
{
@ -742,7 +743,13 @@ marshall_proc_db_call (LISP a)
}
args[i].type = GIMP_PDB_STRINGARRAY;
args[i].data.d_stringarray = list->storage_as.string_array.data;
args[i].data.d_stringarray = g_new0 (gchar *, n_elements);
for (j = 0; j < n_elements; j++)
{
args[i].data.d_stringarray[j] = get_c_string (car (list));
list = cdr (list);
}
}
break;