[gimp] Don't change global context and protect scripts from global context settings.
- From: Kevin Cozens <kcozens src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp] Don't change global context and protect scripts from global context settings.
- Date: Wed, 9 Nov 2011 07:44:38 +0000 (UTC)
commit 27bef34bd550320706b90a4fa29130c7022b2111
Author: Kevin Cozens <kcozens svn gnome org>
Date: Wed Nov 9 02:42:34 2011 -0500
Don't change global context and protect scripts from global context settings.
plug-ins/script-fu/scripts/add-bevel.scm | 1 +
plug-ins/script-fu/scripts/alien-glow-arrow.scm | 3 +-
plug-ins/script-fu/scripts/alien-glow-logo.scm | 3 +-
plug-ins/script-fu/scripts/alien-neon-logo.scm | 1 +
plug-ins/script-fu/scripts/basic1-logo.scm | 1 +
plug-ins/script-fu/scripts/basic2-logo.scm | 1 +
.../script-fu/scripts/beveled-pattern-arrow.scm | 3 +-
.../script-fu/scripts/beveled-pattern-bullet.scm | 3 +-
.../script-fu/scripts/beveled-pattern-heading.scm | 1 +
plug-ins/script-fu/scripts/blended-logo.scm | 1 +
plug-ins/script-fu/scripts/bovinated-logo.scm | 1 +
plug-ins/script-fu/scripts/burn-in-anim.scm | 2 +-
plug-ins/script-fu/scripts/camo.scm | 1 +
plug-ins/script-fu/scripts/carve-it.scm | 1 +
plug-ins/script-fu/scripts/carved-logo.scm | 1 +
plug-ins/script-fu/scripts/chip-away.scm | 1 +
plug-ins/script-fu/scripts/chrome-it.scm | 1 +
plug-ins/script-fu/scripts/chrome-logo.scm | 1 +
plug-ins/script-fu/scripts/circuit.scm | 1 +
plug-ins/script-fu/scripts/coffee.scm | 3 +-
plug-ins/script-fu/scripts/contactsheet.scm | 1 +
plug-ins/script-fu/scripts/coolmetal-logo.scm | 1 +
plug-ins/script-fu/scripts/crystal-logo.scm | 1 +
plug-ins/script-fu/scripts/distress-selection.scm | 100 ++++----
plug-ins/script-fu/scripts/drop-shadow.scm | 1 +
plug-ins/script-fu/scripts/frosty-logo.scm | 1 +
plug-ins/script-fu/scripts/glossy.scm | 7 +-
plug-ins/script-fu/scripts/glowing-logo.scm | 1 +
plug-ins/script-fu/scripts/gradient-bevel-logo.scm | 1 +
plug-ins/script-fu/scripts/i26-gunya2.scm | 1 +
plug-ins/script-fu/scripts/land.scm | 42 ++--
plug-ins/script-fu/scripts/lava.scm | 1 +
plug-ins/script-fu/scripts/line-nova.scm | 3 +-
plug-ins/script-fu/scripts/mkbrush.scm | 2 +-
plug-ins/script-fu/scripts/neon-logo.scm | 1 +
plug-ins/script-fu/scripts/news-text.scm | 1 +
plug-ins/script-fu/scripts/perspective-shadow.scm | 283 ++++++++++----------
plug-ins/script-fu/scripts/predator.scm | 3 +
plug-ins/script-fu/scripts/pupi-button.scm | 2 +-
plug-ins/script-fu/scripts/round-corners.scm | 3 +-
plug-ins/script-fu/scripts/select-to-brush.scm | 1 +
plug-ins/script-fu/scripts/select-to-image.scm | 1 +
plug-ins/script-fu/scripts/selection-round.scm | 3 +-
plug-ins/script-fu/scripts/sota-chrome-logo.scm | 2 +-
plug-ins/script-fu/scripts/speed-text.scm | 1 +
plug-ins/script-fu/scripts/starscape-logo.scm | 1 +
plug-ins/script-fu/scripts/t-o-p-logo.scm | 1 +
plug-ins/script-fu/scripts/test-sphere.scm | 2 +-
plug-ins/script-fu/scripts/text-circle.scm | 1 +
plug-ins/script-fu/scripts/textured-logo.scm | 2 +-
plug-ins/script-fu/scripts/tileblur.scm | 6 +-
plug-ins/script-fu/scripts/title-header.scm | 3 +-
plug-ins/script-fu/scripts/truchet.scm | 1 +
plug-ins/script-fu/scripts/xach-effect.scm | 1 +
54 files changed, 275 insertions(+), 238 deletions(-)
---
diff --git a/plug-ins/script-fu/scripts/add-bevel.scm b/plug-ins/script-fu/scripts/add-bevel.scm
index 70fe42b..501c87f 100644
--- a/plug-ins/script-fu/scripts/add-bevel.scm
+++ b/plug-ins/script-fu/scripts/add-bevel.scm
@@ -82,6 +82,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
; disable undo on copy, start group otherwise
(if (= work-on-copy TRUE)
diff --git a/plug-ins/script-fu/scripts/alien-glow-arrow.scm b/plug-ins/script-fu/scripts/alien-glow-arrow.scm
index 21a2abb..9eb8a3d 100644
--- a/plug-ins/script-fu/scripts/alien-glow-arrow.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-arrow.scm
@@ -128,8 +128,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
;(gimp-image-resize img (+ length height) (+ height height) 0 0)
diff --git a/plug-ins/script-fu/scripts/alien-glow-logo.scm b/plug-ins/script-fu/scripts/alien-glow-logo.scm
index 4c3268d..0430768 100644
--- a/plug-ins/script-fu/scripts/alien-glow-logo.scm
+++ b/plug-ins/script-fu/scripts/alien-glow-logo.scm
@@ -20,8 +20,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-selection-none img)
(script-fu-util-image-resize-from-layer img logo-layer)
diff --git a/plug-ins/script-fu/scripts/alien-neon-logo.scm b/plug-ins/script-fu/scripts/alien-neon-logo.scm
index 4efc698..b27f961 100644
--- a/plug-ins/script-fu/scripts/alien-neon-logo.scm
+++ b/plug-ins/script-fu/scripts/alien-neon-logo.scm
@@ -45,6 +45,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img bands-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/basic1-logo.scm b/plug-ins/script-fu/scripts/basic1-logo.scm
index 7b78023..07f63b2 100644
--- a/plug-ins/script-fu/scripts/basic1-logo.scm
+++ b/plug-ins/script-fu/scripts/basic1-logo.scm
@@ -13,6 +13,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-selection-none img)
(script-fu-util-image-resize-from-layer img logo-layer)
diff --git a/plug-ins/script-fu/scripts/basic2-logo.scm b/plug-ins/script-fu/scripts/basic2-logo.scm
index f4dc962..1cab076 100644
--- a/plug-ins/script-fu/scripts/basic2-logo.scm
+++ b/plug-ins/script-fu/scripts/basic2-logo.scm
@@ -31,6 +31,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-selection-none img)
(script-fu-util-image-resize-from-layer img logo-layer)
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm b/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
index 2225155..02ea5c3 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-arrow.scm
@@ -83,8 +83,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img background 0 -1)
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm b/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
index 6560cc5..c76405a 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-bullet.scm
@@ -27,8 +27,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img background 0 -1)
diff --git a/plug-ins/script-fu/scripts/beveled-pattern-heading.scm b/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
index 9a240aa..83ee2cd 100644
--- a/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
+++ b/plug-ins/script-fu/scripts/beveled-pattern-heading.scm
@@ -45,6 +45,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-resize img width height 0 0)
diff --git a/plug-ins/script-fu/scripts/blended-logo.scm b/plug-ins/script-fu/scripts/blended-logo.scm
index 5d3403f..bcd4a35 100644
--- a/plug-ins/script-fu/scripts/blended-logo.scm
+++ b/plug-ins/script-fu/scripts/blended-logo.scm
@@ -108,6 +108,7 @@
blend-gradient-reverse)
(begin
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start img)
(apply-blended-logo-effect img logo-layer b-size bg-color
diff --git a/plug-ins/script-fu/scripts/bovinated-logo.scm b/plug-ins/script-fu/scripts/bovinated-logo.scm
index 3a614f1..3738e99 100644
--- a/plug-ins/script-fu/scripts/bovinated-logo.scm
+++ b/plug-ins/script-fu/scripts/bovinated-logo.scm
@@ -35,6 +35,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img blur-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/burn-in-anim.scm b/plug-ins/script-fu/scripts/burn-in-anim.scm
index 60a09d1..45ee080 100644
--- a/plug-ins/script-fu/scripts/burn-in-anim.scm
+++ b/plug-ins/script-fu/scripts/burn-in-anim.scm
@@ -55,7 +55,7 @@
;--- main program structure starts here, begin of "if-1"
(begin
(gimp-context-push)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(set! img (car (gimp-image-duplicate org-img)))
(gimp-image-undo-disable img)
diff --git a/plug-ins/script-fu/scripts/camo.scm b/plug-ins/script-fu/scripts/camo.scm
index 8347e40..b90eb4e 100644
--- a/plug-ins/script-fu/scripts/camo.scm
+++ b/plug-ins/script-fu/scripts/camo.scm
@@ -31,6 +31,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-insert-layer theImage baseLayer 0 0)
diff --git a/plug-ins/script-fu/scripts/carve-it.scm b/plug-ins/script-fu/scripts/carve-it.scm
index 7335981..4eae4ef 100644
--- a/plug-ins/script-fu/scripts/carve-it.scm
+++ b/plug-ins/script-fu/scripts/carve-it.scm
@@ -77,6 +77,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
diff --git a/plug-ins/script-fu/scripts/carved-logo.scm b/plug-ins/script-fu/scripts/carved-logo.scm
index e6746ad..20625a5 100644
--- a/plug-ins/script-fu/scripts/carved-logo.scm
+++ b/plug-ins/script-fu/scripts/carved-logo.scm
@@ -51,6 +51,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
diff --git a/plug-ins/script-fu/scripts/chip-away.scm b/plug-ins/script-fu/scripts/chip-away.scm
index ee7d130..7bd0ade 100644
--- a/plug-ins/script-fu/scripts/chip-away.scm
+++ b/plug-ins/script-fu/scripts/chip-away.scm
@@ -53,6 +53,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img bump-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/chrome-it.scm b/plug-ins/script-fu/scripts/chrome-it.scm
index 4bc54ea..b374221 100644
--- a/plug-ins/script-fu/scripts/chrome-it.scm
+++ b/plug-ins/script-fu/scripts/chrome-it.scm
@@ -110,6 +110,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
diff --git a/plug-ins/script-fu/scripts/chrome-logo.scm b/plug-ins/script-fu/scripts/chrome-logo.scm
index 0824154..f5682f0 100644
--- a/plug-ins/script-fu/scripts/chrome-logo.scm
+++ b/plug-ins/script-fu/scripts/chrome-logo.scm
@@ -21,6 +21,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img layer1 layer2 layer3 shadow background)
diff --git a/plug-ins/script-fu/scripts/circuit.scm b/plug-ins/script-fu/scripts/circuit.scm
index a0ef443..e8421f0 100644
--- a/plug-ins/script-fu/scripts/circuit.scm
+++ b/plug-ins/script-fu/scripts/circuit.scm
@@ -51,6 +51,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start image)
diff --git a/plug-ins/script-fu/scripts/coffee.scm b/plug-ins/script-fu/scripts/coffee.scm
index 7011cff..2b0eba3 100644
--- a/plug-ins/script-fu/scripts/coffee.scm
+++ b/plug-ins/script-fu/scripts/coffee.scm
@@ -26,8 +26,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start theImage)
diff --git a/plug-ins/script-fu/scripts/contactsheet.scm b/plug-ins/script-fu/scripts/contactsheet.scm
index e691445..90cda52 100644
--- a/plug-ins/script-fu/scripts/contactsheet.scm
+++ b/plug-ins/script-fu/scripts/contactsheet.scm
@@ -176,6 +176,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-context-set-foreground text-color)
(gimp-context-set-background bg-color)
diff --git a/plug-ins/script-fu/scripts/coolmetal-logo.scm b/plug-ins/script-fu/scripts/coolmetal-logo.scm
index fe7c805..47341c0 100644
--- a/plug-ins/script-fu/scripts/coolmetal-logo.scm
+++ b/plug-ins/script-fu/scripts/coolmetal-logo.scm
@@ -32,6 +32,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-context-set-feather FALSE)
(gimp-context-set-interpolation INTERPOLATION-NONE)
(gimp-context-set-transform-resize TRANSFORM-RESIZE-ADJUST)
diff --git a/plug-ins/script-fu/scripts/crystal-logo.scm b/plug-ins/script-fu/scripts/crystal-logo.scm
index 2d83f18..5f58c08 100644
--- a/plug-ins/script-fu/scripts/crystal-logo.scm
+++ b/plug-ins/script-fu/scripts/crystal-logo.scm
@@ -112,6 +112,7 @@
(disp-map 0)
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-delete back-img)
(gimp-image-undo-disable img)
diff --git a/plug-ins/script-fu/scripts/distress-selection.scm b/plug-ins/script-fu/scripts/distress-selection.scm
index dcd6e9c..b2faa33 100644
--- a/plug-ins/script-fu/scripts/distress-selection.scm
+++ b/plug-ins/script-fu/scripts/distress-selection.scm
@@ -37,59 +37,63 @@
(theMode (car (gimp-image-base-type inImage)))
)
- (gimp-image-undo-group-start theImage)
- (if (= theMode GRAY)
- (set! theMode GRAYA-IMAGE)
- (set! theMode RGBA-IMAGE)
- )
- (set! theLayer (car (gimp-layer-new theImage
- theWidth
- theHeight
- theMode
- "Distress Scratch Layer"
- 100
- NORMAL-MODE)))
-
- (gimp-image-insert-layer theImage theLayer 0 0)
-
- (if (= FALSE (car (gimp-selection-is-empty theImage)))
- (gimp-edit-fill theLayer BACKGROUND-FILL)
- )
+ (gimp-context-push)
+ (gimp-context-set-defaults)
+ (gimp-image-undo-group-start theImage)
- (gimp-selection-invert theImage)
+ (if (= theMode GRAY)
+ (set! theMode GRAYA-IMAGE)
+ (set! theMode RGBA-IMAGE)
+ )
+ (set! theLayer (car (gimp-layer-new theImage
+ theWidth
+ theHeight
+ theMode
+ "Distress Scratch Layer"
+ 100
+ NORMAL-MODE)))
+
+ (gimp-image-insert-layer theImage theLayer 0 0)
+
+ (if (= FALSE (car (gimp-selection-is-empty theImage)))
+ (gimp-edit-fill theLayer BACKGROUND-FILL)
+ )
- (if (= FALSE (car (gimp-selection-is-empty theImage)))
- (gimp-edit-clear theLayer)
- )
+ (gimp-selection-invert theImage)
- (gimp-selection-invert theImage)
- (gimp-selection-none inImage)
-
- (gimp-layer-scale theLayer
- (/ theWidth inGranu)
- (/ theHeight inGranu)
- TRUE)
-
- (plug-in-spread RUN-NONINTERACTIVE
- theImage
- theLayer
- inSpread
- inSpread)
-
- (plug-in-gauss-iir RUN-NONINTERACTIVE
- theImage theLayer inSmooth inSmoothH inSmoothV)
- (gimp-layer-scale theLayer theWidth theHeight TRUE)
- (plug-in-threshold-alpha RUN-NONINTERACTIVE theImage theLayer inThreshold)
- (plug-in-gauss-iir RUN-NONINTERACTIVE theImage theLayer 1 TRUE TRUE)
- (gimp-image-select-item inImage CHANNEL-OP-REPLACE theLayer)
- (gimp-image-remove-layer theImage theLayer)
- (if (and (= (car (gimp-item-is-channel inDrawable)) TRUE)
- (= (car (gimp-item-is-layer-mask inDrawable)) FALSE))
- (gimp-image-set-active-channel theImage inDrawable)
+ (if (= FALSE (car (gimp-selection-is-empty theImage)))
+ (gimp-edit-clear theLayer)
)
- (gimp-image-undo-group-end theImage)
- (gimp-displays-flush)
+ (gimp-selection-invert theImage)
+ (gimp-selection-none inImage)
+
+ (gimp-layer-scale theLayer
+ (/ theWidth inGranu)
+ (/ theHeight inGranu)
+ TRUE)
+
+ (plug-in-spread RUN-NONINTERACTIVE
+ theImage
+ theLayer
+ inSpread
+ inSpread)
+
+ (plug-in-gauss-iir RUN-NONINTERACTIVE
+ theImage theLayer inSmooth inSmoothH inSmoothV)
+ (gimp-layer-scale theLayer theWidth theHeight TRUE)
+ (plug-in-threshold-alpha RUN-NONINTERACTIVE theImage theLayer inThreshold)
+ (plug-in-gauss-iir RUN-NONINTERACTIVE theImage theLayer 1 TRUE TRUE)
+ (gimp-image-select-item inImage CHANNEL-OP-REPLACE theLayer)
+ (gimp-image-remove-layer theImage theLayer)
+ (if (and (= (car (gimp-item-is-channel inDrawable)) TRUE)
+ (= (car (gimp-item-is-layer-mask inDrawable)) FALSE))
+ (gimp-image-set-active-channel theImage inDrawable)
+ )
+ (gimp-image-undo-group-end theImage)
+
+ (gimp-displays-flush)
+ (gimp-context-pop)
)
)
diff --git a/plug-ins/script-fu/scripts/drop-shadow.scm b/plug-ins/script-fu/scripts/drop-shadow.scm
index 0f1aca0..2b77edf 100644
--- a/plug-ins/script-fu/scripts/drop-shadow.scm
+++ b/plug-ins/script-fu/scripts/drop-shadow.scm
@@ -56,6 +56,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-set-active-layer image drawable)
diff --git a/plug-ins/script-fu/scripts/frosty-logo.scm b/plug-ins/script-fu/scripts/frosty-logo.scm
index 693c277..b7eb809 100644
--- a/plug-ins/script-fu/scripts/frosty-logo.scm
+++ b/plug-ins/script-fu/scripts/frosty-logo.scm
@@ -34,6 +34,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(if ( = isnew 1) (script-fu-util-image-resize-from-layer img shadow-layer))
diff --git a/plug-ins/script-fu/scripts/glossy.scm b/plug-ins/script-fu/scripts/glossy.scm
index e5e5d1a..0df4dd5 100644
--- a/plug-ins/script-fu/scripts/glossy.scm
+++ b/plug-ins/script-fu/scripts/glossy.scm
@@ -50,6 +50,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img grow-me bg-layer)
@@ -121,9 +122,9 @@
(gimp-selection-none img)
(plug-in-bump-map (if (= noninteractive TRUE)
- RUN-NONINTERACTIVE
- RUN-INTERACTIVE)
- img grow-me logo-layer
+ RUN-NONINTERACTIVE
+ RUN-INTERACTIVE)
+ img grow-me logo-layer
110.0 45.0 3 0 0 0 0 TRUE FALSE 0)
(gimp-layer-set-mode logo-layer SCREEN-MODE)
diff --git a/plug-ins/script-fu/scripts/glowing-logo.scm b/plug-ins/script-fu/scripts/glowing-logo.scm
index 9fb5150..8bfb1e0 100644
--- a/plug-ins/script-fu/scripts/glowing-logo.scm
+++ b/plug-ins/script-fu/scripts/glowing-logo.scm
@@ -19,6 +19,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img glow-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/gradient-bevel-logo.scm b/plug-ins/script-fu/scripts/gradient-bevel-logo.scm
index d71b42f..6021d24 100644
--- a/plug-ins/script-fu/scripts/gradient-bevel-logo.scm
+++ b/plug-ins/script-fu/scripts/gradient-bevel-logo.scm
@@ -34,6 +34,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img blur-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/i26-gunya2.scm b/plug-ins/script-fu/scripts/i26-gunya2.scm
index 05fc635..225b4d7 100644
--- a/plug-ins/script-fu/scripts/i26-gunya2.scm
+++ b/plug-ins/script-fu/scripts/i26-gunya2.scm
@@ -32,6 +32,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-undo-disable distortion-img)
diff --git a/plug-ins/script-fu/scripts/land.scm b/plug-ins/script-fu/scripts/land.scm
index ea84e08..b514cf9 100644
--- a/plug-ins/script-fu/scripts/land.scm
+++ b/plug-ins/script-fu/scripts/land.scm
@@ -36,34 +36,36 @@
RGB-IMAGE "Bottom" 100 NORMAL-MODE)))
(layer-two 0)
)
- (gimp-context-set-gradient gradient)
- (gimp-image-undo-disable img)
- (gimp-image-insert-layer img layer-one 0 0)
- (plug-in-solid-noise RUN-NONINTERACTIVE img layer-one TRUE FALSE 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-insert-layer img layer-two 0 -1)
- (gimp-image-set-active-layer img layer-two)
+ (gimp-context-push)
+ (gimp-context-set-defaults)
+ (gimp-context-set-gradient gradient)
+ (gimp-image-undo-disable img)
+ (gimp-image-insert-layer img layer-one 0 0)
- (plug-in-gradmap RUN-NONINTERACTIVE img layer-two)
+ (plug-in-solid-noise RUN-NONINTERACTIVE img layer-one TRUE FALSE 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-insert-layer img layer-two 0 -1)
+ (gimp-image-set-active-layer img layer-two)
+ (plug-in-gradmap RUN-NONINTERACTIVE img layer-two)
+ (gimp-image-select-color img CHANNEL-OP-REPLACE layer-one '(190 190 190))
+ (plug-in-bump-map RUN-NONINTERACTIVE img layer-two layer-one 135.0 35 landheight 0 0 0 0 TRUE FALSE 0)
- (gimp-image-select-color img CHANNEL-OP-REPLACE layer-one '(190 190 190))
- (plug-in-bump-map RUN-NONINTERACTIVE img layer-two layer-one 135.0 35 landheight 0 0 0 0 TRUE FALSE 0)
+ ;(plug-in-c-astretch RUN-NONINTERACTIVE img layer-two)
+ (gimp-selection-invert img)
+ (plug-in-bump-map RUN-NONINTERACTIVE img layer-two layer-one 135.0 35 seadepth 0 0 0 0 TRUE FALSE 0)
- ;(plug-in-c-astretch RUN-NONINTERACTIVE img layer-two)
- (gimp-selection-invert img)
- (plug-in-bump-map RUN-NONINTERACTIVE img layer-two layer-one 135.0 35 seadepth 0 0 0 0 TRUE FALSE 0)
+ ;(plug-in-c-astretch RUN-NONINTERACTIVE img layer-two)
- ;(plug-in-c-astretch RUN-NONINTERACTIVE img layer-two)
+ ; uncomment the next line if you want to keep a selection of the "land"
+ (gimp-selection-none img)
- ; uncomment the next line if you want to keep a selection of the "land"
- (gimp-selection-none img)
-
- (gimp-display-new img)
- (gimp-image-undo-enable img)
+ (gimp-display-new img)
+ (gimp-image-undo-enable img)
+ (gimp-context-pop)
)
)
diff --git a/plug-ins/script-fu/scripts/lava.scm b/plug-ins/script-fu/scripts/lava.scm
index 4a6dec6..1735711 100644
--- a/plug-ins/script-fu/scripts/lava.scm
+++ b/plug-ins/script-fu/scripts/lava.scm
@@ -46,6 +46,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start image)
(if (= (car (gimp-drawable-has-alpha drawable)) FALSE)
diff --git a/plug-ins/script-fu/scripts/line-nova.scm b/plug-ins/script-fu/scripts/line-nova.scm
index 00ff5ca..e600a53 100644
--- a/plug-ins/script-fu/scripts/line-nova.scm
+++ b/plug-ins/script-fu/scripts/line-nova.scm
@@ -25,8 +25,7 @@
(dir-deg/line (/ 360 num-of-lines))
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(define (draw-vector beg-x beg-y direction)
diff --git a/plug-ins/script-fu/scripts/mkbrush.scm b/plug-ins/script-fu/scripts/mkbrush.scm
index 7dcd51f..3e745f8 100644
--- a/plug-ins/script-fu/scripts/mkbrush.scm
+++ b/plug-ins/script-fu/scripts/mkbrush.scm
@@ -36,7 +36,7 @@
)
(gimp-context-push)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img drawable 0 0)
diff --git a/plug-ins/script-fu/scripts/neon-logo.scm b/plug-ins/script-fu/scripts/neon-logo.scm
index ae7a09f..58bdcec 100644
--- a/plug-ins/script-fu/scripts/neon-logo.scm
+++ b/plug-ins/script-fu/scripts/neon-logo.scm
@@ -116,6 +116,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
; ensure that we don't shrink selection so much
; that we create an empty selection.
diff --git a/plug-ins/script-fu/scripts/news-text.scm b/plug-ins/script-fu/scripts/news-text.scm
index 03c67bc..b9c8f8f 100644
--- a/plug-ins/script-fu/scripts/news-text.scm
+++ b/plug-ins/script-fu/scripts/news-text.scm
@@ -32,6 +32,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img bg-layer 0 1)
diff --git a/plug-ins/script-fu/scripts/perspective-shadow.scm b/plug-ins/script-fu/scripts/perspective-shadow.scm
index 78ac742..7a42146 100644
--- a/plug-ins/script-fu/scripts/perspective-shadow.scm
+++ b/plug-ins/script-fu/scripts/perspective-shadow.scm
@@ -48,148 +48,149 @@
(shadow-layer 0)
)
- (gimp-context-push)
-
- (if (> rel-distance 24) (set! rel-distance 999999))
- (if (= rel-distance rel-length) (set! rel-distance (+ rel-distance 0.01)))
-
- (gimp-image-undo-group-start image)
-
- (gimp-layer-add-alpha drawable)
- (if (= (car (gimp-selection-is-empty image)) TRUE)
- (begin
- (gimp-image-select-item image CHANNEL-OP-REPLACE drawable)
- (set! from-selection FALSE))
- (begin
- (set! from-selection TRUE)
- (set! active-selection (car (gimp-selection-save image)))))
-
- (let* ((selection-bounds (gimp-selection-bounds image))
- (select-offset-x (cadr selection-bounds))
- (select-offset-y (caddr selection-bounds))
- (select-width (- (cadr (cddr selection-bounds)) select-offset-x))
- (select-height (- (caddr (cddr selection-bounds)) select-offset-y))
-
- (abs-length (* rel-length select-height))
- (abs-distance (* rel-distance select-height))
- (half-bottom-width (/ select-width 2))
- (half-top-width (* half-bottom-width
- (/ (- rel-distance rel-length) rel-distance)))
-
- (x0 (+ select-offset-x (+ (- half-bottom-width half-top-width)
- (* (cos alpha) abs-length))))
- (y0 (+ select-offset-y (- select-height
- (* (sin alpha) abs-length))))
- (x1 (+ x0 (* 2 half-top-width)))
- (y1 y0)
- (x2 select-offset-x)
- (y2 (+ select-offset-y select-height))
- (x3 (+ x2 select-width))
- (y3 y2)
-
- (shadow-width (+ (- (max x1 x3) (min x0 x2)) (* 2 shadow-blur)))
- (shadow-height (+ (- (max y1 y3) (min y0 y2)) (* 2 shadow-blur)))
- (shadow-offset-x (- (min x0 x2) shadow-blur))
- (shadow-offset-y (- (min y0 y2) shadow-blur)))
-
-
- (set! shadow-layer (car (gimp-layer-new image
- select-width
- select-height
- type
- "Perspective Shadow"
- shadow-opacity
- NORMAL-MODE)))
-
-
- (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)
- (gimp-edit-fill shadow-layer BACKGROUND-FILL)
- (gimp-selection-none image)
-
- (if (= allow-resize TRUE)
- (let* ((new-image-width image-width)
- (new-image-height image-height)
- (image-offset-x 0)
- (image-offset-y 0))
-
- (if (< shadow-offset-x 0)
- (begin
- (set! image-offset-x (abs shadow-offset-x))
- (set! new-image-width (+ new-image-width image-offset-x))
- ; adjust to new coordinate system
- (set! x0 (+ x0 image-offset-x))
- (set! x1 (+ x1 image-offset-x))
- (set! x2 (+ x2 image-offset-x))
- (set! x3 (+ x3 image-offset-x))
- ))
-
- (if (< shadow-offset-y 0)
- (begin
- (set! image-offset-y (abs shadow-offset-y))
- (set! new-image-height (+ new-image-height image-offset-y))
- ; adjust to new coordinate system
- (set! y0 (+ y0 image-offset-y))
- (set! y1 (+ y1 image-offset-y))
- (set! y2 (+ y2 image-offset-y))
- (set! y3 (+ y3 image-offset-y))
- ))
-
- (if (> (+ shadow-width shadow-offset-x) new-image-width)
- (set! new-image-width (+ shadow-width shadow-offset-x)))
-
- (if (> (+ shadow-height shadow-offset-y) new-image-height)
- (set! new-image-height (+ shadow-height shadow-offset-y)))
- (gimp-image-resize image
- new-image-width
- new-image-height
- image-offset-x
- image-offset-y)))
-
- (gimp-context-set-transform-direction TRANSFORM-FORWARD)
- (gimp-context-set-interpolation interpolation)
- (gimp-context-set-transform-recursion 3)
- (gimp-context-set-transform-resize TRANSFORM-RESIZE-ADJUST)
-
- (gimp-item-transform-perspective shadow-layer
- x0 y0
- x1 y1
- x2 y2
- x3 y3)
-
- (if (>= shadow-blur 1.0)
+ (gimp-context-push)
+ (gimp-context-set-defaults)
+
+ (if (> rel-distance 24) (set! rel-distance 999999))
+ (if (= rel-distance rel-length) (set! rel-distance (+ rel-distance 0.01)))
+
+ (gimp-image-undo-group-start image)
+
+ (gimp-layer-add-alpha drawable)
+ (if (= (car (gimp-selection-is-empty image)) TRUE)
+ (begin
+ (gimp-image-select-item image CHANNEL-OP-REPLACE drawable)
+ (set! from-selection FALSE))
(begin
- (gimp-layer-set-lock-alpha shadow-layer FALSE)
- (gimp-layer-resize shadow-layer
- shadow-width
- shadow-height
- shadow-blur
- shadow-blur)
- (plug-in-gauss-rle RUN-NONINTERACTIVE
- image
- shadow-layer
- shadow-blur
- TRUE
- TRUE))))
-
- (if (= from-selection TRUE)
- (begin
- (gimp-image-select-item image CHANNEL-OP-REPLACE active-selection)
- (gimp-edit-clear shadow-layer)
- (gimp-image-remove-channel image active-selection)))
-
- (if (and
- (= (car (gimp-layer-is-floating-sel drawable)) 0)
- (= from-selection FALSE))
- (gimp-image-raise-item image drawable))
-
- (gimp-image-set-active-layer image drawable)
- (gimp-image-undo-group-end image)
- (gimp-displays-flush)
-
- (gimp-context-pop)
+ (set! from-selection TRUE)
+ (set! active-selection (car (gimp-selection-save image)))))
+
+ (let* ((selection-bounds (gimp-selection-bounds image))
+ (select-offset-x (cadr selection-bounds))
+ (select-offset-y (caddr selection-bounds))
+ (select-width (- (cadr (cddr selection-bounds)) select-offset-x))
+ (select-height (- (caddr (cddr selection-bounds)) select-offset-y))
+
+ (abs-length (* rel-length select-height))
+ (abs-distance (* rel-distance select-height))
+ (half-bottom-width (/ select-width 2))
+ (half-top-width (* half-bottom-width
+ (/ (- rel-distance rel-length) rel-distance)))
+
+ (x0 (+ select-offset-x (+ (- half-bottom-width half-top-width)
+ (* (cos alpha) abs-length))))
+ (y0 (+ select-offset-y (- select-height
+ (* (sin alpha) abs-length))))
+ (x1 (+ x0 (* 2 half-top-width)))
+ (y1 y0)
+ (x2 select-offset-x)
+ (y2 (+ select-offset-y select-height))
+ (x3 (+ x2 select-width))
+ (y3 y2)
+
+ (shadow-width (+ (- (max x1 x3) (min x0 x2)) (* 2 shadow-blur)))
+ (shadow-height (+ (- (max y1 y3) (min y0 y2)) (* 2 shadow-blur)))
+ (shadow-offset-x (- (min x0 x2) shadow-blur))
+ (shadow-offset-y (- (min y0 y2) shadow-blur)))
+
+
+ (set! shadow-layer (car (gimp-layer-new image
+ select-width
+ select-height
+ type
+ "Perspective Shadow"
+ shadow-opacity
+ NORMAL-MODE)))
+
+
+ (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)
+ (gimp-edit-fill shadow-layer BACKGROUND-FILL)
+ (gimp-selection-none image)
+
+ (if (= allow-resize TRUE)
+ (let* ((new-image-width image-width)
+ (new-image-height image-height)
+ (image-offset-x 0)
+ (image-offset-y 0))
+
+ (if (< shadow-offset-x 0)
+ (begin
+ (set! image-offset-x (abs shadow-offset-x))
+ (set! new-image-width (+ new-image-width image-offset-x))
+ ; adjust to new coordinate system
+ (set! x0 (+ x0 image-offset-x))
+ (set! x1 (+ x1 image-offset-x))
+ (set! x2 (+ x2 image-offset-x))
+ (set! x3 (+ x3 image-offset-x))
+ ))
+
+ (if (< shadow-offset-y 0)
+ (begin
+ (set! image-offset-y (abs shadow-offset-y))
+ (set! new-image-height (+ new-image-height image-offset-y))
+ ; adjust to new coordinate system
+ (set! y0 (+ y0 image-offset-y))
+ (set! y1 (+ y1 image-offset-y))
+ (set! y2 (+ y2 image-offset-y))
+ (set! y3 (+ y3 image-offset-y))
+ ))
+
+ (if (> (+ shadow-width shadow-offset-x) new-image-width)
+ (set! new-image-width (+ shadow-width shadow-offset-x)))
+
+ (if (> (+ shadow-height shadow-offset-y) new-image-height)
+ (set! new-image-height (+ shadow-height shadow-offset-y)))
+ (gimp-image-resize image
+ new-image-width
+ new-image-height
+ image-offset-x
+ image-offset-y)))
+
+ (gimp-context-set-transform-direction TRANSFORM-FORWARD)
+ (gimp-context-set-interpolation interpolation)
+ (gimp-context-set-transform-recursion 3)
+ (gimp-context-set-transform-resize TRANSFORM-RESIZE-ADJUST)
+
+ (gimp-item-transform-perspective shadow-layer
+ x0 y0
+ x1 y1
+ x2 y2
+ x3 y3)
+
+ (if (>= shadow-blur 1.0)
+ (begin
+ (gimp-layer-set-lock-alpha shadow-layer FALSE)
+ (gimp-layer-resize shadow-layer
+ shadow-width
+ shadow-height
+ shadow-blur
+ shadow-blur)
+ (plug-in-gauss-rle RUN-NONINTERACTIVE
+ image
+ shadow-layer
+ shadow-blur
+ TRUE
+ TRUE))))
+
+ (if (= from-selection TRUE)
+ (begin
+ (gimp-image-select-item image CHANNEL-OP-REPLACE active-selection)
+ (gimp-edit-clear shadow-layer)
+ (gimp-image-remove-channel image active-selection)))
+
+ (if (and
+ (= (car (gimp-layer-is-floating-sel drawable)) 0)
+ (= from-selection FALSE))
+ (gimp-image-raise-item image drawable))
+
+ (gimp-image-set-active-layer image drawable)
+ (gimp-image-undo-group-end image)
+ (gimp-displays-flush)
+
+ (gimp-context-pop)
)
)
diff --git a/plug-ins/script-fu/scripts/predator.scm b/plug-ins/script-fu/scripts/predator.scm
index adb8fe1..f8e1fe4 100644
--- a/plug-ins/script-fu/scripts/predator.scm
+++ b/plug-ins/script-fu/scripts/predator.scm
@@ -45,6 +45,8 @@
(active-layer 0)
)
+ (gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start image)
(gimp-layer-add-alpha drawable)
@@ -111,6 +113,7 @@
(gimp-image-remove-channel image active-selection)
(gimp-image-undo-group-end image)
(gimp-displays-flush)
+ (gimp-context-pop)
)
)
diff --git a/plug-ins/script-fu/scripts/pupi-button.scm b/plug-ins/script-fu/scripts/pupi-button.scm
index 4300473..f8cafb6 100644
--- a/plug-ins/script-fu/scripts/pupi-button.scm
+++ b/plug-ins/script-fu/scripts/pupi-button.scm
@@ -114,8 +114,8 @@
)
(gimp-context-push)
-
(gimp-context-set-antialias FALSE)
+ (gimp-context-set-feather FALSE)
(gimp-image-undo-disable img)
; Create bumpmap layer
diff --git a/plug-ins/script-fu/scripts/round-corners.scm b/plug-ins/script-fu/scripts/round-corners.scm
index 83aa58f..d5549fb 100644
--- a/plug-ins/script-fu/scripts/round-corners.scm
+++ b/plug-ins/script-fu/scripts/round-corners.scm
@@ -59,8 +59,7 @@
(pic-layer (car (gimp-image-get-active-drawable image))))
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(if (= work-on-copy TRUE)
(gimp-image-undo-disable image)
diff --git a/plug-ins/script-fu/scripts/select-to-brush.scm b/plug-ins/script-fu/scripts/select-to-brush.scm
index 6960e82..ee95a9e 100644
--- a/plug-ins/script-fu/scripts/select-to-brush.scm
+++ b/plug-ins/script-fu/scripts/select-to-brush.scm
@@ -47,6 +47,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable image)
diff --git a/plug-ins/script-fu/scripts/select-to-image.scm b/plug-ins/script-fu/scripts/select-to-image.scm
index eb0496f..f3860f6 100644
--- a/plug-ins/script-fu/scripts/select-to-image.scm
+++ b/plug-ins/script-fu/scripts/select-to-image.scm
@@ -38,6 +38,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable image)
diff --git a/plug-ins/script-fu/scripts/selection-round.scm b/plug-ins/script-fu/scripts/selection-round.scm
index 18c5c90..bc0d030 100644
--- a/plug-ins/script-fu/scripts/selection-round.scm
+++ b/plug-ins/script-fu/scripts/selection-round.scm
@@ -53,8 +53,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias FALSE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
;; select to the full bounds of the selection,
;; fills in irregular shapes or holes.
diff --git a/plug-ins/script-fu/scripts/sota-chrome-logo.scm b/plug-ins/script-fu/scripts/sota-chrome-logo.scm
index 1464172..5cd760b 100644
--- a/plug-ins/script-fu/scripts/sota-chrome-logo.scm
+++ b/plug-ins/script-fu/scripts/sota-chrome-logo.scm
@@ -106,7 +106,7 @@
)
(gimp-context-push)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-resize img width height 0 0)
diff --git a/plug-ins/script-fu/scripts/speed-text.scm b/plug-ins/script-fu/scripts/speed-text.scm
index 4f099a1..b95504b 100644
--- a/plug-ins/script-fu/scripts/speed-text.scm
+++ b/plug-ins/script-fu/scripts/speed-text.scm
@@ -35,6 +35,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img bg-layer 0 1)
diff --git a/plug-ins/script-fu/scripts/starscape-logo.scm b/plug-ins/script-fu/scripts/starscape-logo.scm
index 0301174..1652153 100644
--- a/plug-ins/script-fu/scripts/starscape-logo.scm
+++ b/plug-ins/script-fu/scripts/starscape-logo.scm
@@ -72,6 +72,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-selection-none img)
(script-fu-util-image-resize-from-layer img logo-layer)
diff --git a/plug-ins/script-fu/scripts/t-o-p-logo.scm b/plug-ins/script-fu/scripts/t-o-p-logo.scm
index cdb8b4f..058b028 100644
--- a/plug-ins/script-fu/scripts/t-o-p-logo.scm
+++ b/plug-ins/script-fu/scripts/t-o-p-logo.scm
@@ -23,6 +23,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img sparkle-layer shadow-layer bg-layer)
diff --git a/plug-ins/script-fu/scripts/test-sphere.scm b/plug-ins/script-fu/scripts/test-sphere.scm
index f9d4664..2b4cbe1 100644
--- a/plug-ins/script-fu/scripts/test-sphere.scm
+++ b/plug-ins/script-fu/scripts/test-sphere.scm
@@ -199,7 +199,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img drawable 0 0)
diff --git a/plug-ins/script-fu/scripts/text-circle.scm b/plug-ins/script-fu/scripts/text-circle.scm
index 54358f5..c1688ea 100644
--- a/plug-ins/script-fu/scripts/text-circle.scm
+++ b/plug-ins/script-fu/scripts/text-circle.scm
@@ -55,6 +55,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-context-set-antialias antialias)
(gimp-image-undo-disable img)
(gimp-image-insert-layer img BG-layer 0 0)
diff --git a/plug-ins/script-fu/scripts/textured-logo.scm b/plug-ins/script-fu/scripts/textured-logo.scm
index f19a3a5..d6ff45c 100644
--- a/plug-ins/script-fu/scripts/textured-logo.scm
+++ b/plug-ins/script-fu/scripts/textured-logo.scm
@@ -37,7 +37,7 @@
)
(gimp-context-push)
- (gimp-context-set-feather TRUE)
+ (gimp-context-set-defaults)
(script-fu-util-image-resize-from-layer img logo-layer)
(script-fu-util-image-add-layers img text-shadow-layer drop-shadow-layer blend-layer shadow-layer)
diff --git a/plug-ins/script-fu/scripts/tileblur.scm b/plug-ins/script-fu/scripts/tileblur.scm
index 41abde4..2f01eb6 100644
--- a/plug-ins/script-fu/scripts/tileblur.scm
+++ b/plug-ins/script-fu/scripts/tileblur.scm
@@ -31,11 +31,12 @@
)
)
+ (gimp-context-push)
+ (gimp-context-set-feather FALSE)
(gimp-image-undo-group-start theImage)
+
(gimp-layer-resize theLayer (* 3 theWidth) (* 3 theHeight) 0 0)
- (gimp-context-set-feather 0)
- (gimp-context-set-feather-radius 0 0)
(gimp-image-select-rectangle theImage CHANNEL-OP-REPLACE 0 0 theWidth theHeight)
(gimp-edit-cut theLayer)
@@ -59,6 +60,7 @@
(gimp-layer-set-offsets theLayer 0 0)
(gimp-image-undo-group-end theImage)
(gimp-displays-flush)
+ (gimp-context-pop)
)
)
diff --git a/plug-ins/script-fu/scripts/title-header.scm b/plug-ins/script-fu/scripts/title-header.scm
index fcfeaa8..cca47f1 100644
--- a/plug-ins/script-fu/scripts/title-header.scm
+++ b/plug-ins/script-fu/scripts/title-header.scm
@@ -79,8 +79,7 @@
)
(gimp-context-push)
- (gimp-context-set-antialias TRUE)
- (gimp-context-set-feather FALSE)
+ (gimp-context-set-defaults)
; Create image
diff --git a/plug-ins/script-fu/scripts/truchet.scm b/plug-ins/script-fu/scripts/truchet.scm
index cc81657..312eb16 100644
--- a/plug-ins/script-fu/scripts/truchet.scm
+++ b/plug-ins/script-fu/scripts/truchet.scm
@@ -121,6 +121,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-disable img)
(gimp-image-undo-disable tile)
diff --git a/plug-ins/script-fu/scripts/xach-effect.scm b/plug-ins/script-fu/scripts/xach-effect.scm
index daa33ac..679f97f 100644
--- a/plug-ins/script-fu/scripts/xach-effect.scm
+++ b/plug-ins/script-fu/scripts/xach-effect.scm
@@ -51,6 +51,7 @@
)
(gimp-context-push)
+ (gimp-context-set-defaults)
(gimp-image-undo-group-start image)
(gimp-layer-add-alpha drawable)
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]
