plug-ins/script-fu/scripts/alien-glow-logo.scm

2005-03-24  Sven Neumann  <sven@gimp.org>

	* plug-ins/script-fu/scripts/alien-glow-logo.scm
	* plug-ins/script-fu/scripts/alien-neon-logo.scm
	* plug-ins/script-fu/scripts/basic1-logo.scm
	* plug-ins/script-fu/scripts/basic2-logo.scm
	* plug-ins/script-fu/scripts/blended-logo.scm
	* plug-ins/script-fu/scripts/bovinated-logo.scm
	* plug-ins/script-fu/scripts/chalk.scm
	* plug-ins/script-fu/scripts/chip-away.scm
	* plug-ins/script-fu/scripts/chrome-logo.scm
	* plug-ins/script-fu/scripts/comic-logo.scm
	* plug-ins/script-fu/scripts/coolmetal-logo.scm
	* plug-ins/script-fu/scripts/frosty-logo.scm
	* plug-ins/script-fu/scripts/glossy.scm
	* plug-ins/script-fu/scripts/gradient-bevel-logo.scm
	* plug-ins/script-fu/scripts/neon-logo.scm
	* plug-ins/script-fu/scripts/starburst-logo.scm
	* plug-ins/script-fu/scripts/starscape-logo.scm
	* plug-ins/script-fu/scripts/t-o-p-logo.scm
	* plug-ins/script-fu/scripts/textured-logo.scm: no need to set the
	text as name of the text layer. The text layer is created with that
	name already.
This commit is contained in:
Sven Neumann 2005-03-24 00:26:15 +00:00 committed by Sven Neumann
parent e6b63117cf
commit c3578e01b3
20 changed files with 24 additions and 19 deletions

View File

@ -1,3 +1,27 @@
2005-03-24 Sven Neumann <sven@gimp.org>
* plug-ins/script-fu/scripts/alien-glow-logo.scm
* plug-ins/script-fu/scripts/alien-neon-logo.scm
* plug-ins/script-fu/scripts/basic1-logo.scm
* plug-ins/script-fu/scripts/basic2-logo.scm
* plug-ins/script-fu/scripts/blended-logo.scm
* plug-ins/script-fu/scripts/bovinated-logo.scm
* plug-ins/script-fu/scripts/chalk.scm
* plug-ins/script-fu/scripts/chip-away.scm
* plug-ins/script-fu/scripts/chrome-logo.scm
* plug-ins/script-fu/scripts/comic-logo.scm
* plug-ins/script-fu/scripts/coolmetal-logo.scm
* plug-ins/script-fu/scripts/frosty-logo.scm
* plug-ins/script-fu/scripts/glossy.scm
* plug-ins/script-fu/scripts/gradient-bevel-logo.scm
* plug-ins/script-fu/scripts/neon-logo.scm
* plug-ins/script-fu/scripts/starburst-logo.scm
* plug-ins/script-fu/scripts/starscape-logo.scm
* plug-ins/script-fu/scripts/t-o-p-logo.scm
* plug-ins/script-fu/scripts/textured-logo.scm: no need to set the
text as name of the text layer. The text layer is created with that
name already.
2005-03-24 Sven Neumann <sven@gimp.org> 2005-03-24 Sven Neumann <sven@gimp.org>
* app/widgets/gimpmessagebox.h * app/widgets/gimpmessagebox.h

View File

@ -85,7 +85,6 @@
(height (car (gimp-drawable-height text-layer)))) (height (car (gimp-drawable-height text-layer))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-alien-glow-logo-effect img text-layer size glow-color) (apply-alien-glow-logo-effect img text-layer size glow-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -148,7 +148,6 @@
(fade-size (- (* (+ band-size gap-size) num-bands) 1)) (fade-size (- (* (+ band-size gap-size) num-bands) 1))
(text-layer (car (gimp-text-fontname img -1 0 0 text (+ fade-size 10) TRUE size PIXELS fontname)))) (text-layer (car (gimp-text-fontname img -1 0 0 text (+ fade-size 10) TRUE size PIXELS fontname))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-alien-neon-logo-effect img text-layer fg-color bg-color (apply-alien-neon-logo-effect img text-layer fg-color bg-color
band-size gap-size num-bands do-fade) band-size gap-size num-bands do-fade)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)

View File

@ -73,7 +73,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text 10 TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text 10 TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-basic1-logo-effect img text-layer bg-color text-color) (apply-basic1-logo-effect img text-layer bg-color text-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -92,7 +92,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text 10 TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text 10 TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-basic2-logo-effect img text-layer bg-color text-color) (apply-basic2-logo-effect img text-layer bg-color text-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -156,7 +156,6 @@
(gimp-context-push) (gimp-context-push)
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(gimp-context-set-foreground text-color) (gimp-context-set-foreground text-color)
(gimp-layer-set-preserve-trans text-layer TRUE) (gimp-layer-set-preserve-trans text-layer TRUE)
(gimp-edit-fill text-layer FOREGROUND-FILL) (gimp-edit-fill text-layer FOREGROUND-FILL)

View File

@ -109,7 +109,6 @@
(border (/ size 4)) (border (/ size 4))
(text-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-bovinated-logo-effect img text-layer spots-x spots-y bg-color) (apply-bovinated-logo-effect img text-layer spots-x spots-y bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -92,7 +92,6 @@
(gimp-context-push) (gimp-context-push)
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(gimp-context-set-foreground chalk-color) (gimp-context-set-foreground chalk-color)
(gimp-layer-set-preserve-trans text-layer TRUE) (gimp-layer-set-preserve-trans text-layer TRUE)
(gimp-edit-fill text-layer FOREGROUND-FILL) (gimp-edit-fill text-layer FOREGROUND-FILL)

View File

@ -163,7 +163,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 (text-layer (car (gimp-text-fontname img -1 0 0
text 30 TRUE font-size PIXELS font)))) text 30 TRUE font-size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-chip-away-logo-effect img text-layer spread-amount blur-amount (apply-chip-away-logo-effect img text-layer spread-amount blur-amount
invert drop-shadow keep-bump bg-fill invert drop-shadow keep-bump bg-fill
keep-back pattern) keep-back pattern)

View File

@ -98,7 +98,6 @@
(b-size (* size 0.2)) (b-size (* size 0.2))
(text-layer (car (gimp-text-fontname img -1 0 0 text b-size TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text b-size TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-chrome-logo-effect img text-layer (* size 0.1) bg-color) (apply-chrome-logo-effect img text-layer (* size 0.1) bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -137,7 +137,6 @@
(text-layer (car (gimp-text-fontname (text-layer (car (gimp-text-fontname
img -1 0 0 text border TRUE size PIXELS font)))) img -1 0 0 text border TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-comic-logo-effect img text-layer gradient gradient-reverse (apply-comic-logo-effect img text-layer gradient gradient-reverse
ol-width ol-color bg-color) ol-width ol-color bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)

View File

@ -149,7 +149,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text 0 TRUE (text-layer (car (gimp-text-fontname img -1 0 0 text 0 TRUE
size PIXELS font)))) size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-cool-metal-logo-effect img text-layer size bg-color (apply-cool-metal-logo-effect img text-layer size bg-color
gradient gradient-reverse) gradient gradient-reverse)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)

View File

@ -116,7 +116,6 @@
(border (/ size 5)) (border (/ size 5))
(text-layer (car (gimp-text-fontname img -1 0 0 text (* border 2) TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text (* border 2) TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-frosty-logo-effect img text-layer size bg-color) (apply-frosty-logo-effect img text-layer size bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -224,7 +224,6 @@
(let* ((img (car (gimp-image-new 256 256 RGB))) (let* ((img (car (gimp-image-new 256 256 RGB)))
(text-layer (car (gimp-text-fontname img -1 0 0 text 30 TRUE size PIXELS font)))) (text-layer (car (gimp-text-fontname img -1 0 0 text 30 TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-glossy-logo-effect img text-layer (apply-glossy-logo-effect img text-layer
blend-gradient-text blend-gradient-text
blend-gradient-text-reverse blend-gradient-text-reverse

View File

@ -116,7 +116,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text (text-layer (car (gimp-text-fontname img -1 0 0 text
border TRUE size PIXELS font)))) border TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-gradient-bevel-logo-effect img text-layer border (apply-gradient-bevel-logo-effect img text-layer border
bevel-height bevel-width bg-color) bevel-height bevel-width bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)

View File

@ -203,7 +203,6 @@
(border (/ size 4)) (border (/ size 4))
(tube-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS font)))) (tube-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS font))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name tube-layer text)
(apply-neon-logo-effect img tube-layer size bg-color glow-color shadow) (apply-neon-logo-effect img tube-layer size bg-color glow-color shadow)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -96,7 +96,6 @@
(border (+ feather off)) (border (+ feather off))
(text-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS fontname)))) (text-layer (car (gimp-text-fontname img -1 0 0 text border TRUE size PIXELS fontname))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-starburst-logo-effect img text-layer size burst-color bg-color) (apply-starburst-logo-effect img text-layer size burst-color bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -146,7 +146,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text border (text-layer (car (gimp-text-fontname img -1 0 0 text border
TRUE size PIXELS fontname)))) TRUE size PIXELS fontname))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-starscape-logo-effect img text-layer size glow-color) (apply-starscape-logo-effect img text-layer size glow-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)
(gimp-display-new img))) (gimp-display-new img)))

View File

@ -123,7 +123,6 @@
(border (/ size 5)) (border (/ size 5))
(text-layer (car (gimp-text-fontname img -1 0 0 text (* border 2) TRUE size PIXELS fontname)))) (text-layer (car (gimp-text-fontname img -1 0 0 text (* border 2) TRUE size PIXELS fontname))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-t-o-p-logo-effect img text-layer border hit-rate (apply-t-o-p-logo-effect img text-layer border hit-rate
edge-size edge-only base-color bg-color) edge-size edge-only base-color bg-color)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)

View File

@ -145,7 +145,6 @@
(text-layer (car (gimp-text-fontname img -1 0 0 text b-size (text-layer (car (gimp-text-fontname img -1 0 0 text b-size
TRUE size PIXELS fontname)))) TRUE size PIXELS fontname))))
(gimp-image-undo-disable img) (gimp-image-undo-disable img)
(gimp-drawable-set-name text-layer text)
(apply-textured-logo-effect img text-layer b-size text-pattern tile-type (apply-textured-logo-effect img text-layer b-size text-pattern tile-type
bg-color blend-fg blend-bg) bg-color blend-fg blend-bg)
(gimp-image-undo-enable img) (gimp-image-undo-enable img)