moved gimp-undo-push-group-end to the end of the script. Fixes bug

2003-06-05  Michael Natterer  <mitch@gimp.org>

	* plug-ins/script-fu/scripts/predator.scm (script-fu-predator):
	moved gimp-undo-push-group-end to the end of the script.
	Fixes bug #114416.
This commit is contained in:
Michael Natterer 2003-06-05 12:04:07 +00:00 committed by Michael Natterer
parent ba4f801482
commit 378a6d3d6a
2 changed files with 12 additions and 6 deletions

View File

@ -1,3 +1,9 @@
2003-06-05 Michael Natterer <mitch@gimp.org>
* plug-ins/script-fu/scripts/predator.scm (script-fu-predator):
moved gimp-undo-push-group-end to the end of the script.
Fixes bug #114416.
2003-06-04 Sven Neumann <sven@gimp.org>
* app/core/gimpmarshal.list: added VOID: ENUM, BOXED, INT.

View File

@ -90,9 +90,9 @@
(if (= keep-selection FALSE)
(gimp-selection-none image))
(gimp-undo-push-group-end image)
(gimp-image-set-active-layer image drawable)
(gimp-image-remove-channel image active-selection)
(gimp-undo-push-group-end image)
(gimp-displays-flush)))
(script-fu-register "script-fu-predator"
@ -102,10 +102,10 @@
"Adrian Likins"
"10/12/97"
"RGB*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Edge Amount" '(2 0 24 1 1 0 0)
SF-TOGGLE _"Pixelize" TRUE
SF-ADJUSTMENT _"Pixel Amount" '(3 1 16 1 1 0 0)
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT _"Edge Amount" '(2 0 24 1 1 0 0)
SF-TOGGLE _"Pixelize" TRUE
SF-ADJUSTMENT _"Pixel Amount" '(3 1 16 1 1 0 0)
SF-TOGGLE _"Keep Selection" TRUE
SF-TOGGLE _"Separate Layer" TRUE)