graphics/gimp
graphics/gimp
1
0
Fork 0
mirror of https://gitlab.gnome.org/GNOME/gimp synced 2024-10-20 19:43:01 +00:00
Code Issues Packages Projects Releases Wiki Activity

see plug-ins/perl/Changes

Browse source
This commit is contained in:
Marc Lehmann 1999-11-21 18:31:41 +00:00
parent 6827f26f5d
commit e6b198f788
3 changed files with 9 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
plug-ins/perl/TODO
View file

@ -33,24 +33,24 @@ olof
bugs bugs
* rate-limiting for gimp_message BEFORE 1.2 * update logulator
* update frosty-logo.scm t-o-p-logo.scm starscape-logo.scm starburst-logo.scm
[DONE] * rate-limiting for gimp_message BEFORE 1.2
* on-query => remove gimp::fu parasite(?) * on-query => remove gimp::fu parasite(?)
* bricks requires disable for pattern(?) * bricks requires disable for pattern(?)
* better default argument-handlign via a "massage_args" callback from Gimp/UI/interact? * better default argument-handlign via a "massage_args" callback from Gimp/UI/interact?
* update frosty-logo.scm t-o-p-logo.scm starscape-logo.scm starburst-logo.scm
* installation & Feature system (?) * installation & Feature system (?)
* map_to_gradient does not work on GRAYA thingies. Argh. * map_to_gradient does not work on GRAYA thingies. Argh.
[DONE] * /root/gimprelease && TODO -> publish! PUSH PUSH
* perl_require_pv with _59? * perl_require_pv with _59?
* scroll behaviour, use clist instead of list? * scroll behaviour, use clist instead of list?
* document Gimp::PDL and rect2, ...2 functions! * document Gimp::PDL and rect2, ...2 functions!
* podestions are not expanded in dialog help strings etc.. * document Gimp:PDL!!!
* Kommandozeilenmodus(!). * Kommandozeilenmodus(!).
* don't start gimp in cmdline mode and error. [KILL] * don't start gimp in cmdline mode and error.
* KILL :auto from default(!) * KILL :auto from default(!)
* auto-flush of gdrawable when merge_shadow(?) * auto-flush of gdrawable when merge_shadow(?)
* gimp-piddle must be written back automatically on destroy, if changed * gimp-piddle must be written back automatically on destroy, if changed
* possibly rename "Brush Selection" to "Paint Settings" [KILL] * possibly rename "Brush Selection" to "Paint Settings"
* gimp-tile set dirty automatically(!) * gimp-tile set dirty automatically(!)
* perl module install dependency * perl module install dependency
* $Config{cc} might not understand Gimps CFLAGS (-mpentium). * $Config{cc} might not understand Gimps CFLAGS (-mpentium).
@ -61,11 +61,10 @@ bugs
important issues important issues
* constant names (RADIO) automatically into help strings! * constant names (RADIO) automatically into help strings!
* gimpdoc with caching & [DONE]exampling ;---> [KILL] * gimpdoc with caching & [DONE]exampling ;--->
* migrate BOOT: into INIT() (forgot why but important for B) * migrate BOOT: into INIT() (forgot why but important for B)
* gimp_progress_done, gimp_progress_close * gimp_progress_done, gimp_progress_close
* maybe implement --enable-perl=runtime-only? * maybe implement --enable-perl=runtime-only?
* pdb_proc_renameto
* gimp_default_display (...) for libgimp * gimp_default_display (...) for libgimp
* Gimp::Module for modules (!) * Gimp::Module for modules (!)
* PerlCC configurable options for Perl-Server startup, Gipm_host etc. * PerlCC configurable options for Perl-Server startup, Gipm_host etc.
@ -75,7 +74,7 @@ important issues
* change set_usize to something else.. * change set_usize to something else..
* Gimp::IO (?) * Gimp::IO (?)
* install scripts in share/ * install scripts in share/
* register dummy function to calm gimp down (really??) [KILL] * register dummy function to calm gimp down (really??)
* gimp->object_id, drawable_object_id remove! * gimp->object_id, drawable_object_id remove!
* vamp up homepage * vamp up homepage
* Gimp::ping * Gimp::ping

1
plug-ins/perl/examples/colorhtml
View file

@ -40,7 +40,6 @@ register "file_colorhtml_save",
], ],
sub { sub {
my($img,$drawable,$filename,$filename2,$source,$text,$size,$html40,$closetag) = @_; my($img,$drawable,$filename,$filename2,$source,$text,$size,$html40,$closetag) = @_;
print " @_\n";
my($new_img,$new_drawable); my($new_img,$new_drawable);
my $max; my $max;
my $export = Gimp::UI::export_image ($new_img=$img, $new_drawable=$drawable, "COLORHTML", my $export = Gimp::UI::export_image ($new_img=$img, $new_drawable=$drawable, "COLORHTML",

5
plug-ins/perl/examples/dataurl
View file

@ -7,10 +7,7 @@ use Gimp::Fu;
use Gimp::UI; use Gimp::UI;
use Fcntl; use Fcntl;
# Gimp::set_trace(TRACE_ALL); sub encode_base64($) {
sub encode_base64 ($;$)
{
my $res = substr pack ("u", $_[0]), 1; my $res = substr pack ("u", $_[0]), 1;
$res =~ s/\n.//mg; $res =~ s/\n.//mg;
$res =~ tr|` -_|AA-Za-z0-9+/|; #` # syntax-hiliting in emacs kanns nicht $res =~ tr|` -_|AA-Za-z0-9+/|; #` # syntax-hiliting in emacs kanns nicht