dnrops
/
gimp
mirror of https://github.com/GNOME/gimp.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

plug-ins/script-fu/scripts/ripply-anim.scm 

2000-06-05  Sven Neumann  <sven@gimp.org>

	* plug-ins/script-fu/scripts/ripply-anim.scm
	* plug-ins/script-fu/scripts/spinning_globe.scm
	* plug-ins/script-fu/scripts/waves-anim.scm: applied
	gimp-quinet-000531-2.patch to ensure that the output of
	these scripts is viewed in "replace" mode and not in
	"combine" mode.
This commit is contained in:
Sven Neumann 2000-06-06 11:54:05 +00:00 committed by Sven Neumann
parent c97ec171f6
commit c013dd25b7
5 changed files with 17 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ChangeLog
View File

@ -1,3 +1,12 @@
2000-06-05 Sven Neumann <sven@gimp.org>
* plug-ins/script-fu/scripts/ripply-anim.scm
* plug-ins/script-fu/scripts/spinning_globe.scm
* plug-ins/script-fu/scripts/waves-anim.scm: applied
gimp-quinet-000531-2.patch to ensure that the output of
these scripts is viewed in "replace" mode and not in
"combine" mode.
2000-06-05 Sven Neumann <sven@gimp.org>
* plug-ins/script-fu/scripts/3d-outline.scm

3
plug-ins/script-fu/scripts/ripply-anim.scm
View File

@ -65,7 +65,8 @@
(gimp-crop dup-image width height xpos ypos)
(set! layer-name (string-append "Frame "
(number->string (- num-frames remaining-frames) 10)))
(number->string (- num-frames remaining-frames) 10)
" (replace)"))
(set! this-layer (car (gimp-layer-new out-imagestack
width height RGB
layer-name 100 NORMAL)))

3
plug-ins/script-fu/scripts/spinning-globe.scm
View File

@ -43,7 +43,8 @@
(gimp-image-add-layer theImage theFrame 0)
(gimp-layer-set-name theFrame
(string-append "Anim Frame: "
(number->string (- inFrames n) 10)))
(number->string (- inFrames n) 10)
" (replace)"))
(plug-in-map-object RUN-NONINTERACTIVE
theImage theFrame
; mapping

3
plug-ins/script-fu/scripts/spinning_globe.scm
View File

@ -43,7 +43,8 @@
(gimp-image-add-layer theImage theFrame 0)
(gimp-layer-set-name theFrame
(string-append "Anim Frame: "
(number->string (- inFrames n) 10)))
(number->string (- inFrames n) 10)
" (replace)"))
(plug-in-map-object RUN-NONINTERACTIVE
theImage theFrame
; mapping

3
plug-ins/script-fu/scripts/waves-anim.scm
View File

@ -54,7 +54,8 @@
(layer-name (string-append "Frame "
(number->string
(- (+ num-frames 2)
remaining-frames) 10))))
remaining-frames) 10)
" (replace)")))
(gimp-layer-set-preserve-trans waves-layer FALSE)
(gimp-image-add-layer image waves-layer -1)
(gimp-layer-set-name waves-layer layer-name)