dnrops
/
gimp
mirror of https://github.com/GNOME/gimp.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

plug-ins/script-fu/scripts/carve-it.scm 

2004-03-13  Pedro Gimeno  <pggimeno@wanadoo.es>

	* plug-ins/script-fu/scripts/carve-it.scm
	* plug-ins/script-fu/scripts/chrome-it.scm
	* plug-ins/script-fu/scripts/crystal-logo.scm
	* plug-ins/script-fu/scripts/sota-chrome-logo.scm: Fixed to avoid
	pasting to a layer that was not added to any image. This was causing
	the scripts to abort, because gimp-edit-paste is now failing in that
	case.
This commit is contained in:
Pedro Gimeno 2004-03-13 16:13:34 +00:00 committed by Pedro Gimeno Fortea
parent 27fc81be2a
commit 0dcbbccfea
5 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ChangeLog
View File

@ -1,3 +1,13 @@
2004-03-13 Pedro Gimeno <pggimeno@wanadoo.es>
* plug-ins/script-fu/scripts/carve-it.scm
* plug-ins/script-fu/scripts/chrome-it.scm
* plug-ins/script-fu/scripts/crystal-logo.scm
* plug-ins/script-fu/scripts/sota-chrome-logo.scm: Fixed to avoid
pasting to a layer that was not added to any image. This was causing
the scripts to abort, because gimp-edit-paste is now failing in that
case.
2004-03-13 Sven Neumann <sven@gimp.org>
* app/tools/gimpblendoptions.c: override the "gradient_repeat"

2
plug-ins/script-fu/scripts/carve-it.scm
View File

@ -82,6 +82,7 @@
(gimp-edit-clear inset-layer)
(gimp-edit-clear layer1)
(gimp-selection-none img)
(gimp-image-add-layer img layer1 0)
(copy-layer-carve-it img layer1 bg-image bg-layer)
(gimp-edit-clear inset-layer)
@ -89,7 +90,6 @@
(gimp-edit-copy mask-drawable)
(gimp-image-add-channel img mask 0)
(gimp-image-add-layer img layer1 0)
(plug-in-tile 1 img layer1 width height FALSE)
(set! mask-fs (car (gimp-edit-paste mask FALSE)))
(gimp-floating-sel-anchor mask-fs)

2
plug-ins/script-fu/scripts/chrome-it.scm
View File

@ -124,9 +124,9 @@
(set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
(gimp-invert layer2)
(gimp-image-add-layer img layer1 0)
(copy-layer-chrome-it img layer1 banding-img banding-layer)
(gimp-image-delete banding-img)
(gimp-image-add-layer img layer1 0)
(gimp-layer-scale layer1 width height FALSE)
(plug-in-gauss-iir 1 img layer1 10 TRUE TRUE)
(gimp-layer-set-opacity layer1 50)

4
plug-ins/script-fu/scripts/crystal-logo.scm
View File

@ -118,9 +118,9 @@
(set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
(gimp-invert layer2)
(gimp-image-add-layer img layer1 0)
(copy-layer-crystal img layer1 banding-img banding-layer)
(gimp-image-delete banding-img)
(gimp-image-add-layer img layer1 0)
(gimp-layer-scale layer1 width height FALSE)
(plug-in-gauss-iir 1 img layer1 10 TRUE TRUE)
(gimp-layer-set-opacity layer1 50)
@ -147,9 +147,9 @@
(gimp-image-add-layer img bg-layer 2)
(copy-layer-crystal img bg-layer tile-img tile-layer)
(gimp-image-delete tile-img)
(gimp-image-add-layer img bg-layer 2)
(set! layer2 (car (gimp-layer-copy bg-layer TRUE)))
(gimp-image-add-layer img layer2 1)

2
plug-ins/script-fu/scripts/sota-chrome-logo.scm
View File

@ -119,9 +119,9 @@
(set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
(gimp-invert layer2)
(gimp-image-add-layer img layer1 0)
(copy-layer-sota img layer1 banding-img banding-layer)
(gimp-image-delete banding-img)
(gimp-image-add-layer img layer1 0)
(gimp-layer-scale layer1 width height FALSE)
(plug-in-gauss-iir 1 img layer1 10 TRUE TRUE)
(gimp-layer-set-opacity layer1 50)