Zerknij czy to jest to, co potrzebujesz:
(define (script-fu-crop-image-to-selected-layer image drawable)
(let* (
(layer (car (gimp-image-get-active-layer image)))
(layer-offsets (gimp-drawable-offsets layer))
)
(
(gimp-image-crop
image
(car (gimp-drawable-width layer))
(car (gimp-drawable-height layer))
(car layer-offsets)
(car (cdr layer-offsets))
)
(gimp-displays-flush)
))
)
(script-fu-register
"script-fu-crop-image-to-selected-layer"
"<Image>/Script-Fu/Crop image to selected layer"
"Crop image to selected layer"
"Ziomioslaw"
"Ziomioslaw"
"2017-05-23"
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Layer" 0
)