Commit 82191329 authored by Marc Lehmann's avatar Marc Lehmann
Browse files

see plug-ins/perl/Changes

parent c32685e9
Revision history for Gimp-Perl extension.
- scm2scm and scm2perl will now be installed in INST_SCRIPT
1.053 Mon Feb 15 01:35:04 CET 1999
- more errornous argument types are detected now, without
just calling abort().
......
......@@ -12,7 +12,7 @@ use base qw(DynaLoader);
require DynaLoader;
$VERSION = 1.053;
$VERSION = 1.054;
@_param = qw(
PARAM_BOUNDARY PARAM_CHANNEL PARAM_COLOR PARAM_DISPLAY PARAM_DRAWABLE
......
......@@ -679,20 +679,11 @@ which will open a colour selection box when clicked.
=item PF_IMAGE
A gimp image. Not yet supported in dialogs :(
A gimp image.
=item PF_DRAWABLE
A gimp drawable (image, channel or layer). Not yet supported in dialogs :(
=item PF_FONT
An experimental value used to denote fonts. At the moment, this is just
a C<PF_STRING>. It might be replaced by a font selection dialog in the future.
Please note that the Gimp has no value describing a font, so the format of
this string is undefined (and will usually contain only the family name of
the selected font, but in the future it will contain a XLFD).
A gimp drawable (image, channel or layer).
=item PF_TOGGLE, PF_BOOL
......@@ -720,6 +711,8 @@ warning will be printed. Please note that the gimp text functions using
these fontnames (gimp_text_..._fontname) ignore the size. You can extract
the size and dimension by using the C<xlfd_size> function.
In older Gimp-Versions a user-supplied string is returned.
=item PF_BRUSH, PF_PATTERN, PF_GRADIENT
Lets the user select a brush/pattern/gradient whose name is returned as a
......
......@@ -172,6 +172,7 @@ WriteMakefile(
'LIBS' => [''],
'INC' => "$CPPFLAGS $CFLAGS $GIMP_INC_NOUI $DEFS",
'DEFINE' => ($IN_GIMP ? " -DIN_GIMP" : ""),
'EXE_FILES' => ['scm2perl','scm2scm'],
'realclean' => { FILES => "config.status config.cache config.log config.pl config.h" },
'clean' => { FILES => "Makefile.old stamp-h" },
);
......
......@@ -116,7 +116,7 @@ sub complete_function {
$synopsis->set(scalar@matches." matching functions");
} else {
set_clist @matches,@matches;
$synopsis->set($matches[0]." (press F1 to complete)");
$synopsis->set($matches[0]." (press F2 to complete)");
}
}
......@@ -235,7 +235,7 @@ sub inputline {
# do_completion;
print "ztab\n";
return 1;
} elsif ($_[1]->{keyval} == 0xFFBE) {
} elsif ($_[1]->{keyval} == 0xFFBF) {
do_completion;
();
} else {
......
......@@ -37,7 +37,7 @@ register "xach_blocks",
building block creation",
"Seth Burgess",
"Seth Burgess",
"1.3",
"1.4",
"<Image>/Filters/Misc/Xach Blocks",
"*",
[
......
Supports Markdown
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