On Mon, 2010-06-14 at 20:04 -0400, John Dey wrote:

> Thanks for the response.  I had added the flatten command today but
> the script still has an execution error.  Here is what I have tried:
> (define (round-corners filein fileout)
> (let* ((image (car (gimp-file-load RUN-NONINTERACTIVE filein filein)))
>        (drawable (car (gimp-image-get-active-layer image))))
>      (set! drawable (gimp-image-flatten image))
>      (script-fu-round-corners RUN-NONINTERACTIVE
>                          image drawable 15 TRUE 8 8 15 TRUE FALSE)
>      (gimp-file-save RUN-NONINTERACTIVE image drawable fileout fileout)
>      (gimp-image-delete image)))

You need to flatten the image after you've run the round-corners script
of course.


Gimp-user mailing list

Reply via email to