4a8118070a
2003-02-18 Michael Natterer <mitch@gimp.org> * app/plug-in/plug-ins.[ch]: added plug_ins_proc_def_find() which takes a ProcRecord and returns the corresponding PlugInProcDef. * app/plug-in/plug-in.[ch]: added a ProcRecord pointer to the PlugIn struct so we know which procedure the plug-in is executing. Replaced "gboolean in_temp_proc" by "ProcRecord *current_temp_proc". Added plug_in_get_undo_desc() which uses the new ProcRecord members and plug_ins_proc_def_find() to return a human readable string. * app/plug-in/plug-in-run.c: pass the ProcRecord to plug_in_new(). Set plug_in->current_temp_proc while executing a temp_proc. (The latter won't work since we don't run temp_procs recursively at the moment). * app/gui/plug-in-menus.c: translate the plug-in's menu_path before chopping it for the "Repeat" and "Reshow" menu items. * tools/pdbgen/pdb/drawable.pdb * tools/pdbgen/pdb/undo.pdb: use plug_in_get_undo_desc() when pushing plug-in undos. * app/pdb/drawable_cmds.c * app/pdb/undo_cmds.c: regenerated.
80 lines
2.2 KiB
Text
80 lines
2.2 KiB
Text
# The GIMP -- an image manipulation program
|
|
# Copyright (C) 1995 Spencer Kimball and Peter Mattis
|
|
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 2 of the License, or
|
|
# (at your option) any later version.
|
|
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program; if not, write to the Free Software
|
|
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
|
|
# "Perlized" from C source by Manish Singh <yosh@gimp.org>
|
|
|
|
sub inargs {
|
|
@inargs = ( &std_image_arg );
|
|
$inargs[0]->{desc} = 'The ID of the image in which to pop an undo group';
|
|
}
|
|
|
|
# The defs
|
|
|
|
sub undo_push_group_start {
|
|
$blurb = 'Starts a group undo.';
|
|
|
|
$help = <<'HELP';
|
|
This function is used to start a group undo--necessary for logically combining
|
|
two or more undo operations into a single operation. This call must be used in
|
|
conjunction with a 'gimp-undo-push-group-end' call.
|
|
HELP
|
|
|
|
&std_pdb_misc;
|
|
$date = '1997';
|
|
|
|
&inargs;
|
|
|
|
%invoke = ( headers => [ qw("core/gimp.h" "plug-in/plug-in.h") ],
|
|
vars => [ 'gchar *undo_desc = NULL' ],
|
|
code => <<CODE
|
|
{
|
|
if (gimp->current_plug_in)
|
|
undo_desc = plug_in_get_undo_desc (gimp->current_plug_in);
|
|
|
|
gimp_image_undo_group_start (gimage, GIMP_UNDO_GROUP_MISC, undo_desc);
|
|
|
|
if (undo_desc)
|
|
g_free (undo_desc);
|
|
}
|
|
CODE
|
|
);
|
|
}
|
|
|
|
sub undo_push_group_end {
|
|
$blurb = 'Finish a group undo.';
|
|
|
|
$help = <<'HELP';
|
|
This function must be called once for each gimp-undo-push-group call that is
|
|
made.
|
|
HELP
|
|
|
|
&std_pdb_misc;
|
|
$date = '1997';
|
|
|
|
&inargs;
|
|
|
|
%invoke = ( code => 'gimp_image_undo_group_end (gimage);' );
|
|
}
|
|
|
|
@headers = qw("core/gimpimage-undo.h");
|
|
|
|
@procs = qw(undo_push_group_start undo_push_group_end);
|
|
%exports = (app => [@procs], lib => [@procs]);
|
|
|
|
$desc = 'Undo';
|
|
|
|
1;
|