Problem with file-tiff-save - Printable Version

Code:

(define (jpg-to-tiff pattern)

(let* (

    (filelist (cadr (file-glob pattern 1)))

    ) 

    (while (not (null? filelist)) 



        (let* (

            (theFilenameIn (car filelist))

            (theImage (car (gimp-file-load RUN-NONINTERACTIVE theFilenameIn "")))

            (theDrawable (car (gimp-image-get-active-drawable theImage)))

            (theColor1 (car (gimp-image-pick-color theImage theDrawable 200 1 FALSE FALSE 0)))

            (theColor2 (car (gimp-image-pick-color theImage theDrawable 1 1 FALSE FALSE 0)))

            (theXresolution (- (car (gimp-image-get-resolution theImage)) 1))

            (test (unbreakupstr (reverse (cdr (reverse (strbreakup theFilenameIn ".")))) "."))

            (theFilenameOut (string-append test ".tif"))

            )



.

.

.



                    (theDrawable2 (car (gimp-image-get-active-drawable theImage)))

                    (theLayer2 (car (gimp-image-get-active-layer theImage)))                            

                    )



                    (plug-in-autocrop 1 theImage theDrawable2)

                    (gimp-layer-flatten theLayer2)

                    (plug-in-icc-profile-apply RUN-NONINTERACTIVE theImage "eciRGB_v2.icc" COLOR-RENDERING-INTENT-PERCEPTUAL FALSE)

                    (file-tiff-save RUN-NONINTERACTIVE theImage theDrawable2 theFilenameOut theFilenameOut 1)



                    (gimp-image-delete theImage)

                    (set! filelist (cdr filelist))

                )

            )

        )

    )

)

)

Code:

def bilder_check(file_name):

 

    print(file_name)



    image = pdb.gimp_file_load(file_name, file_name)

    drawable = pdb.gimp_image_get_active_layer(image)

    has_alpha = pdb.gimp_drawable_has_alpha(drawable)

    width = pdb.gimp_image_width(image)

    height = pdb.gimp_image_height(image)

    xresolution, yresolution = pdb.gimp_image_get_resolution(image)

    num_vectors, vector_ids = pdb.gimp_image_get_vectors(image)

    vectors = pdb.gimp_image_get_vectors_by_name(image, "Freisteller")

    num_strokes, stroke_ids = pdb.gimp_vectors_get_strokes(vectors)

.

.

.