Commit 8a46203e authored by Michael Natterer's avatar Michael Natterer 😴 Committed by Michael Natterer
Browse files

Script-Fu string cleanup/simplification: apply the same fix for menu path

2004-11-18  Michael Natterer  <mitch@gimp.org>

	Script-Fu string cleanup/simplification: apply the same fix for
	menu path translation that was done for plug-ins a while ago.

	* plug-ins/script-fu/script-fu.c (script_fu_auxillary_init): use
	gimp_plugin_menu_register() on the "Refresh" temp_proc.

	* plug-ins/script-fu/scripts/*.scm: ported all scripts to use
	script-fu-menu-register and pass just the menu label in
	script-fu-register. Cleaned up all register calls to share a
	somewhat similar formatting.
parent 2d4aad86
2004-11-18 Michael Natterer <mitch@gimp.org>
Script-Fu string cleanup/simplification: apply the same fix for
menu path translation that was done for plug-ins a while ago.
* plug-ins/script-fu/script-fu.c (script_fu_auxillary_init): use
gimp_plugin_menu_register() on the "Refresh" temp_proc.
* plug-ins/script-fu/scripts/*.scm: ported all scripts to use
script-fu-menu-register and pass just the menu label in
script-fu-register. Cleaned up all register calls to share a
somewhat similar formatting.
2004-11-18 Sven Neumann <sven@gimp.org>
 
* plug-ins/common/postscript.c: changed the default to load only
......
......@@ -279,12 +279,15 @@ script_fu_auxillary_init (void)
"Spencer Kimball & Peter Mattis",
"Spencer Kimball & Peter Mattis",
"1997",
N_("<Toolbox>/Xtns/Script-Fu/_Refresh Scripts"),
N_("_Refresh Scripts"),
NULL,
GIMP_TEMPORARY,
G_N_ELEMENTS (args), 0,
args, NULL,
script_fu_refresh_proc);
gimp_plugin_menu_register ("script_fu_refresh",
N_("<Toolbox>/Xtns/Script-Fu"));
}
static void
......
......@@ -109,21 +109,25 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-3d-outline-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/3D _Outline..."
_"3D _Outline..."
"Creates outlined texts with drop shadow"
"Hrvoje Horvat (hhorvat@open.hr)"
"Hrvoje Horvat"
"07 April, 1998"
"RGBA"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-PATTERN _"Pattern" "Parque #1"
SF-ADJUSTMENT _"Outline blur radius" '(5 1 200 1 10 0 1)
SF-ADJUSTMENT _"Shadow blur radius" '(10 1 200 1 10 0 1)
SF-ADJUSTMENT _"Bumpmap (alpha layer) blur radius" '(5 1 200 1 10 0 1)
SF-TOGGLE _"Default bumpmap settings" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-PATTERN _"Pattern" "Parque #1"
SF-ADJUSTMENT _"Outline blur radius" '(5 1 200 1 10 0 1)
SF-ADJUSTMENT _"Shadow blur radius" '(10 1 200 1 10 0 1)
SF-ADJUSTMENT _"Bumpmap (alpha layer) blur radius" '(5 1 200 1 10 0 1)
SF-TOGGLE _"Default bumpmap settings" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
(script-fu-menu-register "script-fu-3d-outline-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-3d-outline-logo text-pattern
text
......@@ -146,19 +150,22 @@
(gimp-display-new img)))
(script-fu-register "script-fu-3d-outline-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/3D _Outline..."
_"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" "The Gimp"
SF-ADJUSTMENT _"Font size (pixels)" '(100 2 1000 1 10 0 1)
SF-FONT _"Font" "RoostHeavy"
SF-ADJUSTMENT _"Outline blur radius" '(5 1 200 1 10 0 1)
SF-ADJUSTMENT _"Shadow blur radius" '(10 1 200 1 10 0 1)
SF-ADJUSTMENT _"Bumpmap (alpha layer) blur radius" '(5 1 200 1 10 0 1)
SF-TOGGLE _"Default bumpmap settings" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
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"
SF-ADJUSTMENT _"Outline blur radius" '(5 1 200 1 10 0 1)
SF-ADJUSTMENT _"Shadow blur radius" '(10 1 200 1 10 0 1)
SF-ADJUSTMENT _"Bumpmap (alpha layer) blur radius" '(5 1 200 1 10 0 1)
SF-TOGGLE _"Default bumpmap settings" TRUE
SF-ADJUSTMENT _"Shadow X offset" '(0 0 200 1 5 0 1)
SF-ADJUSTMENT _"Shadow Y offset" '(0 0 200 1 5 0 1))
(script-fu-menu-register "script-fu-3d-outline-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")
......@@ -212,7 +212,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-3dtruchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns/3_D Truchet..."
_"3_D Truchet..."
"3D Truchet pattern"
"Adrian Likins <aklikins@eos.ncsu.edu>"
"Adrian Likins"
......@@ -226,3 +226,6 @@
SF-TOGGLE _"Supersample" TRUE
SF-ADJUSTMENT _"Number of X tiles" '(5 1 1000 1 10 0 1)
SF-ADJUSTMENT _"Number of Y tiles" '(5 1 1000 1 10 0 1))
(script-fu-menu-register "script-fu-3dtruchet"
_"<Toolbox>/Xtns/Script-Fu/Patterns")
......@@ -178,15 +178,17 @@
(gimp-context-pop)))
(script-fu-register "script-fu-add-bevel"
_"<Image>/Script-Fu/Decor/Add B_evel..."
_"Add B_evel..."
"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-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-TOGGLE _"Keep bump layer" FALSE)
(script-fu-menu-register "script-fu-add-bevel"
_"<Image>/Script-Fu/Decor")
......@@ -165,7 +165,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-addborder"
_"<Image>/Script-Fu/Decor/Add _Border..."
_"Add _Border..."
"Add a border around an image"
"Andy Thomas <alt@picnic.demon.co.uk>"
"Andy Thomas"
......@@ -177,3 +177,6 @@
SF-ADJUSTMENT _"Border Y size" '(12 1 250 1 10 0 1)
SF-COLOR _"Border color" '(38 31 207)
SF-ADJUSTMENT _"Delta value on color" '(25 1 255 1 10 0 1))
(script-fu-menu-register "script-fu-addborder"
_"<Image>/Script-Fu/Decor")
......@@ -144,7 +144,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-right-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Arrow..."
_"_Arrow..."
"Create an X-file deal"
"Adrian Likins"
"Adrian Likins"
......@@ -158,3 +158,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-right-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")
......@@ -82,7 +82,7 @@
(script-fu-register "script-fu-alien-glow-horizontal-ruler"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Hrule..."
_"_Hrule..."
"Create an Hrule with the Alien Glow look"
"Adrian Likins"
"Adrian Likins"
......@@ -93,3 +93,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-horizontal-ruler"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")
......@@ -93,7 +93,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/_Bullet..."
_"_Bullet..."
"Create a Bullet with an Alien Glow theme for web pages"
"Adrian Likins"
"Adrian Likins"
......@@ -103,3 +103,6 @@
SF-COLOR _"Glow color" '(63 252 0)
SF-COLOR _"Background color" '(0 0 0)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")
......@@ -137,7 +137,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-alien-glow-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow/B_utton..."
_"B_utton..."
"Button with an eerie glow"
"Adrian Likins"
"Adrian Likins"
......@@ -152,3 +152,6 @@
SF-ADJUSTMENT _"Padding" '(6 1 100 1 10 0 1)
SF-ADJUSTMENT _"Glow radius" '(10 1 200 1 10 0 1)
SF-TOGGLE _"Flatten image" TRUE)
(script-fu-menu-register "script-fu-alien-glow-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Alien Glow")
......@@ -55,7 +55,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-alien-glow-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Alien _Glow..."
_"Alien _Glow..."
"Create an X-Files-esque logo with the specified glow color"
"Spencer Kimball"
"Spencer Kimball"
......@@ -66,6 +66,10 @@
SF-ADJUSTMENT _"Glow size (pixels * 4)" '(150 2 1000 1 10 0 1)
SF-COLOR _"Glow color" '(63 252 0))
(script-fu-menu-register "script-fu-alien-glow-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-alien-glow-logo text
size
font
......@@ -87,7 +91,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-alien-glow-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien _Glow..."
_"Alien _Glow..."
"Create an X-Files-esque logo with the specified glow color"
"Spencer Kimball"
"Spencer Kimball"
......@@ -97,3 +101,6 @@
SF-ADJUSTMENT _"Font size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "Sans Bold"
SF-COLOR _"Glow color" '(63 252 0))
(script-fu-menu-register "script-fu-alien-glow-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")
......@@ -116,21 +116,24 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-alien-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/Alien _Neon..."
_"Alien _Neon..."
"Creates a psychedelic effect with outlines of the specified color around the letters"
"Raphael Quinet (quinet@gamers.org)"
"Raphael Quinet"
"1999-2000"
"RGBA"
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
SF-COLOR _"Glow color" '(0 255 0)
SF-IMAGE "Image" 0
SF-DRAWABLE "Drawable" 0
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-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)
(script-fu-menu-register "script-fu-alien-neon-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-alien-neon-logo text
size
......@@ -152,22 +155,21 @@
(gimp-display-new img)))
(script-fu-register "script-fu-alien-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/Alien _Neon..."
_"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" "The GIMP"
SF-STRING _"Text" "The GIMP"
SF-ADJUSTMENT _"Font size (pixels)" '(150 2 1000 1 10 0 1)
SF-FONT _"Font" "Blippo"
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
SF-FONT _"Font" "Blippo"
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)
(script-fu-menu-register "script-fu-alien-neon-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")
......@@ -221,34 +221,37 @@
; Register the function with the GIMP:
(script-fu-register
"script-fu-asc-2-img"
_"<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"
""
SF-FILENAME _"Filename" "afile"
SF-FONT _"Font" "Bitstream Charter"
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"
_"_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"
""
SF-FILENAME _"Filename" "afile"
SF-FONT _"Font" "Bitstream Charter"
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-menu-register "script-fu-asc-2-img"
_"<Toolbox>/Xtns/Script-Fu/Utils")
(script-fu-register "script-fu-asc-2-img-layer"
_"<Image>/Script-Fu/Utils/_ASCII to Layer..."
"Create a new layer of text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"30th April 1998"
"Chris Gutteridge / ECS @ University of Southampton, England"
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Layer" 0
SF-FILENAME _"File name" "afile"
SF-FONT _"Font" "Bitstream Charter"
SF-ADJUSTMENT _"Font size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR _"Text color" '(0 0 0)
)
_"_ASCII to Layer..."
"Create a new layer of text from a simple text file"
"Chris Gutteridge: cjg@ecs.soton.ac.uk"
"30th April 1998"
"Chris Gutteridge / ECS @ University of Southampton, England"
"*"
SF-IMAGE "Image" 0
SF-DRAWABLE "Layer" 0
SF-FILENAME _"File name" "afile"
SF-FONT _"Font" "Bitstream Charter"
SF-ADJUSTMENT _"Font size (pixels)" '(45 2 1000 1 10 0 1)
SF-COLOR _"Text color" '(0 0 0))
(script-fu-menu-register "script-fu-asc-2-img-layer"
_"<Image>/Script-Fu/Utils")
......@@ -49,7 +49,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-basic1-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/_Basic I..."
_"_Basic I..."
"Creates a simple logo with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
......@@ -60,6 +60,10 @@
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(6 6 206))
(script-fu-menu-register "script-fu-basic1-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-basic1-logo text
size
font
......@@ -75,7 +79,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic1-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/_Basic I..."
_"_Basic I..."
"Creates a simple logo with a drop shadow"
"Spencer Kimball"
"Spencer Kimball"
......@@ -86,3 +90,6 @@
SF-FONT _"Font" "Dragonwick"
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(6 6 206))
(script-fu-menu-register "script-fu-basic1-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")
......@@ -68,7 +68,7 @@
(gimp-displays-flush)))
(script-fu-register "script-fu-basic2-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo/B_asic II..."
_"B_asic II..."
"Creates a simple logo with a shadow and a highlight"
"Spencer Kimball"
"Spencer Kimball"
......@@ -79,6 +79,10 @@
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(206 6 50))
(script-fu-menu-register "script-fu-basic2-logo-alpha"
_"<Image>/Script-Fu/Alpha to Logo")
(define (script-fu-basic2-logo text
size
font
......@@ -94,7 +98,7 @@
(gimp-display-new img)))
(script-fu-register "script-fu-basic2-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos/B_asic II..."
_"B_asic II..."
"Creates a simple logo with a shadow and a highlight"
"Spencer Kimball"
"Spencer Kimball"
......@@ -105,3 +109,6 @@
SF-FONT _"Font" "Sans Bold"
SF-COLOR _"Background color" '(255 255 255)
SF-COLOR _"Text color" '(206 6 50))
(script-fu-menu-register "script-fu-basic2-logo"
_"<Toolbox>/Xtns/Script-Fu/Logos")
......@@ -136,7 +136,7 @@
(gimp-context-pop)))
(script-fu-register "script-fu-button00"
_"<Toolbox>/Xtns/Script-Fu/Buttons/Simple _Beveled Button..."
_"Simple _Beveled Button..."
"Simple beveled button"
"Federico Mena Quintero"
"Federico Mena Quintero"
......@@ -151,3 +151,6 @@
SF-ADJUSTMENT _"Padding" '(2 1 100 1 10 0 1)
SF-ADJUSTMENT _"Bevel width" '(4 1 100 1 10 0 1)
SF-TOGGLE _"Pressed" FALSE)
(script-fu-menu-register "script-fu-button00"
_"<Toolbox>/Xtns/Script-Fu/Buttons")
......@@ -140,15 +140,18 @@
(script-fu-register "script-fu-beveled-pattern-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/_Arrow..."
_"_Arrow..."
"Beveled pattern arrow"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-ADJUSTMENT _"Size" '(32 5 150 1 10 0 1)
SF-ADJUSTMENT _"Size" '(32 5 150 1 10 0 1)
SF-OPTION _"Orientation" '(_"Right"
_"Left"
_"Up"
_"Down")
_"Left"
_"Up"
_"Down")
SF-PATTERN _"Pattern" "Wood")
(script-fu-menu-register "script-fu-beveled-pattern-arrow"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")
......@@ -77,7 +77,7 @@
(script-fu-register "script-fu-beveled-pattern-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/_Bullet..."
_"_Bullet..."
"Beveled pattern bullet"
"Federico Mena Quintero"
"Federico Mena Quintero"
......@@ -86,3 +86,6 @@
SF-ADJUSTMENT _"Diameter" '(16 1 150 1 10 0 1)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent background" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-bullet"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")
......@@ -113,15 +113,18 @@
(script-fu-register "script-fu-beveled-pattern-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/B_utton..."
_"B_utton..."
"Beveled pattern button"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-STRING _"Text" "Hello world!"
SF-STRING _"Text" "Hello world!"
SF-ADJUSTMENT _"Font size (pixels)" '(32 2 1000 1 10 0 1)
SF-FONT _"Font" "Sans"
SF-COLOR _"Text color" '(0 0 0)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Pressed" FALSE)
SF-FONT _"Font" "Sans"
SF-COLOR _"Text color" '(0 0 0)
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Pressed" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-button"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")
......@@ -100,14 +100,17 @@
(script-fu-register "script-fu-beveled-pattern-heading"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern/H_eading..."
_"H_eading..."
"Beveled pattern heading"
"Federico Mena Quintero"
"Federico Mena Quintero"
"July 1997"
""
SF-STRING _"Text" "Hello world!"
SF-ADJUSTMENT _"Font size (pixels)" '(72 2 200 1 1 0 1)
SF-FONT _"Font" "Sans"
SF-PATTERN _"Pattern" "Wood"
SF-STRING _"Text" "Hello world!"
SF-ADJUSTMENT _"Font size (pixels)" '(72 2 200 1 1 0 1)
SF-FONT _"Font" "Sans"
SF-PATTERN _"Pattern" "Wood"
SF-TOGGLE _"Transparent background" FALSE)
(script-fu-menu-register "script-fu-beveled-pattern-heading"
_"<Toolbox>/Xtns/Script-Fu/Web Page Themes/Beveled Pattern")
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment