removed the image argument from functions that no longer need it.

* plug-ins/script-fu/scripts/*: removed the image
        argument from functions that no longer need it.
This commit is contained in:
Marc Lehmann
1998-11-14 20:46:25 +00:00
parent 3fa6583ed7
commit b8b5d7834d
96 changed files with 1173 additions and 1177 deletions

View File

@ -49,10 +49,10 @@
(if (= (car (gimp-selection-is-empty image)) TRUE)
(begin
(gimp-selection-layer-alpha image drawable)
(gimp-selection-layer-alpha drawable)
(set! active-selection (car (gimp-selection-save image)))
(set! from-selection FALSE))
(begin
(begin
(set! from-selection TRUE)
(set! active-selection (car (gimp-selection-save image)))))
@ -64,22 +64,22 @@
(if (= seperate-layer TRUE)
(begin
(set! effect-layer (car (gimp-layer-new image
select-width
select-height
type
(set! effect-layer (car (gimp-layer-new image
select-width
select-height
type
"effect layer"
100
100
NORMAL)))
(gimp-layer-set-offsets effect-layer select-offset-x select-offset-y)
(gimp-image-add-layer image effect-layer -1)
(gimp-selection-none image)
(gimp-edit-clear image effect-layer)
(gimp-selection-load image active-selection)
(gimp-edit-copy image drawable)
(gimp-edit-clear effect-layer)
(gimp-selection-load active-selection)
(gimp-edit-copy drawable)
(let ((floating-sel (car (gimp-edit-paste image effect-layer FALSE))))
(let ((floating-sel (car (gimp-edit-paste effect-layer FALSE))))
(gimp-floating-sel-anchor floating-sel)
)
(gimp-image-set-active-layer image effect-layer )))
@ -91,18 +91,17 @@
(gimp-palette-set-foreground '(0 0 0))
(gimp-palette-set-foreground '(14 14 14))))
(gimp-selection-load image active-selection)
(gimp-selection-load active-selection)
(plug-in-maze 1 image active-layer 5 5 TRUE 0 seed 57 1)
(plug-in-oilify 1 image active-layer mask-size 0)
(plug-in-oilify 1 image active-layer mask-size 0)
(plug-in-edge 1 image active-layer 2 1)
(gimp-desaturate image active-layer)
(gimp-desaturate active-layer)
(if (and
(if (and
(= remove-bg TRUE)
(= seperate-layer TRUE)
(begin
(gimp-by-color-select
image
active-layer
'(0 0 0)
15
@ -111,7 +110,7 @@
FALSE
10
FALSE)
(gimp-edit-clear image active-layer))))
(gimp-edit-clear active-layer))))
(gimp-gradients-set-active old-gradient)
(gimp-palette-set-background old-bg)