Commit db7d885e authored by Sven Neumann's avatar Sven Neumann

new scheme for i18n of script-fus: translatable strings are marked

like _"foo".


--Sven
parent eccd2eff
2000-03-28 Sven Neumann <sven@gimp.org>
* plugins/script-fu/Makefile.am: don't install test-sphere.scm
* plugins/script-fu/interp_slib.c: accept _"foo" as a normal
string. This allows us to mark strings in scripts for translation
similar to how it is done in C. Please not that this does not mean
that gettext is automatically called on those strings. The
Script-Fu interface code takes care of calling gettext on all
strings that are displayed in the GUI.
* plug-ins/gap/sel-to-anim-img.scm
* plug-ins/script-fu/scripts/*.scm
* plug-ins/webbrowser/web-browser.scm: marked strings for
translation. Hopefully I didn't break anything. Please test!
I noted that there are still some scripts that should be updated
to use the new features like SF-ADJUSTMENTs. Help is very much
appreciated here.
Tue Mar 28 22:47:17 CEST 2000 Stanislav Brabec <utx@penguin.cz>
* plug-ins/gap/*: "Frame Range" typo fix.
......
......@@ -72,7 +72,7 @@
(set! brush-image (car (gimp-image-new selection-width selection-height image-type)))
(while (< idx copies)
(set! draw-name (string-append "frame_" (number->string idx)))
(set! draw-name (string-append "frame_0" (number->string idx)))
(set! brush-draw (car (gimp-layer-new brush-image selection-width selection-height draw-type draw-name 100 NORMAL)))
(gimp-image-add-layer brush-image brush-draw 0)
(if (= bgfill TRUE)
......@@ -105,7 +105,7 @@
)
(script-fu-register "script-fu-selection-to-anim-image"
"<Image>/Script-Fu/Animators/Selection to AnimImage..."
_"<Image>/Script-Fu/Animators/Selection to AnimImage..."
"Create a multilayer image from current selection and apply any PDB Filter to all layer-copies"
"Wolfgang Hofer <hof@hotbot.com>"
"Wolfgang Hofer"
......@@ -113,9 +113,9 @@
"RGB RGBA GRAY GRAYA"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-VALUE "Number of copies" "10"
SF-TOGGLE "Fill with BG Color?" TRUE
SF-TOGGLE "Anim-Filter for all copies?" TRUE
SF-VALUE _"Number of Copies" "10"
SF-TOGGLE _"Fill with BG Color" TRUE
SF-TOGGLE _"Anim-Filter for all Copies" TRUE
)
......
......@@ -2909,6 +2909,13 @@ lreadr (struct gen_readio *f)
UNGETC_FCN (c, f);
}
return (cons (cintern (p), lreadr (f)));
case '_': /* might be a string marked for translation using _(...) */
c = GETC_FCN (f);
if (c == '"')
return (lreadstring (f));
else
UNGETC_FCN (c, f);
break;
case '"':
return (lreadstring (f));
case '#':
......
......@@ -79,19 +79,19 @@
(gimp-display-new img)))
(script-fu-register "script-fu-3d-outline-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/3D Outline..."
_"<Toolbox>/Xtns/Script-Fu/Logos/3D Outline..."
"Creates outlined texts with drop shadow"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
"07 April, 1998"
""
SF-PATTERN "Pattern" "Parque #1"
SF-STRING "Text String" "The Gimp"
SF-ADJUSTMENT "Font Size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT "Font" "-*-Roostheavy-*-r-*-*-24-*-*-*-p-*-*-*"
SF-VALUE "Outline blur radius" "5"
SF-VALUE "Shadow blur radius" "10"
SF-VALUE "Bump-map (alpha layer) blur radius" "5"
SF-TOGGLE "Default bump-map settings" TRUE
SF-VALUE "Shadow X offset" "0"
SF-VALUE "Shadow Y offset" "0")
SF-PATTERN _"Pattern" "Parque #1"
SF-STRING _"Text" "The Gimp"
SF-ADJUSTMENT _"Font Size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-Roostheavy-*-r-*-*-24-*-*-*-p-*-*-*"
SF-VALUE _"Outline Blur Radius" "5"
SF-VALUE _"Shadow Blur Radius" "10"
SF-VALUE _"Bumpmap (Alpha Layer) Blur Radius" "5"
SF-TOGGLE _"Default Bumpmap Settings" TRUE
SF-VALUE _"Shadow X Offset" "0"
SF-VALUE _"Shadow Y Offset" "0")
......@@ -157,18 +157,18 @@
)
(script-fu-register "script-fu-3dtruchet"
"<Toolbox>/Xtns/Script-Fu/Patterns/3D Truchet..."
_"<Toolbox>/Xtns/Script-Fu/Patterns/3D Truchet..."
"3D Truchet pattern"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
"1997"
""
SF-VALUE "Block Size" "64"
SF-VALUE "Thickness" "12"
SF-COLOR "Background Color" '(255 255 255)
SF-COLOR "Begin Blend" '(0 0 0)
SF-COLOR "End Blend" '(255 255 255)
SF-TOGGLE "Supersample?" TRUE
SF-VALUE "Number of Xtiles" "5"
SF-VALUE "Number of Ytiles" "5"
SF-VALUE _"Block Size" "64"
SF-VALUE _"Thickness" "12"
SF-COLOR _"Background Color" '(255 255 255)
SF-COLOR _"Start Blend" '(0 0 0)
SF-COLOR _"End Blend" '(255 255 255)
SF-TOGGLE _"Supersample" TRUE
SF-VALUE _"Number of Xtiles" "5"
SF-VALUE _"Number of Ytiles" "5"
)
......@@ -98,10 +98,10 @@ scriptdata_DATA = \
unsharp-mask.scm \
waves-anim.scm \
weave.scm \
xach-effect.scm \
test-sphere.scm
xach-effect.scm
EXTRA_DIST = $(scriptdata_DATA)
EXTRA_DIST = $(scriptdata_DATA) \
test-sphere.scm
files:
@files=`ls $(DISTFILES) 2> /dev/null`; for p in $$files; do \
......
......@@ -202,15 +202,15 @@
)
(script-fu-register "script-fu-add-bevel"
"<Image>/Script-Fu/Decor/Add Bevel..."
_"<Image>/Script-Fu/Decor/Add Bevel..."
"Add a bevel to an image"
"Andrew Donkin <ard@cs.waikato.ac.nz>"
"Andrew Donkin"
"1997/11/06"
"RGB* GRAY*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT "Thickness" '(5 0 30 1 2 0 0)
SF-TOGGLE "Work on copy" TRUE
SF-TOGGLE "Keep bump layer" FALSE
SF-IMAGE _"Image" 0
SF-DRAWABLE _"Drawable" 0
SF-ADJUSTMENT _"Thickness" '(5 0 30 1 2 0 0)
SF-TOGGLE _"Work on Copy" TRUE
SF-TOGGLE _"Keep Bump Layer" FALSE
)
......@@ -162,7 +162,7 @@
(script-fu-register "script-fu-addborder"
"<Image>/Script-Fu/Decor/Add Border..."
_"<Image>/Script-Fu/Decor/Add Border..."
"Add a border around an image"
"Andy Thomas <alt@picnic.demon.co.uk>"
"Andy Thomas"
......@@ -170,7 +170,7 @@
"RGB*"
SF-IMAGE "Input Image" 0
SF-DRAWABLE "Input Drawable" 0
SF-VALUE "Border x size" "12"
SF-VALUE "Border y size" "12"
SF-COLOR "Border Colour" '(38 31 207)
SF-VALUE "Delta value on colour" "25")
SF-VALUE _"Border X Size" "12"
SF-VALUE _"Border Y Size" "12"
SF-COLOR _"Border Color" '(38 31 207)
SF-VALUE _"Delta Value on Color" "25")
......@@ -121,14 +121,14 @@
(gimp-display-new img)))
(script-fu-register "script-fu-alien-glow-right-arrow"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Arrow..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Arrow..."
"Create an X-file deal"
"Adrian Likins"
"Adrian Likins"
"1997"
""
SF-VALUE "Size" "32"
SF-VALUE "Orientation" "'right"
SF-COLOR "Glow Color" '(63 252 0)
SF-COLOR "Background Color" '(0 0 0)
SF-TOGGLE "Flatten Image" TRUE)
SF-VALUE _"Size" "32"
SF-VALUE _"Orientation" "'right"
SF-COLOR _"Glow Color" '(63 252 0)
SF-COLOR _"Background Color" '(0 0 0)
SF-TOGGLE _"Flatten Image" TRUE)
......@@ -64,17 +64,17 @@
(script-fu-register "script-fu-alien-glow-horizontal-ruler"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Hrule..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Hrule..."
"Create an Hrule with the Alien Glow look"
"Adrian Likins"
"Adrian Likins"
"1997"
""
SF-VALUE "Bar length" "480"
SF-VALUE "Bar Height" "16"
SF-COLOR "Glow Color" '(63 252 0)
SF-COLOR "Background Color" '(0 0 0)
SF-TOGGLE "Flatten Image" TRUE)
SF-VALUE _"Bar Length" "480"
SF-VALUE _"Bar Height" "16"
SF-COLOR _"Glow Color" '(63 252 0)
SF-COLOR _"Background Color" '(0 0 0)
SF-TOGGLE _"Flatten Image" TRUE)
......
......@@ -75,14 +75,14 @@
(script-fu-register "script-fu-alien-glow-bullet"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Bullet..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Bullet..."
"Create a Bullet with an Alien Glow theme for web pages"
"Adrian Likins"
"Adrian Likins"
"1997"
""
SF-VALUE "Radius" "16"
SF-COLOR "Glow Color" '(63 252 0)
SF-COLOR "Background Color" '(0 0 0)
SF-TOGGLE "Flatten Image?" TRUE)
SF-VALUE _"Radius" "16"
SF-COLOR _"Glow Color" '(63 252 0)
SF-COLOR _"Background Color" '(0 0 0)
SF-TOGGLE _"Flatten Image" TRUE)
......@@ -129,18 +129,18 @@
; Register!
(script-fu-register "script-fu-alien-glow-button"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Button..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/Button..."
"Button with an eerie glow"
"Adrian Likins"
"Adrian Likins"
"July 1997"
""
SF-STRING "Text" "Hello world!"
SF-FONT "Font" "-*-futura_poster-*-*-*-*-22-*-*-*-*-*-*-*"
SF-ADJUSTMENT "Font Size (pixels)" '(22 2 100 1 1 0 1)
SF-COLOR "Text color" '(0 0 0)
SF-COLOR "Glow Color" '(63 252 0)
SF-COLOR "Background Color" '(0 0 0)
SF-VALUE "Padding" "6"
SF-VALUE "Glow Radius" "10"
SF-TOGGLE "Flatten Image?" TRUE)
SF-STRING _"Text" "Hello world!"
SF-FONT _ "Font" "-*-futura_poster-*-*-*-*-22-*-*-*-*-*-*-*"
SF-ADJUSTMENT _"Font Size (pixels)" '(22 2 100 1 1 0 1)
SF-COLOR _"Text Color" '(0 0 0)
SF-COLOR _"Glow Color" '(63 252 0)
SF-COLOR _"Background Color" '(0 0 0)
SF-VALUE _"Padding" "6"
SF-VALUE _"Glow Radius" "10"
SF-TOGGLE _"Flatten Image" TRUE)
......@@ -38,13 +38,13 @@
(script-fu-register "script-fu-alien-glow-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Alien Glow..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien Glow..."
"Create an X-Files-esque logo with the specified glow color"
"Spencer Kimball"
"Spencer Kimball"
"1997"
""
SF-STRING "Text String" "ALIEN"
SF-ADJUSTMENT "Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT "Font" "-*-futura_poster-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Glow Color" '(63 252 0))
SF-STRING _"Text" "ALIEN"
SF-ADJUSTMENT _"Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-futura_poster-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Glow Color" '(63 252 0))
......@@ -108,21 +108,21 @@
)
(script-fu-register "script-fu-alien-neon-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Alien Neon..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien Neon..."
"Creates a psychedelic effect with outlines of the specified color around the letters"
"Raphael Quinet (quinet@gamers.org)"
"Raphael Quinet"
"1999-2000"
""
SF-STRING "Text String" "The GIMP"
SF-ADJUSTMENT "Font size (in pixels)" '(150 2 1000 1 10 0 1)
SF-FONT "Font" "-*-blippo-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Glow color" '(0 255 0)
SF-COLOR "Background color" '(0 0 0)
SF-ADJUSTMENT "Width of bands" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT "Width of gaps" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT "Number of bands" '(7 1 100 1 10 0 1)
SF-TOGGLE "Fade away?" TRUE
SF-STRING _"Text" "The GIMP"
SF-ADJUSTMENT _"Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-blippo-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Glow Color" '(0 255 0)
SF-COLOR _"Background Color" '(0 0 0)
SF-ADJUSTMENT _"Width of Bands" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Width of Gaps" '(2 1 60 1 10 0 0)
SF-ADJUSTMENT _"Number of Bands" '(7 1 100 1 10 0 1)
SF-TOGGLE _"Fade Away" TRUE
)
; end
......@@ -208,24 +208,24 @@
(script-fu-register
"script-fu-asc-2-img"
"<Toolbox>/Xtns/Script-Fu/Utils/ASCII to Image..."
_"<Toolbox>/Xtns/Script-Fu/Utils/ASCII to Image..."
"Create a new image containing text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"8th April 1998"
"Chris Gutteridge / ECS @ University of Southampton, England"
"bar"
SF-FILENAME "File Name" "afile"
SF-FONT "Font" "-*-Charter-*-r-*-*-24-*-*-*-p-*-*-*"
SF-ADJUSTMENT "Font Size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR "Text Color" '(0 0 0)
SF-TOGGLE "Transparent BG?" FALSE
SF-COLOR "Background Color" '(255 255 255)
SF-ADJUSTMENT "Buffer amount (% height of text)" '(35 0 100 1 10 0 0)
SF-FILENAME _"File Name" "afile"
SF-FONT _"Font" "-*-Charter-*-r-*-*-24-*-*-*-p-*-*-*"
SF-ADJUSTMENT _"Font Size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR _"Text Color" '(0 0 0)
SF-TOGGLE _"Transparent Background" FALSE
SF-COLOR _"Background Color" '(255 255 255)
SF-ADJUSTMENT _"Buffer Amount (% Height of Text)" '(35 0 100 1 10 0 0)
)
(script-fu-register
"script-fu-asc-2-img-layer"
"<Image>/Script-Fu/Utils/ASCII to Image Layer..."
_"<Image>/Script-Fu/Utils/ASCII to Image Layer..."
"Create a new layer of text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"30th April 1998"
......@@ -233,8 +233,8 @@
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Layer" 0
SF-FILENAME "File Name" "afile"
SF-FONT "Font" "-*-Charter-*-r-*-*-24-*-*-*-p-*-*-*"
SF-ADJUSTMENT "Font Size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR "Text Color" '(0 0 0)
SF-FILENAME _"File Name" "afile"
SF-FONT _"Font" "-*-Charter-*-r-*-*-24-*-*-*-p-*-*-*"
SF-ADJUSTMENT _"Font Size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR _"Text Color" '(0 0 0)
)
......@@ -35,14 +35,14 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic1-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Basic I..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Basic I..."
"Creates a simple logo with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
"1996"
""
SF-STRING "Text String" "The Gimp"
SF-ADJUSTMENT "Font Size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT "Font" "-*-Dragonwick-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Background Color" '(255 255 255)
SF-COLOR "Text Color" '(6 6 206))
SF-STRING _"Text" "The Gimp"
SF-ADJUSTMENT _"Font Size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-Dragonwick-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Background Color" '(255 255 255)
SF-COLOR _"Text Color" '(6 6 206))
......@@ -51,14 +51,14 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic2-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Basic II..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Basic II..."
"Creates a simple logo with a shadow and a highlight"
"Spencer Kimball"
"Spencer Kimball"
"1996"
""
SF-STRING "Text String" "SCRIPT-FU"
SF-ADJUSTMENT "Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT "Font" "-*-futura_poster-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Background Color" '(255 255 255)
SF-COLOR "Text Color" '(206 6 50))
SF-STRING _"Text" "SCRIPT-FU"
SF-ADJUSTMENT _"Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-futura_poster-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Background Color" '(255 255 255)
SF-COLOR _"Text Color" '(206 6 50))
......@@ -152,18 +152,18 @@
; Register!
(script-fu-register "script-fu-button00"
"<Toolbox>/Xtns/Script-Fu/Buttons/Simple Beveled Button..."
_"<Toolbox>/Xtns/Script-Fu/Buttons/Simple Beveled Button..."
"Simple beveled button"
"Federico Mena Quintero"
"Federico Mena Quintero"
"June 1997"
""
SF-STRING "Text" "Hello world!"
SF-ADJUSTMENT "Font Size (pixels)" '(16 2 100 1 1 0 1)
SF-FONT "Font" "-*-helvetica-*-r-*-*-16-*-*-*-p-*-*-*"
SF-COLOR "Upper-left color" '(0 255 127)
SF-COLOR "Lower-right color" '(0 127 255)
SF-COLOR "Text color" '(0 0 0)
SF-VALUE "Padding" "2"
SF-VALUE "Bevel width" "4"
SF-TOGGLE "Pressed?" FALSE)
SF-STRING _"Text" "Hello world!"
SF-ADJUSTMENT _"Font Size (pixels)" '(16 2 100 1 1 0 1)
SF-FONT _"Font" "-*-helvetica-*-r-*-*-16-*-*-*-p-*-*-*"
SF-COLOR _"Upper-Left color" '(0 255 127)
SF-COLOR _"Lower-Right color" '(0 127 255)
SF-COLOR _"Text Color" '(0 0 0)
SF-VALUE _"Padding" "2"
SF-VALUE _"Bevel Width" "4"
SF-TOGGLE _"Pressed" FALSE)
......@@ -134,12 +134,12 @@
(script-fu-register "script-fu-beveled-pattern-arrow"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Arrow..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Arrow..."
"Beveled pattern arrow"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-VALUE "Size" "32"
SF-VALUE "Orientation" "'right"
SF-PATTERN "Pattern" "Wood")
SF-VALUE _"Size" "32"
SF-VALUE _"Orientation" "'right"
SF-PATTERN _"Pattern" "Wood")
......@@ -74,12 +74,12 @@
(script-fu-register "script-fu-beveled-pattern-bullet"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Bullet..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Bullet..."
"Beveled pattern bullet"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-VALUE "Diameter" "16"
SF-PATTERN "Pattern" "Wood"
SF-TOGGLE "Transparent background" FALSE)
SF-VALUE _"Diameter" "16"
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent Background" FALSE)
......@@ -115,15 +115,15 @@
(script-fu-register "script-fu-beveled-pattern-button"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Button..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Button..."
"Beveled pattern button"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-STRING "Text" "Hello world!"
SF-VALUE "Text size" "32"
SF-FONT "Font" "-*-helvetica-*-r-*-*-32-*-*-*-p-*-*-*"
SF-COLOR "Text color" '(0 0 0)
SF-PATTERN "Pattern" "Wood"
SF-TOGGLE "Pressed?" FALSE)
SF-STRING _"Text" "Hello world!"
SF-VALUE _"Font Size (pixels)" "32"
SF-FONT _"Font" "-*-helvetica-*-r-*-*-32-*-*-*-p-*-*-*"
SF-COLOR _"Text Color" '(0 0 0)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Pressed" FALSE)
......@@ -94,14 +94,14 @@
(script-fu-register "script-fu-beveled-pattern-heading"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Heading..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Heading..."
"Beveled pattern heading"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-STRING "Text" "Hello world!"
SF-ADJUSTMENT "Text Size (pixels)" '(72 2 200 1 1 0 1)
SF-FONT "Font" "-*-helvetica-*-r-*-*-72-*-*-*-p-*-*-*"
SF-PATTERN "Pattern" "Wood"
SF-TOGGLE "Transparent background" FALSE)
SF-STRING _"Text" "Hello world!"
SF-ADJUSTMENT _"Text Size (pixels)" '(72 2 200 1 1 0 1)
SF-FONT _"Font" "-*-helvetica-*-r-*-*-72-*-*-*-p-*-*-*"
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent Background" FALSE)
......@@ -63,12 +63,12 @@
(script-fu-register "script-fu-beveled-pattern-hrule"
"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Hrule..."
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/Hrule..."
"Beveled pattern hrule"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-VALUE "Width" "480"
SF-VALUE "Height" "16"
SF-PATTERN "Pattern" "Wood")
SF-VALUE _"Width" "480"
SF-VALUE _"Height" "16"
SF-PATTERN _"Pattern" "Wood")
......@@ -217,7 +217,7 @@
(gimp-message "Blend Animation needs at least three source layers"))))
(script-fu-register "script-fu-blend-anim"
"<Image>/Script-Fu/Animators/Blend..."
_"<Image>/Script-Fu/Animators/Blend..."
"Blend two or more layers over a background, so that an
animation can be saved"
"Sven Neumann <sven@gimp.org>"
......@@ -226,6 +226,6 @@
"RGB* GRAY*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-ADJUSTMENT "Intermediate Frames" '(3 1 1024 1 10 0 1)
SF-ADJUSTMENT "Max. Blur Radius" '(0 0 1024 1 10 0 1)
SF-TOGGLE "Looped" TRUE)
SF-ADJUSTMENT _"Intermediate Frames" '(3 1 1024 1 10 0 1)
SF-ADJUSTMENT _"Max. Blur Radius" '(0 0 1024 1 10 0 1)
SF-TOGGLE _"Looped" TRUE)
......@@ -74,17 +74,17 @@
(gimp-display-new img)))
(script-fu-register "script-fu-blended-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Blended..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Blended..."
"Creates logos with blended backgrounds, highlights, and shadows"
"Spencer Kimball"
"Spencer Kimball"
"1996"
""
SF-VALUE "Blend Mode" "FG-BG-RGB"
SF-STRING "Text String" "The GIMP"
SF-ADJUSTMENT "Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT "Font" "-*-Crillee-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Background Color" '(255 255 255)
SF-COLOR "Text Color" '(124 174 255)
SF-COLOR "Starting Blend" '(22 9 129)
SF-COLOR "Ending Blend" '(129 9 82))
SF-VALUE _"Blend Mode" "FG-BG-RGB"
SF-STRING _"Text" "The GIMP"
SF-ADJUSTMENT _"Font Size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-Crillee-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Background Color" '(255 255 255)
SF-COLOR _"Text Color" '(124 174 255)
SF-COLOR _"Start Blend" '(22 9 129)
SF-COLOR _"End Blend" '(129 9 82))
......@@ -70,13 +70,13 @@
(script-fu-register "script-fu-bovinated-logo"
"<Toolbox>/Xtns/Script-Fu/Logos/Bovination..."
_"<Toolbox>/Xtns/Script-Fu/Logos/Bovination..."
"Makes Cow-spotted logos"
"Brian McFee <keebler@wco.com>"
"Brian McFee"
"April 1998"
""
SF-STRING "Text String" "Fear the Cow"
SF-ADJUSTMENT "Font Size (pixels)" '(80 2 1000 1 10 0 1)
SF-FONT "Font" "-*-roostheavy-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR "Background Color" '(255 255 255))
SF-STRING _"Text" "Fear the Cow"
SF-ADJUSTMENT _"Font Size (pixels)" '(80 2 1000 1 10 0 1)
SF-FONT _"Font" "-*-roostheavy-*-r-*-*-24-*-*-*-p-*-*-*"
SF-COLOR _"Background Color" '(255 255 255))
......@@ -84,18 +84,18 @@
(script-fu-register
"script-fu-camo-pattern"
"<Toolbox>/Xtns/Script-Fu/Patterns/Camouflage..."
_"<Toolbox>/Xtns/Script-Fu/Patterns/Camouflage..."
"Camouflage pattern"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"28th April 1998"
"Chris Gutteridge / ECS @ University of Southampton, England"
""
SF-VALUE "Image Size" "256"
SF-ADJUSTMENT "Granularity (0 - 15)" '(7 0 15 1 1 0 0)
SF-COLOR "Color 1" '(33 100 58)
SF-COLOR "Color 2" '(170 170 60)
SF-COLOR "Color 3" '(150 115 100)
SF-TOGGLE "Smooth?" FALSE
SF-TOGGLE "Flatten?" TRUE
SF-VALUE _"Image Size" "256"
SF-ADJUSTMENT _"Granularity (0 - 15)" '(7 0 15 1 1 0 0)
SF-COLOR _"Color 1" '(33 100 58)
SF-COLOR _"Color 2" '(170 170 60)
SF-COLOR _"Color 3" '(150 115 100)
SF-TOGGLE _"Smooth" FALSE
SF-TOGGLE _"Flatten Image" TRUE
)
......@@ -177,7 +177,7 @@
(gimp-image-undo-enable img)))
(script-fu-register "script-fu-carve-it"
"<Image>/Script-Fu/Stencil Ops/Carve-It..."
_"<Image>/Script-Fu/Stencil Ops/Carve-It..."
"Use the specified [GRAY] drawable as a stencil to carve from the specified image. The specified image must be either RGB colour or grayscale, not indexed."
"Spencer Kimball"
"Spencer Kimball"
......@@ -185,5 +185,5 @@
"GRAY"
SF-IMAGE "Mask Image" 0
SF-DRAWABLE "Mask Drawable" 0
SF-DRAWABLE "Image to Carve" 0
SF-TOGGLE "Carve Wh