callisto-debian/gimp
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

see plug-ins/perl/Changes

Browse Source
This commit is contained in:
Marc Lehmann
1999-11-21 21:10:48 +00:00
parent e6b198f788
commit 019b0193fc
25 changed files with 2024 additions and 1931 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
plug-ins/perl/Changes
View File

@ -1,5 +1,8 @@
Revision history for Gimp-Perl extension.
1.17
- re-fitted i18n trabslation for most plug-ins.
1.16 Sun Nov 21 02:37:16 CET 1999
- removed sethspin.pl & billboard, they are no longer maintained :(
- *sigh* removed some debugging code.

2
plug-ins/perl/examples/alpha2color.pl
View File

@ -103,7 +103,7 @@ register
"Seth Burgess",
"Seth Burgess<sjburges\@gimp.org>",
"2-15-98",
"<Image>/Image/Colors/Alpha2Color",
__"<Image>/Image/Colors/Alpha2Color",
"RGBA",
[
[PF_COLOR, "color", "Color for current alpha", [127,127,127]]

2
plug-ins/perl/examples/bricks
View File

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

2
plug-ins/perl/examples/burst
View File

@ -29,7 +29,7 @@ the inside and the outside of the burst. \n",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-07-31",
"<Image>/Filters/Misc/Burst",
__"<Image>/Filters/Misc/Burst",
"*",
[
[PF_RADIO, "shape", "Shape To Burst Into", 0, [Rectangle => 1, Ellipse=> 0]],

2
plug-ins/perl/examples/colorhtml
View File

@ -23,7 +23,7 @@ sub read_text {
}
register "file_colorhtml_save",
__"Saves the image as coloured html text",
"Saves the image as coloured html text",
"=pod",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",

15
plug-ins/perl/examples/dataurl
View File

@ -17,7 +17,7 @@ sub encode_base64($) {
}
register "file_dataurl_save",
__"saves the image as many small tiles using data:-urls",
"Saves the image as many small tiles using data:-urls",
"=pod",
"Marc Lehmann",
"Marc Lehmann <pcg\@goof.com>",
@ -113,7 +113,14 @@ into data:-urls. Since attribute values are by default limited to 1024
bytes this limits the size of a tile to approximately 34x34 pixels (gif
compression).
However, since the only browser I know of that supports this (rfc2397 is only a
proposed standard), you might want to use much larger tile sizes (upto the image
size), since netscape obviously does not have problems with it large urls.
However, since rfc2397 is only a proposed standard, you might want to
use much larger tile sizes (upto the image size), since most browsers
generally do not care for the url length.
Browser compatibility list (send more results to pcg@goof.com ;)
Netscape 4.x works in any setting
Lynx displays the base64 code as text :(
MSIE 4 thousands of error messages in dialog boxes ;->
MSIE 5 shows broken image icon

2
plug-ins/perl/examples/feedback.pl
View File

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

2
plug-ins/perl/examples/fit-text
View File

@ -41,7 +41,7 @@ register "fit_text",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-21",
"<Image>/Filters/Render/Fit Text",
__"<Image>/Filters/Render/Fit Text",
"*",
[
[PF_FONT, "font", "What font type to use - size will be ignored", $defaultfont],

2
plug-ins/perl/examples/guide_remove
View File

@ -19,7 +19,7 @@ register "guide_remove",
"Brendon Humphrey",
"Brendon Humphrey <brendy\@swipnet.se>",
"1999-07-20",
"<Image>/Guides/Remove Guides",
__"<Image>/Guides/Remove Guides",
"*",
[],
[],

2
plug-ins/perl/examples/guidegrid
View File

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

2
plug-ins/perl/examples/innerbevel
View File

@ -14,7 +14,7 @@ use Gimp::Util;
$defaultcolor1 = [124,10,18];
$defaultcolor2 = [200,19,27];
$path = "<Toolbox>/Xtns/Render/Logos/Inner Bevel";
$path = __"<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";

4
plug-ins/perl/examples/layerfuncs
View File

@ -10,7 +10,7 @@ use Gimp::Util;
register "layer_to_image_size", "Layer2ImageSize", "Expands layer to image size",
"Seth Burgess", "Seth Burgess <sjburges\@gimp.org>", "1.0",
"<Image>/Layers/Layer to Image Size", "RGB*, GRAY*", [ ], sub {
__"<Image>/Layers/Layer to Image Size", "RGB*, GRAY*", [ ], sub {
($img, $layer) = @_;
$layer->resize($img->width, $img->height, $layer->offsets);
return();
@ -19,7 +19,7 @@ register "layer_to_image_size", "Layer2ImageSize", "Expands layer to image size"
register "center_layer", "Center Layer",
"Centers the current layer on the image",
"Seth Burgess", "Seth Burgess <sjburges\@gimp.org>",
"1.0", "<Image>/Layers/Center Layer", "RGB*, GRAY*", [], sub {
"1.0", __"<Image>/Layers/Center Layer", "RGB*, GRAY*", [], sub {
($img, $layer) = @_;
$layer->set_offsets(($img->width - $layer->width )/2,
($img->height - $layer->height)/2);

2
plug-ins/perl/examples/logulator
View File

@ -185,7 +185,7 @@ register "perl_fu_3d_outline_logo",
"Hrvoje Horvat (hhorvat\@open.hr)",
"Hrvoje Horvat",
"07 April, 1998",
"<Toolbox>/Xtns/Perl-Fu/Logos/3D Outline",
__"<Toolbox>/Xtns/Perl-Fu/Logos/3D Outline",
"",
[
[PF_PATTERN, 'pattern', "Pattern", "Parque #1"],

4
plug-ins/perl/examples/perlotine
View File

@ -134,7 +134,7 @@ register "perlotine",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-03-19",
"<Image>/Guides/Perl-o-tine",
__"<Image>/Guides/Perl-o-tine",
"*",
[
[PF_STRING, "save_path", "The path to export the HTML to",$ENV{HOME}],
@ -152,7 +152,7 @@ register "perlotine",
@horz = get_hguides($img);
if (!(scalar(@vert) || scalar(@horz))) {
die ("No horizontal or vertical guides found. Aborted.");
die __"No horizontal or vertical guides found. Aborted.";
}
#

2
plug-ins/perl/examples/randomblends
View File

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

2
plug-ins/perl/examples/roundrectsel
View File

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

2
plug-ins/perl/examples/terral_text
View File

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

2
plug-ins/perl/examples/view3d.pl
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',
'<Image>/View/3D Surface',
__'<Image>/View/3D Surface',
'RGB*,GRAY*', [
[ PF_BOOL, 'polar', 'Radial view', 0],
[ PF_BOOL, 'lines', 'Draw grid lines', 0],

2
plug-ins/perl/examples/windify.pl
View File

@ -51,7 +51,7 @@ register
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1998-09-14",
"<Image>/Filters/Distorts/Windify",
__"<Image>/Filters/Distorts/Windify",
"*",
[
[PF_INT32, "angle", "Wind Angle, 0 is left", 120],

2
plug-ins/perl/examples/xachlego.pl
View File

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

2
plug-ins/perl/examples/xachshadow.pl
View File

@ -31,7 +31,7 @@ register "xach_shadows",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"2-15-98",
"<Image>/Filters/Map/Xach Shadows",
__"<Image>/Filters/Map/Xach Shadows",
"RGB*, GRAY*",
[
[PF_SLIDER, "block_size", "The size of the blocks...", 10, [0, 255, 1]],

2
plug-ins/perl/examples/xachvision.pl
View File

@ -12,7 +12,7 @@ register "xachvision",
"Seth Burgess",
"Seth Burgess <sjburges\@gimp.org>",
"1999-02-28",
"<Image>/Filters/Noise/Xach Vision",
__"<Image>/Filters/Noise/Xach Vision",
"RGB*, GRAY*",
[
[PF_COLOR, "color", "What Color to see the world in", [0, 255, 0]],

1352
plug-ins/perl/po/de.po
View File

File diff suppressed because it is too large Load Diff

1138
plug-ins/perl/po/gimp-perl.pot
View File

File diff suppressed because it is too large Load Diff

1403
plug-ins/perl/po/it.po
View File

File diff suppressed because it is too large Load Diff