see plug-ins/perl/Changes

This commit is contained in:
Marc Lehmann 2000-05-21 01:27:16 +00:00
parent e882c30e44
commit a82a3cf5af
45 changed files with 51 additions and 55 deletions

View File

@ -2,6 +2,7 @@ Revision history for Gimp-Perl extension.
- fixed problem in Net.pm/try_connect (AF_LOCAL vs. PF_UNIX, or
"sysv rules the world, but sun shines everyhwere".
- added ... to hopefully all plug-ins that open a dialog.
1.2 Thu May 11 18:55:13 CEST 2000
- image types updated to reflect gimp's reality.

View File

@ -497,7 +497,7 @@ register "extension_pdb_explorer",
"Marc Lehmann",
"Marc Lehmann",
"0.4alpha",
N_"<Toolbox>/Xtns/PDB Explorer",
N_"<Toolbox>/Xtns/PDB Explorer...",
"",
[],
sub {

View File

@ -85,7 +85,7 @@ register
"Use this plugin to animate a series of layers in the same way that\
a physical animation process would use cells.",
"Aaron Sherman", "Aaron Sherman (c)", "1999-03-15",
N_"<Image>/Filters/Animation/Animate Cells",
N_"<Image>/Filters/Animation/Animate Cells...",
"*",
[
[PF_TOGGLE, "work_on_copy", "", 1]

View File

@ -93,7 +93,7 @@ register "billboard",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1.3",
N_"<Toolbox>/Xtns/Animation/Billboard",
N_"<Toolbox>/Xtns/Animation/Billboard...",
"*",
[
[PF_DRAWABLE, "source", "What drawable to spin from?"],

View File

@ -76,7 +76,7 @@ register "make_bevel_logos",
"Michele Gherlone <mikem\@enet.it>",
"(c) 2000 M. Gherlone",
"20000130",
N_"<Image>/Filters/Logulator/Blended II",
N_"<Image>/Filters/Logulator/Blended II...",
"*",
[
[PF_COLOUR , 'choose_bg_colour', "Choose the background colour", [255, 255, 255]],

View File

@ -94,7 +94,7 @@ register
"John Pitney",
"John Pitney <pitney\@uiuc.edu>",
"1999-03-15",
N_"<Image>/Filters/Animation/BlowInOut",
N_"<Image>/Filters/Animation/BlowInOut...",
"*",
[
[PF_INT32, "angle", "Wind Angle, 0 is left", 120],

View File

@ -15,7 +15,7 @@ register "border_average",
"Marc Lehmann",
"Marc Lehmann",
"0.2.2",
N_"<Image>/Filters/Misc/Border Average",
N_"<Image>/Filters/Misc/Border Average...",
"RGB",
[
[PF_INT32, "thickness", "Border size to take in count", 10],

View File

@ -127,7 +127,7 @@ register
"Tels",
"http://bloodgate.com",
"10/26/1999a",
N_"<Toolbox>/Xtns/Render/Bricks",
N_"<Toolbox>/Xtns/Render/Bricks...",
undef,
[
[PF_PATTERN, "background", "Brick pattern", "Leather"],

View File

@ -12,7 +12,7 @@ register "center_guide",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad",
"990323",
N_"<Image>/Guides/Center Guide",
N_"<Image>/Guides/Center Guide...",
"*",
[
[PF_RADIO,

View File

@ -12,7 +12,7 @@ register "colour_to_alpha",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",
"19990729",
N_"<Image>/Filters/Colors/Colour To Alpha",
N_"<Image>/Filters/Colors/Colour To Alpha...",
"RGB*",
[
[PF_COLOR, "colour", "The colour to replace"],

View File

@ -30,7 +30,7 @@ register "plug_in_ditherize",
"Marc Lehmann",
"Marc Lehmann",
"1.2",
N_"<Image>/Filters/Noise/Ditherize",
N_"<Image>/Filters/Noise/Ditherize...",
"RGB*, GRAY*",
[
[PF_RADIO, "dither_type", "The dither type (see gimp_convert_indexed)", 1,

View File

@ -9,9 +9,9 @@ register "gimp_fu_example_script", # fill in a function name
"scripts. Always remember to put a long".
"help message here!",
"Marc Lehmann <pcg\@goof.com>", # don't forget your name (author)
"(c)1998,1999,2000 Marc Lehmann", # and your copyright!
"(c)1998,1999,2000 Marc Lehmann", # and your copyright!
"20000321", # the date this script was written (YYYYMMDD)
N_"<Toolbox>/Xtns/Gimp::Fu Example", # the menu path
N_"<Toolbox>/Xtns/Gimp::Fu Example...", # the menu path
"RGB*, GRAYA", # image types to accept (RGB, RGAB amnd GRAYA)
[
# argument type, switch name , a short description , default value, extra arguments

View File

@ -15,7 +15,7 @@ register "feedback",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"2-15-99",
N_"<Image>/Filters/Noise/Feedback",
N_"<Image>/Filters/Noise/Feedback...",
"RGB, GRAY",
[
[PF_SLIDER, "offset", "the amount the frames will offset", 3, [0, 255, 1]],

View File

@ -37,7 +37,7 @@ register "fire",
"Marc Lehmann <pcg\@goof.com>",
"Marc Lehmann",
"19990802",
N_"<Image>/Filters/Colors/Fire",
N_"<Image>/Filters/Colors/Fire...",
"*",
[
[PF_SLIDER, "threshold", "Intensity at which to start smearing", 10, [0,255,1]],
@ -55,7 +55,7 @@ register "firetext",
"Marc Lehmann <pcg\@goof.com>",
"Marc Lehmann",
"19990802",
N_"<Toolbox>/Xtns/Render/Logos/Firetext",
N_"<Toolbox>/Xtns/Render/Logos/Firetext...",
undef,
[
[PF_TEXT, "text", "The text to render (can be multi-line)", "burn,\nBurn,\nBURN!"],

View File

@ -176,7 +176,7 @@ register
"Create a tabular index of fonts",
"Create a tabular index of fonts",
"Aaron Sherman", "Aaron Sherman (c)", "1999-03-16",
N_"<Toolbox>/Xtns/Render/Font Table",
N_"<Toolbox>/Xtns/Render/Font Table...",
undef,
[
[PF_STRING, "foundery", "Foundery (perl regex or \"*\")", "*"],

View File

@ -274,7 +274,7 @@ register "gimp_magick",
"Marc Lehmann",
"Marc Lehmann",
$VERSION,
N_"<Image>/Filters/Misc/Magick",
N_"<Image>/Filters/Misc/Magick...",
"*",
[
],

View File

@ -266,7 +266,7 @@ register
"it appear to have height. Not quite the same as a beveled edge, ".
"this is a somewhat more subtle technique.",
"Aaron Sherman", "Aaron Sherman (c)", "1999-06-14",
N_"<Image>/Filters/Render/Highlight Edges",
N_"<Image>/Filters/Render/Highlight Edges...",
"*",
[
[PF_INT32, "edging", "Pixels", 1]
@ -279,7 +279,7 @@ register
"Use this pluggin to make a surface (selected area) look like ".
"brushed metal (kind of like steel).",
"Aaron Sherman", "Aaron Sherman (c)", "1999-06-14",
N_"<Image>/Filters/Render/Brushed Metal",
N_"<Image>/Filters/Render/Brushed Metal...",
"*",
[
[PF_SLIDER, "stroke_length", "Length", 25, [1, 100, 1]],

View File

@ -35,7 +35,7 @@ register "golden_mean",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990328",
N_"<Toolbox>/Xtns/Render/Golden Mean",
N_"<Toolbox>/Xtns/Render/Golden Mean...",
undef,
[
[PF_INT32, "short", "Shortest side", 233],

View File

@ -25,7 +25,7 @@ register "guide_grid",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-20",
N_"<Image>/Guides/Guide Grid",
N_"<Image>/Guides/Guide Grid...",
"*",
[
[PF_SPINNER, "x_spacing", "How far to space grid horizontally", 24, [1,1000,1]],

View File

@ -13,7 +13,7 @@ register "guide_to_selection",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",
"1999-08-01",
N_"<Image>/Guides/To Selection",
N_"<Image>/Guides/To Selection...",
"*",
[
[PF_RADIO, "operation", "The selection operation", REPLACE, [ADD => ADD, SUB => SUB, REPLACE => REPLACE]],

View File

@ -435,7 +435,7 @@ register
Filters/Artistic/Mosaic plugin, but with images as the
tiles.",
"Aaron Sherman", "Aaron Sherman (c)", "1999-03-15",
N_"<Image>/Filters/Map/Image Tile",
N_"<Image>/Filters/Map/Image Tile...",
"*",
[
# Image and drawable are given for free...

View File

@ -19,17 +19,14 @@ N_"/Xtns/Render"; N_"/Xtns/Render/Logos"; # i18n workaround
$defaultcolor1 = [124,10,18];
$defaultcolor2 = [200,19,27];
$path = N_"<Toolbox>/Xtns/Render/Logos/Inner Bevel";
$path = N_"<Toolbox>/Xtns/Render/Logos/Inner Bevel...";
$shortdesc = "Perform an inner bevel on text";
$longdesc = "This uses tigert's inner bevel method on text, which can be found with his other excellent tutorials at http://tigert.gimp.org/";
$date = "1999-03-23";
$imgtypes = undef;
$author = "Seth Burgess <sjburges\@gimp.org>";
$path =~ m,/([^/]+)$,;
$regname = $1;
$regname =~ s/ /_/g;
$regname =~ tr/A-Z/a-z/;
$regname = "inner_bevel";
$author =~ m/^(.*) </;
$authorname = $1;

View File

@ -37,6 +37,7 @@ sub register($$$$$$$$$;@) {
defined($ti) and defined($fsi) and defined($fi) or die "$function, $menupath: no identifiable font ($ti $fsi $fi)\n";
$menupath =~ /([^\/]+)$/;
$menupath =~ s/\.*$/.../;
$help=<<EOF.$help;
This "script" is actually a script-fu logo script that has been converted
@ -191,7 +192,7 @@ register "perl_fu_3d_outline_logo",
"Hrvoje Horvat (hhorvat\@open.hr)",
"Hrvoje Horvat",
"07 April, 1998",
N_"<Image>/Filters/Logulator/3D Outline",
N_"<Image>/Filters/Logulator/3D Outline...",
"",
[
[PF_PATTERN, 'pattern', "Pattern", "Parque #1"],

View File

@ -20,7 +20,7 @@ register "map_to_gradient",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",
"19990802",
N_"<Image>/Filters/Colors/Map To Gradient",
N_"<Image>/Filters/Colors/Map To Gradient...",
"RGB*, GRAY",
[
[PF_GRADIENT, "gradient", "The gradient to map to"],

View File

@ -1,8 +1,5 @@
#!/usr/app/bin/perl
eval 'exec /usr/app/bin/perl -S $0 ${1+"$@"}'
if 0; # not running under some shell
use Gimp qw(:auto __ N_);
use Gimp::Fu;
use strict;
@ -14,7 +11,7 @@ register "mirror_split",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990530",
N_"<Image>/Filters/Distorts/MirrorSplit",
N_"<Image>/Filters/Distorts/MirrorSplit...",
"*",
[
[PF_RADIO, "mirror", "Which half to mirror?", 0,

View File

@ -279,7 +279,7 @@ register "extension_parasite_editor",
"Marc Lehmann",
"Marc Lehmann",
$VERSION,
N_"<Toolbox>/Xtns/Parasite Editor",
N_"<Toolbox>/Xtns/Parasite Editor...",
"",
[],
[],

View File

@ -155,7 +155,7 @@ Gimp::on_query {
Gimp->install_procedure("extension_perl_control_center", "the perl control center gives information about gimp-perl",
"The perl control center gives information about the status of gimp-perl and allows configuration of important system parameters",
"Marc Lehmann", "Marc Lehmann", $VERSION,
N_"<Toolbox>/Xtns/Perl/Control Center", undef, &Gimp::PROC_EXTENSION,
N_"<Toolbox>/Xtns/Perl/Control Center...", undef, &Gimp::PROC_EXTENSION,
[[&Gimp::PARAM_INT32, "run_mode", "Interactive, [non-interactive]"]], []);
};

View File

@ -28,7 +28,7 @@ register "povray_preferences_set",
"Marc Lehmann <pcg\@goof.com>",
"Marc Lehmann",
"19990803",
N_"<Toolbox>/Xtns/Render/Povray/Preferences",
N_"<Toolbox>/Xtns/Render/Povray/Preferences...",
undef,
[
[PF_FILE, "povray_path", "The path to the povray executable", "x-povray"],
@ -137,7 +137,7 @@ register "povray_render_texture",
"Marc Lehmann <pcg\@goof.com>",
"Marc Lehmann",
"19990803",
N_"<Toolbox>/Xtns/Render/Povray/Texture",
N_"<Toolbox>/Xtns/Render/Povray/Texture...",
"*",
[
@camera,

View File

@ -16,7 +16,7 @@ register "random_art_1", # Funktionsname
"Marc Lehmann", # Autor
"Marc Lehmann <pcg\@goof.com", # Copyright
"0.3a", # Version/Datum
N_"<Toolbox>/Xtns/Render/Random Art #1", # Menüpfad
N_"<Toolbox>/Xtns/Render/Random Art #1...", # Menüpfad
"", # Bildtypen
# Eingabeparameter
# Typ Name Beschreibung Wert

View File

@ -23,7 +23,7 @@ register "random_blends",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-18",
N_"<Image>/Filters/Render/Random Blends",
N_"<Image>/Filters/Render/Random Blends...",
"RGB*, GRAY*",
[
[PF_SPINNER, "number", "How many gradients to apply", 7, [1,255,1]],

View File

@ -14,7 +14,7 @@ register "repdup",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990328",
N_"<Image>/Edit/Repeat & Duplicate",
N_"<Image>/Edit/Repeat & Duplicate...",
"*",
[
[PF_SPINNER, "repeats", "Number of repeats",

View File

@ -18,7 +18,7 @@ register "round_rect_sel",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-25",
N_"<Image>/Select/Round Rectangular Selection",
N_"<Image>/Select/Round Rectangular Selection...",
"*",
[
[PF_SPINNER, "x_rounding", "How much to round in the horizontal, in pixels", 16, [1,1000,1]],

View File

@ -28,7 +28,7 @@ register "scratches",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",
"19990223",
N_"<Image>/Filters/Distorts/Scratches",
N_"<Image>/Filters/Distorts/Scratches...",
"*",
[
[PF_SLIDER , "angle_x" , "The horizontal angle" , 30, [ 0, 360]],

View File

@ -129,7 +129,7 @@ register "seth_spin",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1.6",
N_"<Toolbox>/Xtns/Animation/Seth Spin",
N_"<Toolbox>/Xtns/Animation/Seth Spin...",
"*",
[
[PF_DRAWABLE, "source", "What drawable to spin from?"],

View File

@ -14,7 +14,7 @@ register "stampify",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990328",
N_"<Image>/Filters/Render/Stampify",
N_"<Image>/Filters/Render/Stampify...",
"*",
[
[PF_COLOR, "paper", "Paper colour", [242, 242, 242]],

View File

@ -47,7 +47,7 @@ register "stamps",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990314",
N_"<Toolbox>/Xtns/Render/Stamps",
N_"<Toolbox>/Xtns/Render/Stamps...",
undef,
[
[PF_INT32, "size", "img size", 90],

View File

@ -43,7 +43,7 @@ register
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-15",
N_"<Image>/Filters/Render/Terral Text",
N_"<Image>/Filters/Render/Terral Text...",
"RGB*,GRAY*",
[
[ PF_RADIO, "solid_noise", "The Texture Type", 0, ["solid noise" => 1, "current picture" => 0]],

View File

@ -166,7 +166,7 @@ sub tex_string_to_float {
register "tex_string_to_float", "Turn a TeX-string into floating layer", "Takes a TeX string as input and creates a floating layer of the rendered string in the current layer in the foreground color.",
"Dov Grobgeld <dov\@imagic.weizmann.ac.il>", "Dov Grobgeld",
"1999-03-16",
N_"<Image>/Filters/Render/TeX String",
N_"<Image>/Filters/Render/TeX String...",
"*",
[
[PF_STRING, "input_file", "TeX macro file to input"],

View File

@ -82,7 +82,7 @@ register "make_trans_logos",
"Michele Gherlone <mikem\@enet.it>",
"(c) 2000 M. Gherlone",
"20000123",
N_"<Image>/Filters/Logulator/Transparent Logo",
N_"<Image>/Filters/Logulator/Transparent Logo...",
"*",
[
[PF_RADIO , 'use_a_colour_or_a_pattern_for_text', "The user's choice", 0, [Colour => 0, Pattern => 1]],

View File

@ -12,7 +12,7 @@ register "triangle",
"Claes G Lindblad <claesg\@algonet.se>",
"Claes G Lindblad <claesg\@algonet.se>",
"990328",
N_"<Image>/Select/Triangle",
N_"<Image>/Select/Triangle...",
"*",
[
[PF_RADIO, "type", "Select position", 0,

View File

@ -11,7 +11,7 @@ register
'View grayscale drawable in 3D',
'This script uses PDL::Graphics:TriD to view a grayscale drawable in 3D. You can choose a Cartesian (default) or Polar projection, toggle the drawing of lines, and toggle normal smoothing.',
'Tom Rathborne', 'GPLv2', '1999-03-11',
N_"<Image>/View/3D Surface",
N_"<Image>/View/3D Surface...",
'RGB*,GRAY*', [
[ PF_BOOL, 'polar', 'Radial view', 0],
[ PF_BOOL, 'lines', 'Draw grid lines', 0],

View File

@ -124,7 +124,7 @@ register "extension_visual_scriptor",
"Marc Lehmann",
"Marc Lehmann",
$VERSION,
N_"<Toolbox>/Xtns/Visual Scriptor",
N_"<Toolbox>/Xtns/Visual Scriptor...",
"",
[],
sub {

View File

@ -14,7 +14,7 @@ register "webify",
"Marc Lehmann",
"Marc Lehmann",
"1.0",
N_"<Image>/Filters/Web/Webify",
N_"<Image>/Filters/Web/Webify...",
"RGB*, GRAY*",
[
[PF_BOOL, "new", "create a new image?", 1],

View File

@ -42,7 +42,7 @@ register "xach_blocks",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"2-15-98",
N_"<Image>/Filters/Map/Xach Blocks",
N_"<Image>/Filters/Map/Xach Blocks...",
"*",
[
[PF_SLIDER, "block_size", "The size of the blocks", 10, [0, 255, 1]],

View File

@ -109,7 +109,7 @@ register("yinyang", "Render a stand-alone Yin/Yang image",
"Renders a black-and-white Yin/Yang symbol optionally
with \"eyes\" that may optionally be images.",
"Aaron Sherman", "(c) 1998, Aaron Sherman",
"1999b", N_"<Toolbox>/Xtns/Render/Yin-Yang", undef,
"1999b", N_"<Toolbox>/Xtns/Render/Yin-Yang...", undef,
[
[PF_INT32, "width", "Width", 256],
[PF_INT32, "height", "Height", 256],