callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

script-fu: port all scripts to the new gimp-drawable-edit functions

Browse Source
This commit is contained in:
Michael Natterer
2018-04-16 20:12:12 +02:00
parent 90ef8b123c
commit 233ac80de1
27 changed files with 161 additions and 128 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
plug-ins/script-fu/scripts/chrome-it.scm
View File

@ -72,7 +72,7 @@
(define (copy-layer-chrome-it dest-image dest-drawable source-image source-drawable)
(gimp-selection-all dest-image)
(gimp-edit-clear dest-drawable)
(gimp-drawable-edit-clear dest-drawable)
(gimp-selection-none dest-image)
(gimp-selection-all source-image)
(gimp-edit-copy source-drawable)
@ -129,9 +129,9 @@
(gimp-context-set-background '(255 255 255))
(gimp-selection-none img)
(gimp-edit-fill layer2 FILL-BACKGROUND)
(gimp-edit-fill layer3 FILL-BACKGROUND)
(gimp-edit-clear shadow)
(gimp-drawable-edit-fill layer2 FILL-BACKGROUND)
(gimp-drawable-edit-fill layer3 FILL-BACKGROUND)
(gimp-drawable-edit-clear shadow)
(gimp-item-set-visible bg-layer FALSE)
(gimp-item-set-visible shadow FALSE)
@ -140,9 +140,9 @@
(gimp-context-set-background '(0 0 0))
(gimp-selection-translate img offx1 offy1)
(gimp-selection-feather img feather)
(gimp-edit-fill layer2 FILL-BACKGROUND)
(gimp-drawable-edit-fill layer2 FILL-BACKGROUND)
(gimp-selection-translate img (* 2 offx2) (* 2 offy2))
(gimp-edit-fill layer3 FILL-BACKGROUND)
(gimp-drawable-edit-fill layer3 FILL-BACKGROUND)
(gimp-selection-none img)
(set! layer2 (car (gimp-image-merge-visible-layers img CLIP-TO-IMAGE)))
(gimp-drawable-invert layer2 FALSE)
@ -160,22 +160,22 @@
(gimp-layer-add-mask layer1 layer-mask)
(gimp-image-select-item img CHANNEL-OP-REPLACE mask)
(gimp-context-set-background '(255 255 255))
(gimp-edit-fill layer-mask FILL-BACKGROUND)
(gimp-drawable-edit-fill layer-mask FILL-BACKGROUND)
(set! layer2 (car (gimp-layer-copy layer1 TRUE)))
(gimp-image-insert-layer img layer2 0 0)
(gimp-context-set-brush (brush brush-size))
(gimp-context-set-foreground '(255 255 255))
(gimp-edit-stroke layer-mask)
(gimp-drawable-edit-stroke-selection layer-mask)
(gimp-context-set-background '(0 0 0))
(gimp-selection-feather img (* feather 1.5))
(gimp-selection-translate img (* 2.5 offx1) (* 2.5 offy1))
(gimp-edit-fill shadow FILL-BACKGROUND)
(gimp-drawable-edit-fill shadow FILL-BACKGROUND)
(gimp-selection-all img)
(gimp-context-set-pattern "Marble #1")
(gimp-edit-bucket-fill bg-layer BUCKET-FILL-PATTERN LAYER-MODE-NORMAL 100 0 FALSE 0 0)
(gimp-drawable-edit-fill bg-layer FILL-PATTERN)
(gimp-selection-none img)
(gimp-image-convert-rgb img)