[gimp/wip/nielsdg/string-array-to-strv: 390/390] plug-ins: fixes after rebasing !389.

[Jehan <jehanp src gnome org>]

commit cd7293b5b19d272434f16c12410c6a6409594051
Author: Jehan <jehan girinstud io>
Date:   Mon May 24 21:49:27 2021 +0200

    plug-ins: fixes after rebasing !389.

 plug-ins/file-tiff/file-tiff-save.c | 5 ++---
 plug-ins/script-fu/scheme-wrapper.c | 5 +----
 2 files changed, 3 insertions(+), 7 deletions(-)
---
diff --git a/plug-ins/file-tiff/file-tiff-save.c b/plug-ins/file-tiff/file-tiff-save.c
index daea3f8501..e5b333c18c 100644
--- a/plug-ins/file-tiff/file-tiff-save.c
+++ b/plug-ins/file-tiff/file-tiff-save.c
@@ -1303,11 +1303,10 @@ save_dialog (GimpImage     *image,
   GimpCompression  compression;
   gboolean         run;
   gboolean         has_geotiff = FALSE;
-  gint             n_parasites;
   gint             i;
 
-  parasites = gimp_image_get_parasite_list (image, &n_parasites);
-  for (i = 0; i < n_parasites; i++)
+  parasites = gimp_image_get_parasite_list (image);
+  for (i = 0; parasites[i] != NULL; i++)
     {
       if (g_str_has_prefix (parasites[i], "Gimp_GeoTIFF_"))
         {
diff --git a/plug-ins/script-fu/scheme-wrapper.c b/plug-ins/script-fu/scheme-wrapper.c
index c31d488c88..31e0715aae 100644
--- a/plug-ins/script-fu/scheme-wrapper.c
+++ b/plug-ins/script-fu/scheme-wrapper.c
@@ -703,10 +703,7 @@ script_fu_marshal_procedure_call (scheme   *sc,
       else if (G_VALUE_HOLDS (&value, G_TYPE_STRV))
         {
           vector = sc->vptr->pair_car (a);  /* vector is pointing to a list */
-          if (! sc->vptr->is_list (sc, vector))
-            success = FALSE;
-
-          if (success)
+          if (sc->vptr->is_list (sc, vector))
             {
               gchar **array;