← Back to branch summary

~ubuntu-branches/ubuntu/jaunty/gimp/jaunty-security

« back to all changes in this revision

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

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Holbach
  • Date: 2007-05-02 16:33:03 UTC
  • mfrom: (1.1.4 upstream)
  • Revision ID: james.westby@ubuntu.com-20070502163303-bvzhjzbpw8qglc4y
Tags: 2.3.16-1ubuntu1
* Resynchronized with Debian, remaining Ubuntu changes:
  - debian/rules: i18n magic.
* debian/control.in:
  - Maintainer: Ubuntu Core Developers <ubuntu-devel@lists.ubuntu.com>
* debian/patches/02_help-message.patch,
  debian/patches/03_gimp.desktop.in.in.patch,
  debian/patches/10_dont_show_wizard.patch: updated.
* debian/patches/04_composite-signedness.patch,
  debian/patches/05_add-letter-spacing.patch: dropped, used upstream.

Show diffs side-by-side

added added

removed removed

Lines of Context:
tools/pdbgen/pdb/message.pdb
1
 
# The GIMP -- an image manipulation program
 
1
# GIMP - The GNU Image Manipulation Program
2
2
# Copyright (C) 1998-1999 Manish Singh
3
3
 
4
4
# This program is free software; you can redistribute it and/or modify
17
17
 
18
18
# "Perlized" from C source by Manish Singh <yosh@gimp.org>
19
19
 
20
 
sub pdb_misc {
21
 
    $author = $copyright = 'Manish Singh';
22
 
    $date = '1998';
23
 
}
24
 
 
25
20
sub message {
26
21
    $blurb = 'Displays a dialog box with a message.';
27
22
 
30
25
The message must be in UTF-8 encoding.
31
26
HELP
32
27
 
33
 
    &pdb_misc;
 
28
    &yosh_pdb_misc('1998');
34
29
 
35
30
    @inargs = (
36
 
        { name => 'message', type => 'string', const => 1,
 
31
        { name => 'message', type => 'string',
37
32
          desc => 'Message to display in the dialog' }
38
33
    );
39
34
 
40
35
    %invoke = (
41
 
        code => <<CODE
 
36
        code => <<'CODE'
42
37
{
43
 
  if (gimp->current_plug_in)
44
 
    plug_in_progress_message (gimp->current_plug_in, message);
45
 
  else
46
 
    gimp_message (gimp, NULL, message);
 
38
  const gchar *domain = NULL;
 
39
 
 
40
  if (gimp->plug_in_manager->current_plug_in)
 
41
    domain = gimp_plug_in_get_undo_desc (gimp->plug_in_manager->current_plug_in);
 
42
  gimp_show_message (gimp, G_OBJECT (progress), GIMP_MESSAGE_WARNING,
 
43
                     domain, message);
47
44
}
48
45
CODE
49
46
    );
59
56
shown in a dialog box or printed on the console where gimp was started.
60
57
HELP
61
58
 
62
 
    &pdb_misc;
 
59
    &yosh_pdb_misc('1998');
63
60
 
64
61
    @outargs = (
65
62
        { name => 'handler', type => 'enum GimpMessageHandlerType',
66
 
          desc => 'The current handler type: { %%desc%% }',
67
 
          alias => 'gimp->message_handler', no_declare => 1 }
 
63
          desc => 'The current handler type' }
 
64
    );
 
65
 
 
66
    %invoke = (
 
67
        code => <<'CODE'
 
68
{
 
69
  handler = gimp->message_handler;
 
70
}
 
71
CODE
68
72
    );
69
73
}
70
74
 
76
80
in a dialog box or printed on the console where gimp was started.
77
81
HELP
78
82
 
79
 
    &pdb_misc;
 
83
    &yosh_pdb_misc('1998');
80
84
 
81
85
    @inargs = (
82
86
        { name => 'handler', type => 'enum GimpMessageHandlerType',
83
 
          desc => 'The new handler type: { %%desc%% }' }
84
 
    );
85
 
 
86
 
    %invoke = ( code => 'gimp->message_handler = handler;' );
87
 
}
 
87
          desc => 'The new handler type' }
 
88
    );
 
89
 
 
90
    %invoke = (
 
91
        code => <<'CODE'
 
92
{
 
93
  gimp->message_handler = handler;
 
94
}
 
95
CODE
 
96
    );
 
97
}
 
98
 
88
99
 
89
100
@headers = qw(<string.h>
90
 
              "core/gimp.h" "plug-in/plug-in.h" "plug-in/plug-in-progress.h"
 
101
              "core/gimp.h"
 
102
              "plug-in/gimpplugin.h"
 
103
              "plug-in/gimppluginmanager.h"
91
104
              "gimp-intl.h");
92
105
 
93
106
@procs = qw(message message_get_handler message_set_handler);
 
107
 
94
108
%exports = (app => [@procs], lib => [@procs]);
95
109
 
96
110
$desc = 'Message procedures';