[gimp] script-fu: Don't print leading space when printing vectors



commit 262241cb21ec390c00f0e2976637852ad532d369
Author: Mukund Sivaraman <muks banu com>
Date:   Wed Aug 31 22:26:21 2011 +0530

    script-fu: Don't print leading space when printing vectors

 plug-ins/script-fu/tinyscheme/scheme.c |    3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)
---
diff --git a/plug-ins/script-fu/tinyscheme/scheme.c b/plug-ins/script-fu/tinyscheme/scheme.c
index 6f8273a..b89b02b 100644
--- a/plug-ins/script-fu/tinyscheme/scheme.c
+++ b/plug-ins/script-fu/tinyscheme/scheme.c
@@ -4478,7 +4478,8 @@ static pointer opexe_5(scheme *sc, enum scheme_opcodes op) {
                ivalue_unchecked(cdr(sc->args))=i+1;
                s_save(sc,OP_PVECFROM, sc->args, sc->NIL);
                sc->args=elem;
-               putstr(sc," ");
+               if (i > 0)
+                    putstr(sc," ");
                s_goto(sc,OP_P0LIST);
           }
      }



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]