Hilfe, script fu dreht merkwürdig!

[MR-L]

Hi,
brauche dringend hilfe, denn ich bin ein blutiger Anfänger in Scheme.
Bei meinem gekürzten Script habe ich das Problem, dass gimp zu weit dreht.
Hoffe, dass irgendwer mir helfen kann.

(define (rotate sfImage
                sfDrawable
                sfAngle)
            
    (let* (
            (varCenterX 0)
            (varCenterY 0)
          )
        
        (set! varCenterX
            (/   
                (car 
                    (gimp-image-width sfImage)
                )
            2) 
        )
        (set! varCenterY
            (/
                (car 
                    (gimp-image-height sfImage)
                )
            2)
        )      
        
        (gimp-drawable-transform-rotate-default sfDrawable
                                                sfAngle
                                                TRUE
                                                varCenterX
                                                varCenterY
                                                TRUE
                                                0 
        )
    (gimp-displays-flush)   
    )
)
(script-fu-register
    "rotate"
    "rotate"
    "Rotates the active Layer."
    "Mr.L"
    "copyright 2009, Mr.L"
    "02.10.2009 21:01:44"
    "*"
    SF-IMAGE "Image" 0
    SF-DRAWABLE "Drawable" 0
    SF-ADJUSTMENT "Angle" '(0.5 -180 180 0.1 1 2 0)
)
(script-fu-menu-register "rotate" "<Image>/Filters/Own Script Fu's")