pdb: remove copy-paste error
This commit is contained in:
@ -797,100 +797,6 @@ CODE
|
|||||||
);
|
);
|
||||||
}
|
}
|
||||||
|
|
||||||
sub context_get_brush_spacing {
|
|
||||||
$blurb = 'Get brush spacing as percent of size.';
|
|
||||||
$help = 'Get the brush spacing as percent of size for brush based paint tools.';
|
|
||||||
|
|
||||||
|
|
||||||
@outargs = (
|
|
||||||
{ name => "spacing", type => "0 < float",
|
|
||||||
desc => "brush spacing as percent of size" }
|
|
||||||
);
|
|
||||||
|
|
||||||
%invoke = (
|
|
||||||
code => <<'CODE'
|
|
||||||
{
|
|
||||||
/* all options should have the same value, so pick a random one */
|
|
||||||
GimpPaintOptions *options =
|
|
||||||
gimp_pdb_context_get_paint_options (GIMP_PDB_CONTEXT (context),
|
|
||||||
"gimp-paintbrush");
|
|
||||||
|
|
||||||
if (options)
|
|
||||||
g_object_get (options,
|
|
||||||
"brush-spacing", &spacing,
|
|
||||||
NULL);
|
|
||||||
else
|
|
||||||
success = FALSE;
|
|
||||||
}
|
|
||||||
CODE
|
|
||||||
);
|
|
||||||
}
|
|
||||||
|
|
||||||
sub context_set_brush_spacing {
|
|
||||||
$blurb = 'Set brush spacing as percent of size.';
|
|
||||||
$help = 'Set the brush spacing as percent of size for brush based paint tools.';
|
|
||||||
|
|
||||||
&adeath_pdb_misc('2014', '2.10');
|
|
||||||
|
|
||||||
@inargs = (
|
|
||||||
{ name => "spacing", type => "0 < float",
|
|
||||||
desc => "brush spacing as percent of size" }
|
|
||||||
);
|
|
||||||
|
|
||||||
%invoke = (
|
|
||||||
code => <<'CODE'
|
|
||||||
{
|
|
||||||
GList *options;
|
|
||||||
GList *list;
|
|
||||||
|
|
||||||
options = gimp_pdb_context_get_brush_options (GIMP_PDB_CONTEXT (context));
|
|
||||||
|
|
||||||
for (list = options; list; list = g_list_next (list))
|
|
||||||
g_object_set (list->data,
|
|
||||||
"brush-spacing", (gdouble) spacing,
|
|
||||||
NULL);
|
|
||||||
|
|
||||||
g_list_free (options);
|
|
||||||
}
|
|
||||||
CODE
|
|
||||||
);
|
|
||||||
}
|
|
||||||
|
|
||||||
sub context_set_brush_default_spacing {
|
|
||||||
$blurb = 'Set brush spacing to its default.';
|
|
||||||
$help = <<'HELP';
|
|
||||||
Set the brush spacing to the default for
|
|
||||||
paintbrush, airbrush, or pencil tools.
|
|
||||||
HELP
|
|
||||||
|
|
||||||
&adeath_pdb_misc('2014', '2.10');
|
|
||||||
|
|
||||||
%invoke = (
|
|
||||||
code => <<'CODE'
|
|
||||||
{
|
|
||||||
GimpBrush *brush = gimp_context_get_brush (context);
|
|
||||||
|
|
||||||
if (brush)
|
|
||||||
{
|
|
||||||
GList *options;
|
|
||||||
GList *list;
|
|
||||||
|
|
||||||
options = gimp_pdb_context_get_brush_options (GIMP_PDB_CONTEXT (context));
|
|
||||||
|
|
||||||
for (list = options; list; list = g_list_next (list))
|
|
||||||
gimp_paint_options_set_default_brush_spacing (list->data, brush);
|
|
||||||
|
|
||||||
g_list_free (options);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
success = FALSE;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
CODE
|
|
||||||
);
|
|
||||||
}
|
|
||||||
|
|
||||||
sub context_get_brush_hardness {
|
sub context_get_brush_hardness {
|
||||||
$blurb = 'Get brush hardness in paint options.';
|
$blurb = 'Get brush hardness in paint options.';
|
||||||
$help = 'Get the brush hardness for brush based paint tools.';
|
$help = 'Get the brush hardness for brush based paint tools.';
|
||||||
|
Reference in New Issue
Block a user