From a8a214ffcbb23649dad691bc84cdeb2c2baaf54a Mon Sep 17 00:00:00 2001 From: Thomas Manni Date: Tue, 1 Mar 2016 22:40:01 +0100 Subject: [PATCH] Bug 724731 - Difference clouds - memory leak if UNDO performed Create the clouds layer after calling gimp-image-undo-group-start --- plug-ins/script-fu/scripts/difference-clouds.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/plug-ins/script-fu/scripts/difference-clouds.scm b/plug-ins/script-fu/scripts/difference-clouds.scm index 49862e9e87..c63ca7da87 100644 --- a/plug-ins/script-fu/scripts/difference-clouds.scm +++ b/plug-ins/script-fu/scripts/difference-clouds.scm @@ -29,14 +29,17 @@ (width (cadddr (gimp-drawable-mask-intersect drawable))) (height (caddr (cddr (gimp-drawable-mask-intersect drawable)))) (type (car (gimp-drawable-type-with-alpha drawable))) - (diff-clouds (car (gimp-layer-new image width height type - "Clouds" 100 DIFFERENCE-MODE))) + (diff-clouds -1) (offset-x 0) (offset-y 0) ) (gimp-image-undo-group-start image) + ; Create the cloud layer + (set! diff-clouds (car (gimp-layer-new image width height type + "Clouds" 100 DIFFERENCE-MODE))) + ; Add the cloud layer above the current layer (gimp-image-insert-layer image diff-clouds 0 -1)