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-05-27 19:35:26 +00:00
parent da55446e48
commit ecd5ff9343
4 changed files with 17 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
plug-ins/perl/Gimp.pm
View File

@ -13,7 +13,7 @@ use subs qw(init end lock unlock canonicalize_color);
require DynaLoader;
@ISA=qw(DynaLoader);
$VERSION = 1.091;
$VERSION = 1.092;
@_param = qw(
PARAM_BOUNDARY PARAM_CHANNEL PARAM_COLOR PARAM_DISPLAY PARAM_DRAWABLE
@ -50,6 +50,7 @@ $VERSION = 1.091;
'PARASITE_PARENT_PERSISTENT', 'PARASITE_ATTACH_GRANDPARENT', 'PARASITE_GRANDPARENT_PERSISTENT',
'PARASITE_UNDOABLE', 'PARASITE_PARENT_UNDOABLE', 'PARASITE_GRANDPARENT_UNDOABLE',
'TRACE_NONE', 'TRACE_CALL', 'TRACE_TYPE', 'TRACE_NAME', 'TRACE_DESC', 'TRACE_ALL',
'COMPRESSION_NONE', 'COMPRESSION_LZW', 'COMPRESSION_PACKBITS',
);
@_procs = ('main','xlfd_size');
@ -88,6 +89,11 @@ sub WRAP (){ 0 }
sub SMEAR (){ 1 }
sub BLACK (){ 2 }
# file_tiff_*
sub COMPRESSION_NONE (){ 0 }
sub COMPRESSION_LZW (){ 1 }
sub COMPRESSION_PACKBITS (){ 2 }
# internal constants shared with Perl-Server
sub _PS_FLAG_QUIET { 0000000001 }; # do not output messages