diff --git a/ChangeLog b/ChangeLog index 73c07cd5e2..3c1bd50fe4 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2007-01-04 Raphaƫl Quinet + + * plug-ins/script-fu/scripts/old-photo.scm: fixed crash when + Mottle option is selected (mLayer was incorrectly declared). + 2007-01-04 Sven Neumann * libgimpwidgets/gimppreviewarea.c: fixed clipping (bug #392692). diff --git a/plug-ins/script-fu/scripts/old-photo.scm b/plug-ins/script-fu/scripts/old-photo.scm index 1516cce4fe..53c5c0e081 100644 --- a/plug-ins/script-fu/scripts/old-photo.scm +++ b/plug-ins/script-fu/scripts/old-photo.scm @@ -57,9 +57,11 @@ (set! theWidth (car (gimp-image-width theImage))) (set! theHeight (car (gimp-image-height theImage))) (if (= inMottle TRUE) - (begin (set! mLayer (car (gimp-layer-new theImage theWidth theHeight - RGBA-IMAGE "Mottle" - 100 DARKEN-ONLY-MODE))) + (let ( + (mLayer (car (gimp-layer-new theImage theWidth theHeight + RGBA-IMAGE "Mottle" + 100 DARKEN-ONLY-MODE))) + ) (gimp-image-add-layer theImage mLayer 0) (gimp-selection-all theImage)