~ubuntu-branches/ubuntu/saucy/gimp/saucy-security

« back to all changes in this revision

Viewing changes to tools/pdbgen/pdb/dynamics.pdb

  • Committer: Package Import Robot
  • Author(s): Micah Gersten
  • Date: 2012-05-20 19:21:01 UTC
  • mfrom: (1.1.26) (0.4.16 sid)
  • Revision ID: package-import@ubuntu.com-20120520192101-bs7zetx8ffoq2nfv
Tags: 2.8.0-2ubuntu1
* Merge from Debian unstable (LP: #908472). Remaining Changes:
  - debian/patches/02_help-message.patch,
    debian/patches/03_gimp.desktop.in.in.patch:
    + Update some strings for Ubuntu
  - debian/control:
    + Update description
  - debian/rules:
    + Set gettext domain and update translation templates
* Drop the following patches that were applied upstream:
  - debian/patches/ghost-cursor.patch: fix Wacom tablet cursor events
  - debian/patches/embed-page-setup-dialog.patch

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
# GIMP - The GNU Image Manipulation Program
 
2
# Copyright (C) 1995 Spencer Kimball and Peter Mattis
 
3
 
 
4
# This program is free software: you can redistribute it and/or modify
 
5
# it under the terms of the GNU General Public License as published by
 
6
# the Free Software Foundation; either version 3 of the License, or
 
7
# (at your option) any later version.
 
8
 
 
9
# This program is distributed in the hope that it will be useful,
 
10
# but WITHOUT ANY WARRANTY; without even the implied warranty of
 
11
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
12
# GNU General Public License for more details.
 
13
 
 
14
# You should have received a copy of the GNU General Public License
 
15
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
16
 
 
17
# "Perlized" from C source by Manish Singh <yosh@gimp.org>
 
18
 
 
19
sub dynamics_refresh {
 
20
    $blurb = 'Refresh current paint dynamics. This function always succeeds.';
 
21
 
 
22
    $help = <<'HELP';
 
23
This procedure retrieves all paint dynamics currently in the user's
 
24
paint dynamics path and updates the paint dynamics dialogs
 
25
accordingly.
 
26
HELP
 
27
 
 
28
    &mitch_pdb_misc('2011', '2.8');
 
29
 
 
30
    %invoke = (
 
31
        code => <<'CODE'
 
32
{
 
33
  gimp_data_factory_data_refresh (gimp->dynamics_factory, context);
 
34
}
 
35
CODE
 
36
    );
 
37
}
 
38
 
 
39
sub dynamics_get_list {
 
40
    $blurb = 'Retrieve the list of loaded paint dynamics.';
 
41
 
 
42
    $help = <<'HELP';
 
43
This procedure returns a list of the paint dynamics that are currently
 
44
available.
 
45
HELP
 
46
 
 
47
    &mitch_pdb_misc('2011', '2.8');
 
48
 
 
49
    @inargs = (
 
50
        { name => 'filter', type => 'string', null_ok => 1,
 
51
          desc => 'An optional regular expression used to filter the list' }
 
52
    );
 
53
 
 
54
    @outargs = (
 
55
        { name => 'dynamics_list', type => 'stringarray',
 
56
          desc => 'The list of paint dynamics names',
 
57
          array => { name => 'num_dynamics',
 
58
                     desc => 'The number of available paint dynamics' } }
 
59
    );
 
60
 
 
61
    %invoke = (
 
62
        headers => [ qw("core/gimpcontainer-filter.h") ],
 
63
        code => <<'CODE'
 
64
{
 
65
  dynamics_list = gimp_container_get_filtered_name_array (gimp_data_factory_get_container (gimp->dynamics_factory),
 
66
                                                          filter, &num_dynamics);
 
67
}
 
68
CODE
 
69
    );
 
70
}
 
71
 
 
72
 
 
73
@headers = qw("core/gimp.h"
 
74
              "core/gimpcontainer.h"
 
75
              "core/gimpdatafactory.h");
 
76
 
 
77
@procs = qw(dynamics_refresh
 
78
            dynamics_get_list);
 
79
 
 
80
%exports = (app => [@procs], lib => [@procs]);
 
81
 
 
82
$desc = 'Paint Dynamics';
 
83
$doc_title = 'gimpdynamics';
 
84
$doc_short_desc = 'Operations related to paint dynamics.';
 
85
$doc_long_desc = 'Operations related to paint dynamics.';
 
86
 
 
87
1;