[gimp] Applied modified version of second patch for bug #642939. Original patch supplied by Nelson A. de Ol



commit b435e55d14a5d21aa533e479838441d584b828f0
Author: Kevin Cozens <kcozens cvs gnome org>
Date:   Wed Mar 2 02:55:43 2011 -0500

    Applied modified version of second patch for bug #642939.
    Original patch supplied by Nelson A. de Oliveira. Modified to not use the
    -1 "insanity" for invalid/none layer ID's in scripts per IRC discussion.
    Additional scripts were changed to not pass -1 to gimp-image-insert-layer.

 plug-ins/script-fu/scripts/3dTruchet.scm           |   10 +++++-----
 plug-ins/script-fu/scripts/add-bevel.scm           |    2 +-
 plug-ins/script-fu/scripts/addborder.scm           |    2 +-
 plug-ins/script-fu/scripts/alien-glow-arrow.scm    |    6 +++---
 plug-ins/script-fu/scripts/alien-glow-bar.scm      |    6 +++---
 plug-ins/script-fu/scripts/alien-glow-bullet.scm   |    6 +++---
 plug-ins/script-fu/scripts/alien-glow-button.scm   |    6 +++---
 plug-ins/script-fu/scripts/beveled-button.scm      |    4 ++--
 .../script-fu/scripts/beveled-pattern-arrow.scm    |    4 ++--
 .../script-fu/scripts/beveled-pattern-bullet.scm   |    4 ++--
 .../script-fu/scripts/beveled-pattern-button.scm   |    4 ++--
 .../script-fu/scripts/beveled-pattern-heading.scm  |    4 ++--
 .../script-fu/scripts/beveled-pattern-hrule.scm    |    4 ++--
 plug-ins/script-fu/scripts/blend-anim.scm          |    8 ++++----
 plug-ins/script-fu/scripts/burn-in-anim.scm        |    4 ++--
 plug-ins/script-fu/scripts/carve-it.scm            |    4 ++--
 plug-ins/script-fu/scripts/carved-logo.scm         |    2 +-
 plug-ins/script-fu/scripts/chrome-it.scm           |   12 ++++++------
 plug-ins/script-fu/scripts/circuit.scm             |    2 +-
 plug-ins/script-fu/scripts/clothify.scm            |    4 ++--
 plug-ins/script-fu/scripts/coffee.scm              |    2 +-
 plug-ins/script-fu/scripts/contactsheet.scm        |    4 ++--
 plug-ins/script-fu/scripts/crystal-logo.scm        |   10 +++++-----
 plug-ins/script-fu/scripts/difference-clouds.scm   |    2 +-
 plug-ins/script-fu/scripts/distress-selection.scm  |    2 +-
 plug-ins/script-fu/scripts/drop-shadow.scm         |    2 +-
 plug-ins/script-fu/scripts/flatland.scm            |    4 ++--
 plug-ins/script-fu/scripts/font-map.scm            |    4 ++--
 plug-ins/script-fu/scripts/frosty-logo.scm         |    8 ++++----
 plug-ins/script-fu/scripts/fuzzyborder.scm         |    4 ++--
 plug-ins/script-fu/scripts/gradient-example.scm    |    2 +-
 plug-ins/script-fu/scripts/grid-system.scm         |    2 +-
 plug-ins/script-fu/scripts/i26-gunya2.scm          |    6 +++---
 plug-ins/script-fu/scripts/lava.scm                |    2 +-
 plug-ins/script-fu/scripts/mkbrush.scm             |    8 ++++----
 plug-ins/script-fu/scripts/neon-logo.scm           |    2 +-
 plug-ins/script-fu/scripts/news-text.scm           |    4 ++--
 plug-ins/script-fu/scripts/old-photo.scm           |    2 +-
 plug-ins/script-fu/scripts/perspective-shadow.scm  |    2 +-
 plug-ins/script-fu/scripts/predator.scm            |    2 +-
 plug-ins/script-fu/scripts/pupi-button.scm         |    4 ++--
 plug-ins/script-fu/scripts/rendermap.scm           |    4 ++--
 plug-ins/script-fu/scripts/ripply-anim.scm         |    4 ++--
 plug-ins/script-fu/scripts/round-corners.scm       |    2 +-
 plug-ins/script-fu/scripts/script-fu-util.scm      |    2 +-
 plug-ins/script-fu/scripts/select-to-brush.scm     |    2 +-
 plug-ins/script-fu/scripts/select-to-image.scm     |    2 +-
 plug-ins/script-fu/scripts/select-to-pattern.scm   |    2 +-
 plug-ins/script-fu/scripts/slide.scm               |    4 ++--
 plug-ins/script-fu/scripts/sota-chrome-logo.scm    |   10 +++++-----
 plug-ins/script-fu/scripts/speed-text.scm          |    4 ++--
 plug-ins/script-fu/scripts/spinning-globe.scm      |    2 +-
 plug-ins/script-fu/scripts/swirltile.scm           |    2 +-
 plug-ins/script-fu/scripts/swirly-pattern.scm      |    2 +-
 plug-ins/script-fu/scripts/test-sphere.scm         |    2 +-
 plug-ins/script-fu/scripts/text-circle.scm         |    2 +-
 plug-ins/script-fu/scripts/title-header.scm        |    8 ++++----
 plug-ins/script-fu/scripts/truchet.scm             |    8 ++++----
 plug-ins/script-fu/scripts/unsharp-mask.scm        |   10 +++++-----
 plug-ins/script-fu/scripts/waves-anim.scm          |    2 +-
 plug-ins/script-fu/scripts/weave.scm               |    6 +++---
 plug-ins/script-fu/scripts/xach-effect.scm         |    4 ++--
 62 files changed, 130 insertions(+), 130 deletions(-)
---
diff --git a/plug-ins/script-fu/scripts/3dTruchet.scm b/plug-ins/script-fu/scripts/3dTruchet.scm
index dfb0b6c..429035d 100644
--- a/plug-ins/script-fu/scripts/3dTruchet.scm
+++ b/plug-ins/script-fu/scripts/3dTruchet.scm
@@ -84,8 +84,8 @@
           )
 
       (gimp-image-undo-disable temp-img)
-      (gimp-image-insert-layer temp-img temp-draw -1 0)
-      (gimp-image-insert-layer temp-img temp-draw2 -1 0)
+      (gimp-image-insert-layer temp-img temp-draw 0 0)
+      (gimp-image-insert-layer temp-img temp-draw2 0 0)
       (gimp-context-set-background backcolor)
       (gimp-edit-fill temp-draw BACKGROUND-FILL)
       (gimp-edit-fill temp-draw2 BACKGROUND-FILL)
@@ -181,9 +181,9 @@
     (gimp-image-undo-disable img)
     (gimp-image-undo-disable tile)
 
-    (gimp-image-insert-layer img layer-one -1 0)
-    (gimp-image-insert-layer tile tiledraw1 -1 0)
-    (gimp-image-insert-layer tile tiledraw2 -1 0)
+    (gimp-image-insert-layer img layer-one 0 0)
+    (gimp-image-insert-layer tile tiledraw1 0 0)
+    (gimp-image-insert-layer tile tiledraw2 0 0)
 
     ;just to look a little better
     (gimp-selection-all img)
diff --git a/plug-ins/script-fu/scripts/add-bevel.scm b/plug-ins/script-fu/scripts/add-bevel.scm
index fda8256..70fe42b 100644
--- a/plug-ins/script-fu/scripts/add-bevel.scm
+++ b/plug-ins/script-fu/scripts/add-bevel.scm
@@ -89,7 +89,7 @@
       (gimp-image-undo-group-start image)
     )
 
-    (gimp-image-insert-layer image bump-layer -1 1)
+    (gimp-image-insert-layer image bump-layer 0 1)
 
     ; If the layer we're bevelling is offset from the image's origin, we
     ; have to do the same to the bumpmap
diff --git a/plug-ins/script-fu/scripts/addborder.scm b/plug-ins/script-fu/scripts/addborder.scm
index 3849b47..379d64c 100644
--- a/plug-ins/script-fu/scripts/addborder.scm
+++ b/plug-ins/script-fu/scripts/addborder.scm
@@ -117,7 +117,7 @@
                        xsize
                        ysize)
 
-    (gimp-image-insert-layer img layer -1 0)
+    (gimp-image-insert-layer img layer 0 0)
     (gimp-drawable-fill layer TRANSPARENT-FILL)
 
     (gimp-context-set-background (adjcolour colour dvalue))
diff --git a/plug-ins/script-fu/scripts/alien-glow-arrow.scm b/plug-ins/script-fu/scripts/alien-glow-arrow.scm
index 4362ca2..54e8188 100644
--- a/plug-ins/script-fu/scripts/alien-glow-arrow.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-arrow.scm
@@ -131,9 +131,9 @@
 
     (gimp-image-undo-disable img)
     ;(gimp-image-resize img (+ length height) (+ height height) 0 0)
-    (gimp-image-insert-layer img bg-layer -1 1)
-    (gimp-image-insert-layer img glow-layer -1 -1)
-    (gimp-image-insert-layer img ruler-layer -1 -1)
+    (gimp-image-insert-layer img bg-layer 0 1)
+    (gimp-image-insert-layer img glow-layer 0 -1)
+    (gimp-image-insert-layer img ruler-layer 0 -1)
 
     (gimp-edit-clear glow-layer)
     (gimp-edit-clear ruler-layer)
diff --git a/plug-ins/script-fu/scripts/alien-glow-bar.scm b/plug-ins/script-fu/scripts/alien-glow-bar.scm
index e62f62e..dd656a1 100644
--- a/plug-ins/script-fu/scripts/alien-glow-bar.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-bar.scm
@@ -42,9 +42,9 @@
 
     (gimp-image-undo-disable img)
     (gimp-image-resize img (+ length height) (+ height height) 0 0)
-    (gimp-image-insert-layer img bg-layer -1 1)
-    (gimp-image-insert-layer img glow-layer -1 -1)
-    (gimp-image-insert-layer img ruler-layer -1 -1)
+    (gimp-image-insert-layer img bg-layer 0 1)
+    (gimp-image-insert-layer img glow-layer 0 -1)
+    (gimp-image-insert-layer img ruler-layer 0 -1)
 
    ; (gimp-layer-set-lock-alpha ruler-layer TRUE)
     (gimp-context-set-background bg-color)
diff --git a/plug-ins/script-fu/scripts/alien-glow-bullet.scm b/plug-ins/script-fu/scripts/alien-glow-bullet.scm
index 75c6a1d..38e1dee 100644
--- a/plug-ins/script-fu/scripts/alien-glow-bullet.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-bullet.scm
@@ -48,9 +48,9 @@
 
     (gimp-image-undo-disable img)
     (gimp-image-resize img diameter diameter 0 0)
-    (gimp-image-insert-layer img bg-layer -1 1)
-    (gimp-image-insert-layer img glow-layer -1 -1)
-    (gimp-image-insert-layer img bullet-layer -1 -1)
+    (gimp-image-insert-layer img bg-layer 0 1)
+    (gimp-image-insert-layer img glow-layer 0 -1)
+    (gimp-image-insert-layer img bullet-layer 0 -1)
 
     ; (gimp-layer-set-lock-alpha ruler-layer TRUE)
     (gimp-context-set-background bg-color)
diff --git a/plug-ins/script-fu/scripts/alien-glow-button.scm b/plug-ins/script-fu/scripts/alien-glow-button.scm
index 124db89..7a0a32d 100644
--- a/plug-ins/script-fu/scripts/alien-glow-button.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-button.scm
@@ -90,15 +90,15 @@
 
     ; Create bumpmap layer
 
-    (gimp-image-insert-layer img bg-layer -1 -1)
+    (gimp-image-insert-layer img bg-layer 0 -1)
     (gimp-context-set-foreground '(0 0 0))
     (gimp-context-set-background bg-color)
     (gimp-edit-fill bg-layer BACKGROUND-FILL)
-    (gimp-image-insert-layer img glow-layer -1 -1)
+    (gimp-image-insert-layer img glow-layer 0 -1)
 
     ; Create text layer
 
-    (gimp-image-insert-layer img button-layer -1 -1)
+    (gimp-image-insert-layer img button-layer 0 -1)
     (gimp-layer-set-offsets button-layer (/ glow-radius 2) (/ glow-radius 2))
     (gimp-selection-none img)
     (gimp-rect-select img 0 0 img-width img-height CHANNEL-OP-REPLACE FALSE 0)
diff --git a/plug-ins/script-fu/scripts/beveled-button.scm b/plug-ins/script-fu/scripts/beveled-button.scm
index adf4d39..5633aeb 100644
--- a/plug-ins/script-fu/scripts/beveled-button.scm
+++ b/plug-ins/script-fu/scripts/beveled-button.scm
@@ -86,7 +86,7 @@
 
     ; Create bumpmap layer
 
-    (gimp-image-insert-layer img bumpmap -1 -1)
+    (gimp-image-insert-layer img bumpmap 0 -1)
     (gimp-context-set-foreground '(0 0 0))
     (gimp-context-set-background '(255 255 255))
     (gimp-edit-fill bumpmap BACKGROUND-FILL)
@@ -107,7 +107,7 @@
 
     ; Create gradient layer
 
-    (gimp-image-insert-layer img gradient -1 -1)
+    (gimp-image-insert-layer img gradient 0 -1)
     (gimp-context-set-foreground ul-color)
     (gimp-context-set-background lr-color)
 
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm b/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
index 66a1845..3fdca9c 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
@@ -85,8 +85,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img background -1 -1)
-    (gimp-image-insert-layer img bumpmap -1 -1)
+    (gimp-image-insert-layer img background 0 -1)
+    (gimp-image-insert-layer img bumpmap 0 -1)
 
     ; Create pattern layer
 
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm b/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
index 4ee81f2..a2d9b02 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
@@ -29,8 +29,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img background -1 -1)
-    (gimp-image-insert-layer img bumpmap -1 -1)
+    (gimp-image-insert-layer img background 0 -1)
+    (gimp-image-insert-layer img bumpmap 0 -1)
 
     ; Create pattern layer
 
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-button.scm b/plug-ins/script-fu/scripts/beveled-pattern-button.scm
index e6aad41..9871014 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-button.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-button.scm
@@ -63,8 +63,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img background -1 1)
-    (gimp-image-insert-layer img bumpmap -1 1)
+    (gimp-image-insert-layer img background 0 1)
+    (gimp-image-insert-layer img bumpmap 0 1)
 
     ; Create pattern layer
 
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-heading.scm b/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
index a8737ab..9a240aa 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
@@ -48,8 +48,8 @@
 
     (gimp-image-undo-disable img)
     (gimp-image-resize img width height 0 0)
-    (gimp-image-insert-layer img background -1 1)
-    (gimp-image-insert-layer img bumpmap -1 1)
+    (gimp-image-insert-layer img background 0 1)
+    (gimp-image-insert-layer img bumpmap 0 1)
 
     ; Create pattern layer
 
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-hrule.scm b/plug-ins/script-fu/scripts/beveled-pattern-hrule.scm
index 640864f..2c58671 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-hrule.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-hrule.scm
@@ -33,8 +33,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img background -1 -1)
-    (gimp-image-insert-layer img bumpmap -1 -1)
+    (gimp-image-insert-layer img background 0 -1)
+    (gimp-image-insert-layer img bumpmap 0 -1)
 
     ; Create pattern layer
 
diff --git a/plug-ins/script-fu/scripts/blend-anim.scm b/plug-ins/script-fu/scripts/blend-anim.scm
index e682fe4..a0db22d 100644
--- a/plug-ins/script-fu/scripts/blend-anim.scm
+++ b/plug-ins/script-fu/scripts/blend-anim.scm
@@ -68,7 +68,7 @@
 			  ; add a copy of the lowest blend layer on top
 			  (let* ((copy (car (gimp-layer-copy
 						 (aref layer-array (- num-layers 2)) TRUE))))
-				(gimp-image-insert-layer image copy -1 0)
+				(gimp-image-insert-layer image copy 0 0)
 				(set! layers (gimp-image-get-layers image))
 				(set! num-layers (car layers))
 				(set! layer-array (cadr layers))
@@ -113,9 +113,9 @@
 				   (upper-copy (car (gimp-layer-copy upper-layer TRUE)))
 				   (lower-copy (car (gimp-layer-copy lower-layer TRUE)))
 				   (bg-copy (car (gimp-layer-copy bg-layer TRUE))))
-				  (gimp-image-insert-layer image bg-copy -1 0)
-				  (gimp-image-insert-layer image lower-copy -1 0)
-				  (gimp-image-insert-layer image upper-copy -1 0)
+				  (gimp-image-insert-layer image bg-copy 0 0)
+				  (gimp-image-insert-layer image lower-copy 0 0)
+				  (gimp-image-insert-layer image upper-copy 0 0)
 				  (gimp-item-set-visible upper-copy TRUE)
 				  (gimp-item-set-visible lower-copy TRUE)
 				  (gimp-item-set-visible bg-copy TRUE)
diff --git a/plug-ins/script-fu/scripts/burn-in-anim.scm b/plug-ins/script-fu/scripts/burn-in-anim.scm
index a3b46f4..29e9b26 100644
--- a/plug-ins/script-fu/scripts/burn-in-anim.scm
+++ b/plug-ins/script-fu/scripts/burn-in-anim.scm
@@ -74,7 +74,7 @@
               (set! bl-layer-name (string-append "fr-nr"
                                                  (number->string frame-nr 10) ) )
 
-              (gimp-image-insert-layer img bl-layer -1 -2)
+              (gimp-image-insert-layer img bl-layer 0 -2)
               (gimp-item-set-name bl-layer bl-layer-name)
               (gimp-item-set-visible bl-layer TRUE)
               (gimp-layer-set-lock-alpha bl-layer TRUE)
@@ -164,7 +164,7 @@
 
               ;--- merge with bg layer
               (set! bg-layer (car (gimp-layer-copy bg-source-layer FALSE)))
-              (gimp-image-insert-layer img bg-layer -1 -1)
+              (gimp-image-insert-layer img bg-layer 0 -1)
               (gimp-image-lower-item img bg-layer)
               (set! bg-layer-name (string-append "bg-"
                                                  (number->string frame-nr 10)))
diff --git a/plug-ins/script-fu/scripts/carve-it.scm b/plug-ins/script-fu/scripts/carve-it.scm
index 547d1f5..7335981 100644
--- a/plug-ins/script-fu/scripts/carve-it.scm
+++ b/plug-ins/script-fu/scripts/carve-it.scm
@@ -80,7 +80,7 @@
 
     (gimp-image-undo-disable img)
 
-    (gimp-image-insert-layer img layer1 -1 0)
+    (gimp-image-insert-layer img layer1 0 0)
 
     (gimp-selection-all img)
     (gimp-edit-clear layer1)
@@ -149,7 +149,7 @@
     (gimp-edit-fill csl-mask BACKGROUND-FILL)
 
     (set! inset-layer (car (gimp-layer-copy layer1 TRUE)))
-    (gimp-image-insert-layer img inset-layer -1 1)
+    (gimp-image-insert-layer img inset-layer 0 1)
 
     (set! il-mask (car (gimp-layer-create-mask inset-layer ADD-BLACK-MASK)))
     (gimp-layer-add-mask inset-layer il-mask)
diff --git a/plug-ins/script-fu/scripts/carved-logo.scm b/plug-ins/script-fu/scripts/carved-logo.scm
index 5577e52..e6746ad 100644
--- a/plug-ins/script-fu/scripts/carved-logo.scm
+++ b/plug-ins/script-fu/scripts/carved-logo.scm
@@ -128,7 +128,7 @@
     (gimp-edit-fill csl-mask BACKGROUND-FILL)
 
     (set! inset-layer (car (gimp-layer-copy layer1 TRUE)))
-    (gimp-image-insert-layer img inset-layer -1 1)
+    (gimp-image-insert-layer img inset-layer 0 1)
 
     (set! il-mask (car (gimp-layer-create-mask inset-layer ADD-BLACK-MASK)))
     (gimp-layer-add-mask inset-layer il-mask)
diff --git a/plug-ins/script-fu/scripts/chrome-it.scm b/plug-ins/script-fu/scripts/chrome-it.scm
index d291975..5072708 100644
--- a/plug-ins/script-fu/scripts/chrome-it.scm
+++ b/plug-ins/script-fu/scripts/chrome-it.scm
@@ -114,10 +114,10 @@
     (gimp-image-undo-disable img)
 
     (gimp-image-insert-channel img mask -1 0)
-    (gimp-image-insert-layer img bg-layer -1 0)
-    (gimp-image-insert-layer img shadow -1 0)
-    (gimp-image-insert-layer img layer3 -1 0)
-    (gimp-image-insert-layer img layer2 -1 0)
+    (gimp-image-insert-layer img bg-layer 0 0)
+    (gimp-image-insert-layer img shadow 0 0)
+    (gimp-image-insert-layer img layer3 0 0)
+    (gimp-image-insert-layer img layer2 0 0)
 
     (gimp-edit-copy mask-drawable)
     (set! mask-fs (car (gimp-edit-paste mask FALSE)))
@@ -146,7 +146,7 @@
     (set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
     (gimp-invert layer2)
 
-    (gimp-image-insert-layer img layer1 -1 0)
+    (gimp-image-insert-layer img layer1 0 0)
     (copy-layer-chrome-it img layer1 banding-img banding-layer)
     (gimp-image-delete banding-img)
     (gimp-layer-scale layer1 width height FALSE)
@@ -162,7 +162,7 @@
     (gimp-edit-fill layer-mask BACKGROUND-FILL)
 
     (set! layer2 (car (gimp-layer-copy layer1 TRUE)))
-    (gimp-image-insert-layer img layer2 -1 0)
+    (gimp-image-insert-layer img layer2 0 0)
     (gimp-context-set-brush (brush brush-size))
     (gimp-context-set-foreground '(255 255 255))
     (gimp-edit-stroke layer-mask)
diff --git a/plug-ins/script-fu/scripts/circuit.scm b/plug-ins/script-fu/scripts/circuit.scm
index d730c64..a0ef443 100644
--- a/plug-ins/script-fu/scripts/circuit.scm
+++ b/plug-ins/script-fu/scripts/circuit.scm
@@ -81,7 +81,7 @@
                                                   100
                                                   NORMAL-MODE)))
 
-          (gimp-image-insert-layer image effect-layer -1 -1)
+          (gimp-image-insert-layer image effect-layer 0 -1)
           (gimp-layer-set-offsets effect-layer select-offset-x select-offset-y)
           (gimp-selection-none image)
           (gimp-edit-clear effect-layer)
diff --git a/plug-ins/script-fu/scripts/clothify.scm b/plug-ins/script-fu/scripts/clothify.scm
index cacc30d..b58b5e0 100644
--- a/plug-ins/script-fu/scripts/clothify.scm
+++ b/plug-ins/script-fu/scripts/clothify.scm
@@ -19,7 +19,7 @@
 
     (gimp-image-undo-disable img)
 
-    (gimp-image-insert-layer img layer-one -1 0)
+    (gimp-image-insert-layer img layer-one 0 0)
 
     (gimp-context-set-background '(255 255 255))
     (gimp-edit-fill layer-one BACKGROUND-FILL)
@@ -28,7 +28,7 @@
 
     (set! layer-two (car (gimp-layer-copy layer-one 0)))
     (gimp-layer-set-mode layer-two MULTIPLY-MODE)
-    (gimp-image-insert-layer img layer-two -1 0)
+    (gimp-image-insert-layer img layer-two 0 0)
 
     (plug-in-gauss-rle RUN-NONINTERACTIVE img layer-one bx TRUE FALSE)
     (plug-in-gauss-rle RUN-NONINTERACTIVE img layer-two by FALSE TRUE)
diff --git a/plug-ins/script-fu/scripts/coffee.scm b/plug-ins/script-fu/scripts/coffee.scm
index 1f6fba6..64dde55 100644
--- a/plug-ins/script-fu/scripts/coffee.scm
+++ b/plug-ins/script-fu/scripts/coffee.scm
@@ -36,7 +36,7 @@
                                           (if (= inDark TRUE)
                                               DARKEN-ONLY-MODE NORMAL-MODE))))
 
-      (gimp-image-insert-layer theImage theStain -1 0)
+      (gimp-image-insert-layer theImage theStain 0 0)
       (gimp-selection-all theImage)
       (gimp-edit-clear theStain)
 
diff --git a/plug-ins/script-fu/scripts/contactsheet.scm b/plug-ins/script-fu/scripts/contactsheet.scm
index d766cc9..e691445 100644
--- a/plug-ins/script-fu/scripts/contactsheet.scm
+++ b/plug-ins/script-fu/scripts/contactsheet.scm
@@ -201,7 +201,7 @@
     (set! sheet-layer (car (gimp-layer-new sheet-img sheet-width sheet-height
                             RGB-IMAGE "Background"
                             100 NORMAL-MODE)))
-    (gimp-image-add-layer sheet-img sheet-layer 0)
+    (gimp-image-insert-layer sheet-img sheet-layer 0 0)
 
     (init-sheet-img sheet-img sheet-num sheet-width border-y off-y)
 
@@ -229,7 +229,7 @@
                             (car (gimp-image-get-active-drawable new-img))
                                   sheet-img)))
 
-              (gimp-image-add-layer sheet-img tmp-layer 0)
+              (gimp-image-insert-layer sheet-img tmp-layer 0 0)
 
               ;Move thumbnail in to position and center it in area available.
               (gimp-layer-set-offsets tmp-layer
diff --git a/plug-ins/script-fu/scripts/crystal-logo.scm b/plug-ins/script-fu/scripts/crystal-logo.scm
index 488c60f..103232f 100644
--- a/plug-ins/script-fu/scripts/crystal-logo.scm
+++ b/plug-ins/script-fu/scripts/crystal-logo.scm
@@ -116,8 +116,8 @@
     (gimp-image-delete back-img)
     (gimp-image-undo-disable img)
     (gimp-image-resize img width height 0 0)
-    (gimp-image-add-layer img layer3 0)
-    (gimp-image-add-layer img layer2 0)
+    (gimp-image-insert-layer img layer3 0 0)
+    (gimp-image-insert-layer img layer2 0 0)
     (gimp-context-set-background '(255 255 255))
     (gimp-selection-none img)
     (gimp-edit-fill layer2 BACKGROUND-FILL)
@@ -135,7 +135,7 @@
     (set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
     (gimp-invert layer2)
 
-    (gimp-image-add-layer img layer1 0)
+    (gimp-image-insert-layer img layer1 0 0)
     (copy-layer-crystal img layer1 banding-img banding-layer)
     (gimp-image-delete banding-img)
     (gimp-layer-scale layer1 width height FALSE)
@@ -164,11 +164,11 @@
 
 
 
-    (gimp-image-add-layer img bg-layer 2)
+    (gimp-image-insert-layer img bg-layer 0 2)
     (copy-layer-crystal img bg-layer tile-img tile-layer)
     (gimp-image-delete tile-img)
     (set! layer2 (car (gimp-layer-copy bg-layer TRUE)))
-    (gimp-image-add-layer img layer2 1)
+    (gimp-image-insert-layer img layer2 0 1)
 
     (plug-in-displace RUN-NONINTERACTIVE img layer2 displace displace TRUE TRUE disp-map disp-map 0)
     (set! layer-mask2 (car (gimp-layer-create-mask layer2 ADD-BLACK-MASK)))
diff --git a/plug-ins/script-fu/scripts/difference-clouds.scm b/plug-ins/script-fu/scripts/difference-clouds.scm
index 3a5082f..45ac44d 100644
--- a/plug-ins/script-fu/scripts/difference-clouds.scm
+++ b/plug-ins/script-fu/scripts/difference-clouds.scm
@@ -38,7 +38,7 @@
     (gimp-image-undo-group-start image)
 
     ; Add the cloud layer above the current layer
-    (gimp-image-insert-layer image diff-clouds -1 -1)
+    (gimp-image-insert-layer image diff-clouds 0 -1)
 
     ; Clear the layer (so there are no noise in it)
     (gimp-drawable-fill diff-clouds TRANSPARENT-FILL)
diff --git a/plug-ins/script-fu/scripts/distress-selection.scm b/plug-ins/script-fu/scripts/distress-selection.scm
index b347fca..dcd6e9c 100644
--- a/plug-ins/script-fu/scripts/distress-selection.scm
+++ b/plug-ins/script-fu/scripts/distress-selection.scm
@@ -50,7 +50,7 @@
                                       100
                                       NORMAL-MODE)))
 
-  (gimp-image-insert-layer theImage theLayer -1 0)
+  (gimp-image-insert-layer theImage theLayer 0 0)
 
   (if (= FALSE (car (gimp-selection-is-empty theImage)))
       (gimp-edit-fill theLayer BACKGROUND-FILL)
diff --git a/plug-ins/script-fu/scripts/drop-shadow.scm b/plug-ins/script-fu/scripts/drop-shadow.scm
index 0b05a6c..8ec6d83 100644
--- a/plug-ins/script-fu/scripts/drop-shadow.scm
+++ b/plug-ins/script-fu/scripts/drop-shadow.scm
@@ -126,7 +126,7 @@
                                             "Drop Shadow"
                                             shadow-opacity
                                             NORMAL-MODE)))
-    (gimp-image-insert-layer image shadow-layer -1 -1)
+    (gimp-image-insert-layer image shadow-layer 0 -1)
     (gimp-layer-set-offsets shadow-layer
                             shadow-offset-x
                             shadow-offset-y))
diff --git a/plug-ins/script-fu/scripts/flatland.scm b/plug-ins/script-fu/scripts/flatland.scm
index bba05f1..fe3261b 100644
--- a/plug-ins/script-fu/scripts/flatland.scm
+++ b/plug-ins/script-fu/scripts/flatland.scm
@@ -41,13 +41,13 @@
         )
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img layer-one 0)
+    (gimp-image-insert-layer img layer-one 0 0)
    ; (gimp-img-add-layer img layer-two 1)
 
     (plug-in-solid-noise RUN-NONINTERACTIVE img layer-one 1 0 seed detail xscale yscale )
     (plug-in-c-astretch RUN-NONINTERACTIVE img layer-one)
     (set! layer-two (car (gimp-layer-copy layer-one TRUE)))
-    (gimp-image-add-layer img layer-two -1)
+    (gimp-image-insert-layer img layer-two 0 -1)
     (gimp-image-set-active-layer img layer-two)
 
     (plug-in-gradmap RUN-NONINTERACTIVE img layer-two)
diff --git a/plug-ins/script-fu/scripts/font-map.scm b/plug-ins/script-fu/scripts/font-map.scm
index 870a0d3..3183333 100644
--- a/plug-ins/script-fu/scripts/font-map.scm
+++ b/plug-ins/script-fu/scripts/font-map.scm
@@ -93,7 +93,7 @@
           (gimp-context-set-background '(255 255 255))
           (gimp-context-set-foreground '(0 0 0))))
 
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
     (gimp-edit-clear drawable)
 
     (if (= labels TRUE)
@@ -102,7 +102,7 @@
                                               (if (= colors 0)
                                                   GRAYA-IMAGE RGBA-IMAGE)
                                               "Labels" 100 NORMAL-MODE)))
-          (gimp-image-add-layer img drawable -1)))
+          (gimp-image-insert-layer img drawable 0 -1)))
           (gimp-edit-clear drawable)
 
     (while (< count num-fonts)
diff --git a/plug-ins/script-fu/scripts/frosty-logo.scm b/plug-ins/script-fu/scripts/frosty-logo.scm
index ce8b208..0d45b8e 100644
--- a/plug-ins/script-fu/scripts/frosty-logo.scm
+++ b/plug-ins/script-fu/scripts/frosty-logo.scm
@@ -38,11 +38,11 @@
     (if ( = isnew 1) (script-fu-util-image-resize-from-layer img shadow-layer))
 
     (gimp-layer-add-mask logo-layer logo-layer-mask)
-    (gimp-image-add-layer img sparkle-layer (+ 1 stack))
-    (gimp-image-add-layer img matte-layer (+ 2 stack))
-    (gimp-image-add-layer img shadow-layer (+ 3 stack))
+    (gimp-image-insert-layer img sparkle-layer 0 (+ 1 stack))
+    (gimp-image-insert-layer img matte-layer 0 (+ 2 stack))
+    (gimp-image-insert-layer img shadow-layer 0 (+ 3 stack))
     (gimp-layer-translate shadow-layer (- border) (- border))
-    (gimp-image-add-layer img bg-layer 5)
+    (gimp-image-insert-layer img bg-layer 0 5)
     (gimp-selection-none img)
     (gimp-edit-clear sparkle-layer)
     (gimp-edit-clear matte-layer)
diff --git a/plug-ins/script-fu/scripts/fuzzyborder.scm b/plug-ins/script-fu/scripts/fuzzyborder.scm
index 950d985..abac939 100644
--- a/plug-ins/script-fu/scripts/fuzzyborder.scm
+++ b/plug-ins/script-fu/scripts/fuzzyborder.scm
@@ -61,7 +61,7 @@
                                         100
                                         NORMAL-MODE)))
 
-    (gimp-image-add-layer theImage theLayer 0)
+    (gimp-image-insert-layer theImage theLayer 0 0)
 
 
     (gimp-edit-clear theLayer)
@@ -97,7 +97,7 @@
     (if (= inShadow TRUE)
         (begin
           (gimp-selection-none inImage)
-          (gimp-image-add-layer theImage
+          (gimp-image-insert-layer theImage -1
                                 (car (gimp-layer-copy theLayer FALSE)) 0)
           (gimp-layer-scale theLayer
                             (- theWidth inSize) (- theHeight inSize) TRUE)
diff --git a/plug-ins/script-fu/scripts/gradient-example.scm b/plug-ins/script-fu/scripts/gradient-example.scm
index 0ed4919..cf85ed1 100644
--- a/plug-ins/script-fu/scripts/gradient-example.scm
+++ b/plug-ins/script-fu/scripts/gradient-example.scm
@@ -33,7 +33,7 @@
         )
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     ; Render background checkerboard
 
diff --git a/plug-ins/script-fu/scripts/grid-system.scm b/plug-ins/script-fu/scripts/grid-system.scm
index 4e83793..c3f5f37 100644
--- a/plug-ins/script-fu/scripts/grid-system.scm
+++ b/plug-ins/script-fu/scripts/grid-system.scm
@@ -52,7 +52,7 @@
     (gimp-image-undo-group-start img)
 
     (set! grid-layer (car (gimp-layer-copy drw TRUE)))
-    (gimp-image-add-layer img grid-layer 0)
+    (gimp-image-insert-layer img grid-layer 0 0)
     (gimp-edit-clear grid-layer)
     (gimp-item-set-name grid-layer "Grid Layer")
 
diff --git a/plug-ins/script-fu/scripts/i26-gunya2.scm b/plug-ins/script-fu/scripts/i26-gunya2.scm
index df96500..33a3764 100644
--- a/plug-ins/script-fu/scripts/i26-gunya2.scm
+++ b/plug-ins/script-fu/scripts/i26-gunya2.scm
@@ -36,9 +36,9 @@
     (gimp-image-undo-disable img)
     (gimp-image-undo-disable distortion-img)
     (gimp-image-resize img width height 0 0)
-    (gimp-image-add-layer img dist-text-layer -1)
-    (gimp-image-add-layer img dist-frame-layer -1)
-    (gimp-image-add-layer distortion-img distortion-layer -1)
+    (gimp-image-insert-layer img dist-text-layer 0 -1)
+    (gimp-image-insert-layer img dist-frame-layer 0 -1)
+    (gimp-image-insert-layer distortion-img distortion-layer 0 -1)
     (gimp-selection-none img)
     (gimp-edit-clear dist-text-layer)
     (gimp-edit-clear dist-frame-layer)
diff --git a/plug-ins/script-fu/scripts/lava.scm b/plug-ins/script-fu/scripts/lava.scm
index 3028b0f..858a02a 100644
--- a/plug-ins/script-fu/scripts/lava.scm
+++ b/plug-ins/script-fu/scripts/lava.scm
@@ -75,7 +75,7 @@
                                                 100
                                                 NORMAL-MODE)))
 
-          (gimp-image-add-layer image lava-layer -1)
+          (gimp-image-insert-layer image lava-layer 0 -1)
           (gimp-layer-set-offsets lava-layer select-offset-x select-offset-y)
           (gimp-selection-none image)
           (gimp-edit-clear lava-layer)
diff --git a/plug-ins/script-fu/scripts/mkbrush.scm b/plug-ins/script-fu/scripts/mkbrush.scm
index 7545a4d..37a4a96 100644
--- a/plug-ins/script-fu/scripts/mkbrush.scm
+++ b/plug-ins/script-fu/scripts/mkbrush.scm
@@ -38,7 +38,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img drawable -1 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(255 255 255))
     (gimp-drawable-fill drawable BACKGROUND-FILL)
@@ -97,7 +97,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img drawable -1 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(255 255 255))
     (gimp-drawable-fill drawable BACKGROUND-FILL)
@@ -157,7 +157,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img drawable -1 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(255 255 255))
     (gimp-drawable-fill drawable BACKGROUND-FILL)
@@ -216,7 +216,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-insert-layer img drawable -1 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(255 255 255))
     (gimp-drawable-fill drawable BACKGROUND-FILL)
diff --git a/plug-ins/script-fu/scripts/neon-logo.scm b/plug-ins/script-fu/scripts/neon-logo.scm
index f70eb19..e3e04eb 100644
--- a/plug-ins/script-fu/scripts/neon-logo.scm
+++ b/plug-ins/script-fu/scripts/neon-logo.scm
@@ -145,7 +145,7 @@
     (script-fu-util-image-add-layers img glow-layer bg-layer)
     (if (not (= shadow 0))
         (begin
-          (gimp-image-add-layer img shadow-layer -1)
+          (gimp-image-insert-layer img shadow-layer 0 -1)
           (gimp-edit-clear shadow-layer)))
 
     (gimp-context-set-background '(0 0 0))
diff --git a/plug-ins/script-fu/scripts/news-text.scm b/plug-ins/script-fu/scripts/news-text.scm
index e61fd31..21b455a 100644
--- a/plug-ins/script-fu/scripts/news-text.scm
+++ b/plug-ins/script-fu/scripts/news-text.scm
@@ -34,8 +34,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img bg-layer 1)
-    (gimp-image-add-layer img text-layer -1)
+    (gimp-image-insert-layer img bg-layer 0 1)
+    (gimp-image-insert-layer img text-layer 0 -1)
 
     (gimp-context-set-background bg-color)
     (gimp-edit-clear bg-layer)
diff --git a/plug-ins/script-fu/scripts/old-photo.scm b/plug-ins/script-fu/scripts/old-photo.scm
index 12b4d24..ab51978 100644
--- a/plug-ins/script-fu/scripts/old-photo.scm
+++ b/plug-ins/script-fu/scripts/old-photo.scm
@@ -62,7 +62,7 @@
 					 100 DARKEN-ONLY-MODE)))
 	    )
 
-             (gimp-image-add-layer theImage mLayer 0)
+             (gimp-image-insert-layer theImage mLayer 0 0)
              (gimp-selection-all theImage)
              (gimp-edit-clear mLayer)
              (gimp-selection-none theImage)
diff --git a/plug-ins/script-fu/scripts/perspective-shadow.scm b/plug-ins/script-fu/scripts/perspective-shadow.scm
index 1967b6c..c4deaf4 100644
--- a/plug-ins/script-fu/scripts/perspective-shadow.scm
+++ b/plug-ins/script-fu/scripts/perspective-shadow.scm
@@ -102,7 +102,7 @@
                                             NORMAL-MODE)))
 
 
-    (gimp-image-insert-layer image shadow-layer -1 -1)
+    (gimp-image-insert-layer image shadow-layer 0 -1)
     (gimp-layer-set-offsets shadow-layer select-offset-x select-offset-y)
     (gimp-drawable-fill shadow-layer TRANSPARENT-FILL)
     (gimp-context-set-background shadow-color)
diff --git a/plug-ins/script-fu/scripts/predator.scm b/plug-ins/script-fu/scripts/predator.scm
index 211c6eb..3bc0b7e 100644
--- a/plug-ins/script-fu/scripts/predator.scm
+++ b/plug-ins/script-fu/scripts/predator.scm
@@ -78,7 +78,7 @@
           )
 
           (gimp-layer-set-offsets effect-layer select-offset-x select-offset-y)
-          (gimp-image-add-layer image effect-layer -1)
+          (gimp-image-insert-layer image effect-layer 0 -1)
           (gimp-selection-none image)
           (gimp-edit-clear effect-layer)
 
diff --git a/plug-ins/script-fu/scripts/pupi-button.scm b/plug-ins/script-fu/scripts/pupi-button.scm
index 39543cb..5b81117 100644
--- a/plug-ins/script-fu/scripts/pupi-button.scm
+++ b/plug-ins/script-fu/scripts/pupi-button.scm
@@ -119,7 +119,7 @@
 
     ; Create bumpmap layer
 
-    (gimp-image-add-layer img bumpmap -1)
+    (gimp-image-insert-layer img bumpmap 0 -1)
     (gimp-selection-none img)
     (gimp-context-set-background '(0 0 0))
     (gimp-edit-fill bumpmap BACKGROUND-FILL)
@@ -134,7 +134,7 @@
 
     ; Create gradient layer
 
-    (gimp-image-add-layer img gradient -1)
+    (gimp-image-insert-layer img gradient 0 -1)
     (gimp-edit-clear gradient)
     (round-select img 0 0 width height ratio)
     (gimp-context-set-foreground ul-color)
diff --git a/plug-ins/script-fu/scripts/rendermap.scm b/plug-ins/script-fu/scripts/rendermap.scm
index a631cdd..3cfbd21 100644
--- a/plug-ins/script-fu/scripts/rendermap.scm
+++ b/plug-ins/script-fu/scripts/rendermap.scm
@@ -36,7 +36,7 @@
                                       RGBA-IMAGE
                                       "I've got more rubber ducks than you!"
                                       100 NORMAL-MODE)))
-  (gimp-image-add-layer theImage theLayer 0)
+  (gimp-image-insert-layer theImage theLayer 0 0)
   (plug-in-solid-noise RUN-NONINTERACTIVE
 		       theImage theLayer 1 0 (rand 65536)
                        inGrain inGrain inGrain)
@@ -46,7 +46,7 @@
         (set! thinLayer (car (gimp-layer-new theImage theWidth theHeight
                                              RGBA-IMAGE "Camo Thin Layer"
                                              100 NORMAL-MODE)))
-        (gimp-image-add-layer theImage thinLayer 0)
+        (gimp-image-insert-layer theImage thinLayer 0 0)
 
         (let ((theBigGrain (min 15 (* 2 inGrain))))
           (plug-in-solid-noise RUN-NONINTERACTIVE
diff --git a/plug-ins/script-fu/scripts/ripply-anim.scm b/plug-ins/script-fu/scripts/ripply-anim.scm
index 7a4e5a9..b2a1605 100644
--- a/plug-ins/script-fu/scripts/ripply-anim.scm
+++ b/plug-ins/script-fu/scripts/ripply-anim.scm
@@ -46,7 +46,7 @@
 
     (gimp-image-undo-disable ripple-image)
     (gimp-context-set-background '(127 127 127))
-    (gimp-image-add-layer ripple-image ripple-layer 0)
+    (gimp-image-insert-layer ripple-image ripple-layer 0 0)
     (gimp-edit-fill ripple-layer BACKGROUND-FILL)
     (plug-in-noisify RUN-NONINTERACTIVE ripple-image ripple-layer FALSE 1.0 1.0 1.0 0.0)
     ; tile noise
@@ -89,7 +89,7 @@
       (set! this-layer (car (gimp-layer-new out-imagestack
                                             width height RGB
                                             layer-name 100 NORMAL-MODE)))
-      (gimp-image-add-layer out-imagestack this-layer 0)
+      (gimp-image-insert-layer out-imagestack this-layer 0 0)
 
       (copy-layer-ripple out-imagestack this-layer img drawable)
 
diff --git a/plug-ins/script-fu/scripts/round-corners.scm b/plug-ins/script-fu/scripts/round-corners.scm
index e97c923..1a9e241 100644
--- a/plug-ins/script-fu/scripts/round-corners.scm
+++ b/plug-ins/script-fu/scripts/round-corners.scm
@@ -105,7 +105,7 @@
                                             100
                                             NORMAL-MODE))))
         (gimp-drawable-fill bg-layer BACKGROUND-FILL)
-        (gimp-image-add-layer image bg-layer -1)
+        (gimp-image-insert-layer image bg-layer 0 -1)
         (gimp-image-raise-layer image pic-layer)
         (if (= shadow-toggle TRUE)
             (gimp-image-lower-layer image bg-layer))))
diff --git a/plug-ins/script-fu/scripts/script-fu-util.scm b/plug-ins/script-fu/scripts/script-fu-util.scm
index ff2df68..3a750dd 100644
--- a/plug-ins/script-fu/scripts/script-fu-util.scm
+++ b/plug-ins/script-fu/scripts/script-fu-util.scm
@@ -38,7 +38,7 @@
   (while (not (null? layers))
     (let ((layer (car layers)))
       (set! layers (cdr layers))
-      (gimp-image-add-layer image layer -1)
+      (gimp-image-insert-layer image layer 0 -1)
       (gimp-image-lower-layer image layer)
     )
   )
diff --git a/plug-ins/script-fu/scripts/select-to-brush.scm b/plug-ins/script-fu/scripts/select-to-brush.scm
index 8881441..d3e32a7 100644
--- a/plug-ins/script-fu/scripts/select-to-brush.scm
+++ b/plug-ins/script-fu/scripts/select-to-brush.scm
@@ -86,7 +86,7 @@
                                100
                                NORMAL-MODE)))
 
-    (gimp-image-insert-layer brush-image brush-draw -1 0)
+    (gimp-image-insert-layer brush-image brush-draw 0 0)
 
     (gimp-selection-none brush-image)
 
diff --git a/plug-ins/script-fu/scripts/select-to-image.scm b/plug-ins/script-fu/scripts/select-to-image.scm
index db7c511..9c1413a 100644
--- a/plug-ins/script-fu/scripts/select-to-image.scm
+++ b/plug-ins/script-fu/scripts/select-to-image.scm
@@ -60,7 +60,7 @@
     (set! new-draw (car (gimp-layer-new new-image
                                         selection-width selection-height
                                         draw-type "Selection" 100 NORMAL-MODE)))
-    (gimp-image-insert-layer new-image new-draw -1 0)
+    (gimp-image-insert-layer new-image new-draw 0 0)
     (gimp-drawable-fill new-draw BACKGROUND-FILL)
 
     (let ((floating-sel (car (gimp-edit-paste new-draw FALSE))))
diff --git a/plug-ins/script-fu/scripts/select-to-pattern.scm b/plug-ins/script-fu/scripts/select-to-pattern.scm
index a5bfc18..6d24fda 100644
--- a/plug-ins/script-fu/scripts/select-to-pattern.scm
+++ b/plug-ins/script-fu/scripts/select-to-pattern.scm
@@ -67,7 +67,7 @@
 
   (gimp-drawable-fill pattern-draw TRANSPARENT-FILL)
 
-  (gimp-image-insert-layer pattern-image pattern-draw -1 0)
+  (gimp-image-insert-layer pattern-image pattern-draw 0 0)
 
   (gimp-edit-copy drawable)
 
diff --git a/plug-ins/script-fu/scripts/slide.scm b/plug-ins/script-fu/scripts/slide.scm
index 782e582..4f26c59 100644
--- a/plug-ins/script-fu/scripts/slide.scm
+++ b/plug-ins/script-fu/scripts/slide.scm
@@ -119,12 +119,12 @@
 
 ; add the background layer
   (gimp-drawable-fill bg-layer BACKGROUND-FILL)
-  (gimp-image-add-layer image bg-layer -1)
+  (gimp-image-insert-layer image bg-layer 0 -1)
 
 ; add the film layer
   (gimp-context-set-background '(0 0 0))
   (gimp-drawable-fill film-layer BACKGROUND-FILL)
-  (gimp-image-add-layer image film-layer -1)
+  (gimp-image-insert-layer image film-layer 0 -1)
 
 ; add the text
   (gimp-context-set-foreground font-color)
diff --git a/plug-ins/script-fu/scripts/sota-chrome-logo.scm b/plug-ins/script-fu/scripts/sota-chrome-logo.scm
index bfef905..f3031b1 100644
--- a/plug-ins/script-fu/scripts/sota-chrome-logo.scm
+++ b/plug-ins/script-fu/scripts/sota-chrome-logo.scm
@@ -109,9 +109,9 @@
 
     (gimp-image-undo-disable img)
     (gimp-image-resize img width height 0 0)
-    (gimp-image-add-layer img shadow 0)
-    (gimp-image-add-layer img layer3 0)
-    (gimp-image-add-layer img layer2 0)
+    (gimp-image-insert-layer img shadow 0 0)
+    (gimp-image-insert-layer img layer3 0 0)
+    (gimp-image-insert-layer img layer2 0 0)
     (gimp-context-set-background '(255 255 255))
     (gimp-selection-none img)
     (gimp-edit-fill layer2 BACKGROUND-FILL)
@@ -137,7 +137,7 @@
     (set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
     (gimp-invert layer2)
 
-    (gimp-image-add-layer img layer1 0)
+    (gimp-image-insert-layer img layer1 0 0)
     (copy-layer-sota img layer1 banding-img banding-layer)
     (gimp-image-delete banding-img)
     (gimp-layer-scale layer1 width height FALSE)
@@ -155,7 +155,7 @@
     (gimp-edit-fill layer-mask BACKGROUND-FILL)
 
     (set! layer2 (car (gimp-layer-copy layer1 TRUE)))
-    (gimp-image-add-layer img layer2 0)
+    (gimp-image-insert-layer img layer2 0 0)
     (gimp-context-set-brush (brush brush-size))
     (gimp-context-set-foreground '(255 255 255))
     (gimp-edit-stroke layer-mask)
diff --git a/plug-ins/script-fu/scripts/speed-text.scm b/plug-ins/script-fu/scripts/speed-text.scm
index c38d29f..5843125 100644
--- a/plug-ins/script-fu/scripts/speed-text.scm
+++ b/plug-ins/script-fu/scripts/speed-text.scm
@@ -37,8 +37,8 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img bg-layer 1)
-    (gimp-image-add-layer img text-layer -1)
+    (gimp-image-insert-layer img bg-layer 0 1)
+    (gimp-image-insert-layer img text-layer 0 -1)
 
     (gimp-context-set-background bg-color)
     (gimp-edit-clear bg-layer)
diff --git a/plug-ins/script-fu/scripts/spinning-globe.scm b/plug-ins/script-fu/scripts/spinning-globe.scm
index e0ec78c..dff08a6 100644
--- a/plug-ins/script-fu/scripts/spinning-globe.scm
+++ b/plug-ins/script-fu/scripts/spinning-globe.scm
@@ -43,7 +43,7 @@
   (while (> inFrames n)
     (set! n (+ n 1))
     (set! theFrame (car (gimp-layer-copy theLayer FALSE)))
-    (gimp-image-add-layer theImage theFrame 0)
+    (gimp-image-insert-layer theImage theFrame 0 0)
     (gimp-item-set-name theFrame
                          (string-append "Anim Frame: "
                                         (number->string (- inFrames n) 10)
diff --git a/plug-ins/script-fu/scripts/swirltile.scm b/plug-ins/script-fu/scripts/swirltile.scm
index 5ebe382..d3475f3 100644
--- a/plug-ins/script-fu/scripts/swirltile.scm
+++ b/plug-ins/script-fu/scripts/swirltile.scm
@@ -21,7 +21,7 @@
 
     (gimp-image-undo-disable img)
 
-    (gimp-image-add-layer img layer-one 0)
+    (gimp-image-insert-layer img layer-one 0 0)
     (gimp-context-set-background bg-color)
     (gimp-edit-fill layer-one BACKGROUND-FILL)
     (plug-in-noisify RUN-NONINTERACTIVE img layer-one FALSE noise-level noise-level noise-level 1.0)
diff --git a/plug-ins/script-fu/scripts/swirly-pattern.scm b/plug-ins/script-fu/scripts/swirly-pattern.scm
index 30a1ef1..4cf640c 100644
--- a/plug-ins/script-fu/scripts/swirly-pattern.scm
+++ b/plug-ins/script-fu/scripts/swirly-pattern.scm
@@ -36,7 +36,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     ; Render checkerboard
 
diff --git a/plug-ins/script-fu/scripts/test-sphere.scm b/plug-ins/script-fu/scripts/test-sphere.scm
index 1bdaed0..933b038 100644
--- a/plug-ins/script-fu/scripts/test-sphere.scm
+++ b/plug-ins/script-fu/scripts/test-sphere.scm
@@ -201,7 +201,7 @@
     (gimp-context-push)
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
     (gimp-context-set-foreground sphere-color)
     (gimp-context-set-background bg-color)
     (gimp-edit-fill drawable BACKGROUND-FILL)
diff --git a/plug-ins/script-fu/scripts/text-circle.scm b/plug-ins/script-fu/scripts/text-circle.scm
index 54e2368..0750dde 100644
--- a/plug-ins/script-fu/scripts/text-circle.scm
+++ b/plug-ins/script-fu/scripts/text-circle.scm
@@ -55,7 +55,7 @@
         )
 
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img BG-layer 0)
+    (gimp-image-insert-layer img BG-layer 0 0)
     (gimp-edit-fill BG-layer BACKGROUND-FILL)
 
     ;; change units
diff --git a/plug-ins/script-fu/scripts/title-header.scm b/plug-ins/script-fu/scripts/title-header.scm
index ee9c7e7..61554d7 100644
--- a/plug-ins/script-fu/scripts/title-header.scm
+++ b/plug-ins/script-fu/scripts/title-header.scm
@@ -85,10 +85,10 @@
     (gimp-image-undo-disable img)
     (gimp-image-resize img img-width img-height 0 0)
 
-    (gimp-image-add-layer img bg-layer -1)
-    (gimp-image-add-layer img bumpmap-layer -1)
-    (gimp-image-add-layer img fore-layer -1)
-;    (gimp-image-add-layer img text-layer -1)
+    (gimp-image-insert-layer img bg-layer 0 -1)
+    (gimp-image-insert-layer img bumpmap-layer 0 -1)
+    (gimp-image-insert-layer img fore-layer 0 -1)
+;    (gimp-image-insert-layer img text-layer 0 -1)
     (gimp-image-raise-layer img text-layer)
     (gimp-image-raise-layer img text-layer)
     (gimp-image-raise-layer img text-layer)
diff --git a/plug-ins/script-fu/scripts/truchet.scm b/plug-ins/script-fu/scripts/truchet.scm
index 08a62a7..4157945 100644
--- a/plug-ins/script-fu/scripts/truchet.scm
+++ b/plug-ins/script-fu/scripts/truchet.scm
@@ -57,7 +57,7 @@
           (temp-draw (car (gimp-layer-new temp-img tempSize tempSize RGB-IMAGE "Jabar" 100 NORMAL-MODE)))
          )
       (gimp-image-undo-disable temp-img)
-      (gimp-image-add-layer temp-img temp-draw 0)
+      (gimp-image-insert-layer temp-img temp-draw 0 0)
       (gimp-context-set-background backcolor)
       (gimp-edit-fill temp-draw BACKGROUND-FILL)
 
@@ -117,9 +117,9 @@
     (gimp-image-undo-disable img)
     (gimp-image-undo-disable tile)
 
-    (gimp-image-add-layer img layer-one 0)
-    (gimp-image-add-layer tile tiledraw1 0)
-    (gimp-image-add-layer tile tiledraw2 0)
+    (gimp-image-insert-layer img layer-one 0 0)
+    (gimp-image-insert-layer tile tiledraw1 0 0)
+    (gimp-image-insert-layer tile tiledraw2 0 0)
 
 
     ;just to look a little better
diff --git a/plug-ins/script-fu/scripts/unsharp-mask.scm b/plug-ins/script-fu/scripts/unsharp-mask.scm
index f60e3c5..5df3d57 100644
--- a/plug-ins/script-fu/scripts/unsharp-mask.scm
+++ b/plug-ins/script-fu/scripts/unsharp-mask.scm
@@ -25,7 +25,7 @@
 
     (gimp-image-undo-disable new-image)
 
-    (gimp-image-add-layer new-image original-layer 0)
+    (gimp-image-insert-layer new-image original-layer 0 0)
     (gimp-floating-sel-anchor
       (car (gimp-edit-paste original-layer FALSE)))
 
@@ -36,12 +36,12 @@
     (gimp-display-new new-image)
 
     ;; make darker mask
-    (gimp-image-add-layer new-image blured-layer-for-darker -1)
+    (gimp-image-insert-layer new-image blured-layer-for-darker 0 -1)
     (plug-in-gauss-iir RUN-NONINTERACTIVE
 		       new-image blured-layer-for-darker mask-size TRUE TRUE)
     (set! blured-layer-for-lighter
           (car (gimp-layer-copy blured-layer-for-darker TRUE)))
-    (gimp-image-add-layer new-image original-layer-for-darker -1)
+    (gimp-image-insert-layer new-image original-layer-for-darker 0 -1)
     (gimp-layer-set-mode original-layer-for-darker SUBTRACT-MODE)
     (set! darker-layer
           (car (gimp-image-merge-visible-layers new-image CLIP-TO-IMAGE)))
@@ -49,8 +49,8 @@
     (gimp-item-set-visible darker-layer FALSE)
 
     ;; make lighter mask
-    (gimp-image-add-layer new-image original-layer-for-lighter -1)
-    (gimp-image-add-layer new-image blured-layer-for-lighter -1)
+    (gimp-image-insert-layer new-image original-layer-for-lighter 0 -1)
+    (gimp-image-insert-layer new-image blured-layer-for-lighter 0 -1)
     (gimp-layer-set-mode blured-layer-for-lighter SUBTRACT-MODE)
     (set! lighter-layer
           (car (gimp-image-merge-visible-layers new-image CLIP-TO-IMAGE)))
diff --git a/plug-ins/script-fu/scripts/waves-anim.scm b/plug-ins/script-fu/scripts/waves-anim.scm
index 23eb514..4284bda 100644
--- a/plug-ins/script-fu/scripts/waves-anim.scm
+++ b/plug-ins/script-fu/scripts/waves-anim.scm
@@ -59,7 +59,7 @@
                                      " (replace)"))
           )
     (gimp-layer-set-lock-alpha waves-layer FALSE)
-    (gimp-image-add-layer image waves-layer -1)
+    (gimp-image-insert-layer image waves-layer 0 -1)
     (gimp-item-set-name waves-layer layer-name)
 
     (plug-in-waves RUN-NONINTERACTIVE
diff --git a/plug-ins/script-fu/scripts/weave.scm b/plug-ins/script-fu/scripts/weave.scm
index 2dec60f..1fc3364 100644
--- a/plug-ins/script-fu/scripts/weave.scm
+++ b/plug-ins/script-fu/scripts/weave.scm
@@ -48,7 +48,7 @@
          (drawable (car (gimp-layer-new img tile-size tile-size RGB-IMAGE
                                         "Weave tile" 100 NORMAL-MODE))))
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(0 0 0))
     (gimp-edit-fill drawable BACKGROUND-FILL)
@@ -171,7 +171,7 @@
          (drawable (car (gimp-layer-new img tile-size tile-size RGB-IMAGE
                                         "Mask" 100 NORMAL-MODE))))
     (gimp-image-undo-disable img)
-    (gimp-image-add-layer img drawable 0)
+    (gimp-image-insert-layer img drawable 0 0)
 
     (gimp-context-set-background '(0 0 0))
     (gimp-edit-fill drawable BACKGROUND-FILL)
@@ -274,7 +274,7 @@
   (let* ((drawable (car (gimp-layer-new img width height RGBA-IMAGE
                                         "Threads" 100 NORMAL-MODE)))
          (dense (/ density 100.0)))
-    (gimp-image-add-layer img drawable -1)
+    (gimp-image-insert-layer img drawable 0 -1)
     (gimp-context-set-background '(255 255 255))
     (gimp-edit-fill drawable BACKGROUND-FILL)
     (plug-in-noisify RUN-NONINTERACTIVE img drawable FALSE dense dense dense dense)
diff --git a/plug-ins/script-fu/scripts/xach-effect.scm b/plug-ins/script-fu/scripts/xach-effect.scm
index 31d291c..b7ad387 100644
--- a/plug-ins/script-fu/scripts/xach-effect.scm
+++ b/plug-ins/script-fu/scripts/xach-effect.scm
@@ -65,7 +65,7 @@
           (set! active-selection (car (gimp-selection-save image)))))
 
     (set! hl-layer (car (gimp-layer-new image image-width image-height type _"Highlight" 100 NORMAL-MODE)))
-    (gimp-image-insert-layer image hl-layer -1 -1)
+    (gimp-image-insert-layer image hl-layer 0 -1)
 
     (gimp-selection-none image)
     (gimp-edit-clear hl-layer)
@@ -91,7 +91,7 @@
                                             _"Shadow"
                                             ds-opacity
                                             NORMAL-MODE)))
-    (gimp-image-insert-layer image shadow-layer -1 -1)
+    (gimp-image-insert-layer image shadow-layer 0 -1)
     (gimp-selection-none image)
     (gimp-edit-clear shadow-layer)
     (gimp-image-select-item image CHANNEL-OP-REPLACE active-selection)



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