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

Porting scripts to new API, marking layer names for translation

Browse Source
This commit is contained in:
Alexandre Prokoudine
2010-10-10 17:59:29 +04:00
parent 4d18135b46
commit 3abf6de944
4 changed files with 14 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
plug-ins/script-fu/scripts/circuit.scm
View File

@ -58,7 +58,7 @@
(if (= (car (gimp-selection-is-empty image)) TRUE)
(begin
(gimp-selection-layer-alpha drawable)
(gimp-item-to-selection drawable 2)
(set! active-selection (car (gimp-selection-save image)))
(set! from-selection FALSE))
(begin
@ -77,15 +77,15 @@
select-width
select-height
type
"effect layer"
_"Effect layer"
100
NORMAL-MODE)))
(gimp-image-add-layer image effect-layer -1)
(gimp-image-insert-layer image effect-layer -1 -1)
(gimp-layer-set-offsets effect-layer select-offset-x select-offset-y)
(gimp-selection-none image)
(gimp-edit-clear effect-layer)
(gimp-selection-load active-selection)
(gimp-item-to-selection active-selection 2)
(gimp-edit-copy drawable)
(let ((floating-sel (car (gimp-edit-paste effect-layer FALSE))))
@ -101,7 +101,7 @@
(gimp-context-set-foreground '(14 14 14))
)
(gimp-selection-load active-selection)
(gimp-item-to-selection active-selection 2)
(plug-in-maze RUN-NONINTERACTIVE image active-layer 5 5 TRUE 0 seed 57 1)
(plug-in-oilify RUN-NONINTERACTIVE image active-layer mask-size 0)
(plug-in-edge RUN-NONINTERACTIVE image active-layer 2 1 0)