Commit 5b7e6e05 authored by Marc Lehmann's avatar Marc Lehmann
Browse files

see plug-ins/perl/Changes

parent 733ae45c
......@@ -8,6 +8,7 @@ Revision history for Gimp-Perl extension.
the new names would have a GIMP_ prefix).
- updated to new commandline options.
- updated enums.pl (And therefore, enumerations).
- applied 5.004 compatibility patch by artie@kmfms.com.
1.201 Thu Aug 24 23:44:43 CEST 2000
** LAST VERSION THAT WORKS WITH 1.0 **
......
......@@ -32,7 +32,8 @@ register "layer_apply",
# now apply the function
eval { $image->undo_push_group_start };
Gimp->progress_init("Applying Expression...");
# 5.004 has problems with overlaying functions
Gimp->progress_init("Applying Expression...",-1);
for my $index (0..$n-1) {
$i = $index;
$I = $n-$i-1;
......
#!/usr/app/bin/perl
#!/usr/bin/perl
use Gimp qw(:auto __ N_);
use Gimp::Fu;
......@@ -289,7 +289,7 @@ register "perl_fu_carved_logo",
[PF_STRING, 'text_string', "Text String", "Marble"],
[PF_ADJUSTMENT,'font_size_pixels', "Font Size (pixels)", [100, 2, 1000, 1, 10, 0, 1]],
[PF_FONT, 'font', "Font", "-*-Engraver-*-r-*-*-24-*-*-*-p-*-*-*"],
[PF_FILE, 'background_img', "Background Img", "".'/usr/local/share/gimp'."/scripts/texture3.jpg"],
[PF_FILE, 'background_img', "Background Img", "".'/usr/local/share/gimp/1.1'."/scripts/texture3.jpg"],
[PF_TOGGLE, 'carve_raised_text',"Carve Raised Text", 0],
],
\&script_fu_carved_logo;
......@@ -511,8 +511,8 @@ register "perl_fu_crystal_logo",
[PF_STRING, 'text_string', "Text String", "Crystal"],
[PF_ADJUSTMENT,'font_size_pixels', "Font Size (pixels)", [150, 2, 1000, 1, 10, 0, 1]],
[PF_FONT, 'font', "Font", "-*-Engraver-*-r-*-*-24-*-*-*-p-*-*-*"],
[PF_FILE, 'background_img', "Background Img", "".'/usr/local/share/gimp'."/scripts/texture1.jpg"],
[PF_FILE, 'environment_map', "Environment Map", "".'/usr/local/share/gimp'."/scripts/beavis.jpg"],
[PF_FILE, 'background_img', "Background Img", "".'/usr/local/share/gimp/1.1'."/scripts/texture1.jpg"],
[PF_FILE, 'environment_map', "Environment Map", "".'/usr/local/share/gimp/1.1'."/scripts/beavis.jpg"],
],
\&script_fu_crystal_logo;
......@@ -863,7 +863,7 @@ register "perl_fu_sota_chrome_logo",
[PF_STRING, 'text_string', "Text String", "The GIMP"],
[PF_ADJUSTMENT,'font_size_pixels', "Font Size (pixels)", [150, 2, 1000, 1, 10, 0, 1]],
[PF_FONT, 'font', "Font", "-*-RoostHeavy-*-r-*-*-24-*-*-*-p-*-*-*"],
[PF_FILE, 'environment_map', "Environment Map", "".'/usr/local/share/gimp'."/scripts/beavis.jpg"],
[PF_FILE, 'environment_map', "Environment Map", "".'/usr/local/share/gimp/1.1'."/scripts/beavis.jpg"],
[PF_COLOUR, 'highlight_balance',"Highlight Balance", [211, 95, 0]],
[PF_COLOUR, 'chrome_balance', "Chrome Balance", [0, 0, 0]],
],
......
Markdown is supported
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