[gimp-perl] Use gimp_ui_init.
- From: Ed J <edj src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [gimp-perl] Use gimp_ui_init.
- Date: Tue, 10 Jun 2014 06:23:08 +0000 (UTC)
commit 3f42e9b49be67943b0c2af41b589213d4f9df84b
Author: Ed J <edj src gnome org>
Date: Tue Jun 10 07:22:41 2014 +0100
Use gimp_ui_init.
UI/UI.xs | 7 +++----
1 files changed, 3 insertions(+), 4 deletions(-)
---
diff --git a/UI/UI.xs b/UI/UI.xs
index 008a62f..0a7c4ae 100644
--- a/UI/UI.xs
+++ b/UI/UI.xs
@@ -7,10 +7,6 @@
#include <gperl.h>
-/* dirty is used in gimp.h AND in perl < 5.005 or with PERL_POLLUTE. */
-#ifdef dirty
-# undef dirty
-#endif
#include <libgimp/gimp.h>
#include <libgimp/gimpui.h>
#ifdef GIMP_HAVE_EXPORT
@@ -138,6 +134,9 @@ typedef GtkWidget GimpUnitMenu_own;
MODULE = Gimp::UI PACKAGE = Gimp::UI
+BOOT:
+ gimp_ui_init (g_strdup (SvPV_nolen (get_sv("0", 0))), 0);
+
PROTOTYPES: ENABLE
gint32
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]