r32176 - in /trunk/libgtk2-perl: ./ debian/ t/ xs/

ryan52-guest at users.alioth.debian.org ryan52-guest at users.alioth.debian.org
Wed Mar 18 00:59:05 UTC 2009


Author: ryan52-guest
Date: Wed Mar 18 00:59:01 2009
New Revision: 32176

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=32176
Log:
New upstream release

Modified:
    trunk/libgtk2-perl/ChangeLog
    trunk/libgtk2-perl/Gtk2.pm
    trunk/libgtk2-perl/META.yml
    trunk/libgtk2-perl/Makefile.PL
    trunk/libgtk2-perl/NEWS
    trunk/libgtk2-perl/README
    trunk/libgtk2-perl/debian/changelog
    trunk/libgtk2-perl/t/GtkCellView.t
    trunk/libgtk2-perl/t/GtkEntry.t
    trunk/libgtk2-perl/t/GtkIMContext.t
    trunk/libgtk2-perl/t/GtkImageMenuItem.t
    trunk/libgtk2-perl/t/GtkOrientable.t
    trunk/libgtk2-perl/t/GtkPrintSettings.t
    trunk/libgtk2-perl/t/GtkStatusIcon.t
    trunk/libgtk2-perl/t/GtkStyle.t
    trunk/libgtk2-perl/xs/GtkCellView.xs
    trunk/libgtk2-perl/xs/GtkEntry.xs
    trunk/libgtk2-perl/xs/GtkIMMulticontext.xs
    trunk/libgtk2-perl/xs/GtkImageMenuItem.xs
    trunk/libgtk2-perl/xs/GtkPrintOperation.xs
    trunk/libgtk2-perl/xs/GtkPrintSettings.xs
    trunk/libgtk2-perl/xs/GtkSelection.xs
    trunk/libgtk2-perl/xs/GtkStatusIcon.xs
    trunk/libgtk2-perl/xs/GtkStyle.xs

Modified: trunk/libgtk2-perl/ChangeLog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/ChangeLog?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/ChangeLog (original)
+++ trunk/libgtk2-perl/ChangeLog Wed Mar 18 00:59:01 2009
@@ -1,3 +1,38 @@
+2009-03-17  Torsten Schoenfeld  <kaffeetisch at gmx.de>
+
+	* Gtk2.pm
+	* Makefile.PL
+	* NEWS
+	* README: Stable release 1.220.
+
+2009-03-17  Torsten Schoenfeld  <kaffeetisch at gmx.de>
+
+	* t/GtkStyle.t
+	* xs/GtkStyle.xs: Adapt to the rename of gtk_style_get_property to
+	gtk_style_get_style_property.  Make
+	Gtk2::Style::get_style_property an alias for Gtk2::Style::get.
+
+2009-03-17  Torsten Schoenfeld  <kaffeetisch at gmx.de>
+
+	* t/GtkCellView.t
+	* t/GtkEntry.t
+	* t/GtkIMContext.t
+	* t/GtkImageMenuItem.t
+	* t/GtkOrientable.t
+	* t/GtkPrintSettings.t
+	* t/GtkStatusIcon.t
+	* t/GtkStyle.t
+	* xs/GtkCellView.xs
+	* xs/GtkEntry.xs
+	* xs/GtkIMMulticontext.xs
+	* xs/GtkImageMenuItem.xs
+	* xs/GtkPrintOperation.xs
+	* xs/GtkPrintSettings.xs
+	* xs/GtkSelection.xs
+	* xs/GtkStatusIcon.xs
+	* xs/GtkStyle.xs: Change all versions checks to refer to stable
+	releases only.
+
 2009-03-08  Torsten Schoenfeld  <kaffeetisch at gmx.de>
 
 	* Gtk2.pm

Modified: trunk/libgtk2-perl/Gtk2.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/Gtk2.pm?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/Gtk2.pm (original)
+++ trunk/libgtk2-perl/Gtk2.pm Wed Mar 18 00:59:01 2009
@@ -16,7 +16,7 @@
 # along with this library; if not, write to the Free Software Foundation, Inc.,
 # 59 Temple Place - Suite 330, Boston, MA  02111-1307  USA.
 #
-# $Id: Gtk2.pm 2155 2009-03-08 20:00:50Z tsch $
+# $Id: Gtk2.pm 2159 2009-03-17 18:44:16Z tsch $
 #
 
 package Gtk2;
@@ -73,7 +73,7 @@
 use Exporter;
 require DynaLoader;
 
-our $VERSION = '1.212';
+our $VERSION = '1.220';
 
 our @ISA = qw(DynaLoader Exporter);
 

Modified: trunk/libgtk2-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/META.yml?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/META.yml (original)
+++ trunk/libgtk2-perl/META.yml Wed Mar 18 00:59:01 2009
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Gtk2
-version:            1.212
+version:            1.220
 abstract:           Perl interface to the 2.x series of the Gimp Toolkit library
 author:  []
 license:            unknown
@@ -10,14 +10,14 @@
     ExtUtils::Depends:    0.300
     ExtUtils::MakeMaker:  0
     ExtUtils::PkgConfig:  1.030
-    Glib:                 1.214
-    Pango:                1.210
+    Glib:                 1.220
+    Pango:                1.220
 requires:
     Cairo:                1.000
     ExtUtils::Depends:    0.300
     ExtUtils::PkgConfig:  1.030
-    Glib:                 1.214
-    Pango:                1.210
+    Glib:                 1.220
+    Pango:                1.220
 no_index:
     directory:
         - t

Modified: trunk/libgtk2-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/Makefile.PL?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/Makefile.PL (original)
+++ trunk/libgtk2-perl/Makefile.PL Wed Mar 18 00:59:01 2009
@@ -15,7 +15,7 @@
 # along with this library; if not, write to the Free Software Foundation, Inc.,
 # 59 Temple Place - Suite 330, Boston, MA  02111-1307  USA.
 #
-# $Id: Makefile.PL 2155 2009-03-08 20:00:50Z tsch $
+# $Id: Makefile.PL 2159 2009-03-17 18:44:16Z tsch $
 #
 
 BEGIN { require 5.008; }
@@ -33,8 +33,8 @@
 our %build_reqs = (
 	'perl-ExtUtils-Depends'   => '0.300',
 	'perl-ExtUtils-PkgConfig' => '1.030',
-	'perl-Glib'               => '1.214', # FIXME: Glib 1.220
-	'perl-Pango'              => '1.210', # FIXME: Pango 1.220
+	'perl-Glib'               => '1.220',
+	'perl-Pango'              => '1.220',
 	'perl-Cairo'              => '1.000',
 	'Gtk+'                    => '2.0.0',
 );
@@ -286,7 +286,7 @@
     $gtk2->get_makefile_vars,
 );
 
-#=unstable
+=unstable
 
 print <<__EOW__;
 WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING
@@ -299,7 +299,7 @@
 WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING
 __EOW__
 
-#=cut
+=cut
 
 =frozen
 

Modified: trunk/libgtk2-perl/NEWS
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/NEWS?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/NEWS (original)
+++ trunk/libgtk2-perl/NEWS Wed Mar 18 00:59:01 2009
@@ -1,3 +1,22 @@
+Overview of changes in Gtk2 1.220
+=================================
+
+ Since 1.20x (the previous stable series)
+ ----------------------------------------
+ * Split out our pango bindings into the standalone Pango module and depend on
+   it.
+ * Add constants Gtk2::EVENT_STOP and EVENT_PROPAGATE for use in event
+   handlers.
+ * Wrap new API for GtkEntry, GtkCellView, GtkIMMulticontext, GtkStatusIcon,
+   GtkPrintOperation, GtkPrintSettings, GtkStyle, and GdkX11.
+ * Wrap GtkOrientable.
+ * Wrap GtkBindings.
+ * Wrap gtk_get_option_group.
+
+ Since 1.212
+ -----------
+ * Make Gtk2::Style::get_style_property an alias for Gtk2::Style::get.
+
 Overview of changes in Gtk2 1.212
 =================================
 

Modified: trunk/libgtk2-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/README?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/README (original)
+++ trunk/libgtk2-perl/README Wed Mar 18 00:59:01 2009
@@ -1,4 +1,4 @@
-Gtk2 version 1.212
+Gtk2 version 1.220
 ==================
 
 Perl bindings to the 2.x series of the Gtk+ graphical user interface library.
@@ -61,8 +61,8 @@
 This module requires these other modules and libraries:
 
   perl >= 5.8.0
-  Glib >= 1.200 (Perl module)
-  Pango >= 1.210 (Perl module)
+  Glib >= 1.220 (Perl module)
+  Pango >= 1.220 (Perl module)
   GTK+ > 2.x (C library)
 
 If GTK+ is as new or newer as 2.8, the Cairo module is also required:
@@ -102,4 +102,4 @@
 with this library; if not, write to the Free Software Foundation, Inc., 59
 Temple Place - Suite 330, Boston, MA  02111-1307  USA.
 
-# $Id: README 2155 2009-03-08 20:00:50Z tsch $
+# $Id: README 2159 2009-03-17 18:44:16Z tsch $

Modified: trunk/libgtk2-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/debian/changelog?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/debian/changelog (original)
+++ trunk/libgtk2-perl/debian/changelog Wed Mar 18 00:59:01 2009
@@ -1,3 +1,9 @@
+libgtk2-perl (1:1.220-1) UNRELEASED; urgency=low
+
+  * New upstream release
+
+ -- Ryan Niebur <ryanryan52 at gmail.com>  Tue, 17 Mar 2009 17:56:29 -0700
+
 libgtk2-perl (1:1.212-2) unstable; urgency=low
 
   * Try to fix #519864 (FTBFS, probably a race condition)

Modified: trunk/libgtk2-perl/t/GtkCellView.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkCellView.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkCellView.t (original)
+++ trunk/libgtk2-perl/t/GtkCellView.t Wed Mar 18 00:59:01 2009
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: GtkCellView.t 2108 2009-01-13 20:30:33Z tsch $
+# $Id: GtkCellView.t 2157 2009-03-17 18:21:36Z tsch $
 #
 
 #########################
@@ -48,7 +48,7 @@
 
 SKIP: {
 	skip 'new 2.16 stuff', 2
-		unless Gtk2->CHECK_VERSION(2, 15, 0); # FIXME: 2.16
+		unless Gtk2->CHECK_VERSION(2, 16, 0);
 
 	$cview->set_model (undef);
 	is($cview->get_model(), undef, '$cview->get_model with undef');

Modified: trunk/libgtk2-perl/t/GtkEntry.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkEntry.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkEntry.t (original)
+++ trunk/libgtk2-perl/t/GtkEntry.t Wed Mar 18 00:59:01 2009
@@ -2,7 +2,7 @@
 use strict;
 use Gtk2::TestHelper tests => 61;
 
-# $Id: GtkEntry.t 2133 2009-02-06 14:32:24Z tsch $
+# $Id: GtkEntry.t 2157 2009-03-17 18:21:36Z tsch $
 
 my $entry = Gtk2::Entry -> new();
 isa_ok($entry, "Gtk2::Entry");
@@ -101,7 +101,7 @@
 
 SKIP: {
   skip '2.16 stuff', 38
-    unless Gtk2->CHECK_VERSION(2, 15, 0); # FIXME: 2.16
+    unless Gtk2->CHECK_VERSION(2, 16, 0);
 
   ## progress methods
 

Modified: trunk/libgtk2-perl/t/GtkIMContext.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkIMContext.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkIMContext.t (original)
+++ trunk/libgtk2-perl/t/GtkIMContext.t Wed Mar 18 00:59:01 2009
@@ -62,7 +62,7 @@
 
 SKIP: {
 	skip '2.16 additions', 2
-		unless Gtk2->CHECK_VERSION (2, 15, 0); # FIXME: 2.16
+		unless Gtk2->CHECK_VERSION (2, 16, 0);
 
 	is ($context->get_context_id, undef, 'No default context ID');
 

Modified: trunk/libgtk2-perl/t/GtkImageMenuItem.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkImageMenuItem.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkImageMenuItem.t (original)
+++ trunk/libgtk2-perl/t/GtkImageMenuItem.t Wed Mar 18 00:59:01 2009
@@ -2,7 +2,7 @@
 use strict;
 use Gtk2::TestHelper tests => 11;
 
-# $Id: GtkImageMenuItem.t 2109 2009-01-13 20:45:00Z tsch $
+# $Id: GtkImageMenuItem.t 2157 2009-03-17 18:21:36Z tsch $
 
 my $item = Gtk2::ImageMenuItem -> new();
 isa_ok($item, "Gtk2::ImageMenuItem");
@@ -29,7 +29,7 @@
 
 SKIP: {
 	skip 'use_stock methods', 4
-		unless Gtk2->CHECK_VERSION(2, 15, 0); # FIXME: 2.16
+		unless Gtk2->CHECK_VERSION(2, 16, 0);
 
 	# Get an item from a stock and test the getter/setter
 	my $from_stock = Gtk2::ImageMenuItem -> new_from_stock("gtk-yes");

Modified: trunk/libgtk2-perl/t/GtkOrientable.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkOrientable.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkOrientable.t (original)
+++ trunk/libgtk2-perl/t/GtkOrientable.t Wed Mar 18 00:59:01 2009
@@ -1,7 +1,7 @@
 #!/usr/bin/perl
 use Gtk2::TestHelper
 	tests => 6,
-	at_least_version => [2, 15, 0, 'GtkOrientable: it appeared in 2.16']; # FIXME: 2.16
+	at_least_version => [2, 16, 0, 'GtkOrientable: it appeared in 2.16'];
 
 
 my $vbox = Gtk2::VBox -> new();

Modified: trunk/libgtk2-perl/t/GtkPrintSettings.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkPrintSettings.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkPrintSettings.t (original)
+++ trunk/libgtk2-perl/t/GtkPrintSettings.t Wed Mar 18 00:59:01 2009
@@ -4,7 +4,7 @@
   tests => 26,
   at_least_version => [2, 10, 0, 'GtkPrintSettings: it is new in 2.10'];
 
-# $Id: GtkPrintSettings.t 2114 2009-01-18 16:41:33Z tsch $
+# $Id: GtkPrintSettings.t 2157 2009-03-17 18:21:36Z tsch $
 
 my $settings = Gtk2::PrintSettings -> new();
 isa_ok($settings, 'Gtk2::PrintSettings');
@@ -114,7 +114,7 @@
 
 SKIP: {
   skip 'new 2.16 stuff', 6
-    unless Gtk2->CHECK_VERSION(2, 15, 0); # FIXME: 2.16
+    unless Gtk2->CHECK_VERSION(2, 16, 0);
 
   my $settings = Gtk2::PrintSettings -> new();
 

Modified: trunk/libgtk2-perl/t/GtkStatusIcon.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkStatusIcon.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkStatusIcon.t (original)
+++ trunk/libgtk2-perl/t/GtkStatusIcon.t Wed Mar 18 00:59:01 2009
@@ -7,7 +7,7 @@
   tests => 36,
   at_least_version => [2, 10, 0, "Gtk2::StatusIcon is new in 2.10"];
 
-# $Id: GtkStatusIcon.t 2111 2009-01-13 21:03:48Z tsch $
+# $Id: GtkStatusIcon.t 2157 2009-03-17 18:21:36Z tsch $
 
 my $icon;
 
@@ -138,7 +138,7 @@
 
 SKIP: {
   skip 'new 2.16 stuff', 6
-    unless Gtk2->CHECK_VERSION(2, 15, 0); # FIXME: 2.16
+    unless Gtk2->CHECK_VERSION(2, 16, 0);
 
   $icon->set_has_tooltip(TRUE);
   is ($icon->get_has_tooltip(), TRUE);

Modified: trunk/libgtk2-perl/t/GtkStyle.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/t/GtkStyle.t?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/t/GtkStyle.t (original)
+++ trunk/libgtk2-perl/t/GtkStyle.t Wed Mar 18 00:59:01 2009
@@ -1,10 +1,10 @@
 #!/usr/bin/perl -w
 # vim: set ft=perl expandtab shiftwidth=2 softtabstop=2 :
 use strict;
-use Gtk2::TestHelper tests => 124;
+use Gtk2::TestHelper tests => 125;
 use Carp;
 
-# $Id: GtkStyle.t 2152 2009-03-08 17:01:28Z tsch $
+# $Id: GtkStyle.t 2158 2009-03-17 18:42:54Z tsch $
 
 my $window = Gtk2::Window -> new();
 $window -> realize();
@@ -135,8 +135,8 @@
 }
 
 SKIP: {
-  skip("get is new in 2.16", 12)
-    unless (Gtk2->CHECK_VERSION(2, 15, 0)); # FIXME 2.16
+  skip("get is new in 2.16", 13)
+    unless (Gtk2->CHECK_VERSION(2, 16, 0));
 
   # Test different properties (gint, gboolean, gchar* and GObject)
   my $treeview = Gtk2::TreeView -> new();
@@ -181,6 +181,15 @@
       $treeview -> style_get_property('grid_line-pattern'),
     ],
     'get multiple properties',
+  );
+
+
+
+  # Test the get_style_property alias
+  is (
+    $style -> get_style_property('Gtk2::TreeView', 'even-row-color'),
+    $style -> get('Gtk2::TreeView', 'even-row-color'),
+    "get_style_property alias"
   );
 
 

Modified: trunk/libgtk2-perl/xs/GtkCellView.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkCellView.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkCellView.xs (original)
+++ trunk/libgtk2-perl/xs/GtkCellView.xs Wed Mar 18 00:59:01 2009
@@ -3,7 +3,7 @@
  *
  * Licensed under the LGPL, see LICENSE file for more information.
  *
- * $Id: GtkCellView.xs 2108 2009-01-13 20:30:33Z tsch $
+ * $Id: GtkCellView.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -67,7 +67,7 @@
 	else
 		XSRETURN_EMPTY;
 
-#if GTK_CHECK_VERSION (2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 GtkTreeModel_ornull * gtk_cell_view_get_model (GtkCellView * cellview);
 

Modified: trunk/libgtk2-perl/xs/GtkEntry.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkEntry.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkEntry.xs (original)
+++ trunk/libgtk2-perl/xs/GtkEntry.xs Wed Mar 18 00:59:01 2009
@@ -16,7 +16,7 @@
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 
  * Boston, MA  02111-1307  USA.
  *
- * $Id: GtkEntry.xs 2132 2009-02-06 14:30:10Z tsch $
+ * $Id: GtkEntry.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -228,7 +228,7 @@
 #endif /* 2.14 */
 
 
-#if GTK_CHECK_VERSION(2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 #
 # FIXME: Missing typemap, actually I don't think that gio is available through Perl

Modified: trunk/libgtk2-perl/xs/GtkIMMulticontext.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkIMMulticontext.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkIMMulticontext.xs (original)
+++ trunk/libgtk2-perl/xs/GtkIMMulticontext.xs Wed Mar 18 00:59:01 2009
@@ -16,7 +16,7 @@
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  * Boston, MA  02111-1307  USA.
  *
- * $Id: GtkIMMulticontext.xs 2110 2009-01-13 20:47:12Z tsch $
+ * $Id: GtkIMMulticontext.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -30,7 +30,7 @@
 void gtk_im_multicontext_append_menuitems (GtkIMMulticontext *context, GtkMenuShell *menushell);
 
 
-#if GTK_CHECK_VERSION(2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 const char* gtk_im_multicontext_get_context_id (GtkIMMulticontext *context);
 

Modified: trunk/libgtk2-perl/xs/GtkImageMenuItem.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkImageMenuItem.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkImageMenuItem.xs (original)
+++ trunk/libgtk2-perl/xs/GtkImageMenuItem.xs Wed Mar 18 00:59:01 2009
@@ -16,7 +16,7 @@
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 
  * Boston, MA  02111-1307  USA.
  *
- * $Id: GtkImageMenuItem.xs 2109 2009-01-13 20:45:00Z tsch $
+ * $Id: GtkImageMenuItem.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -63,7 +63,7 @@
 	GtkImageMenuItem * image_menu_item
 
 
-#if GTK_CHECK_VERSION(2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 ## gboolean gtk_image_menu_item_get_use_stock (GtkImageMenuItem *image_menu_item);
 gboolean

Modified: trunk/libgtk2-perl/xs/GtkPrintOperation.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkPrintOperation.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkPrintOperation.xs (original)
+++ trunk/libgtk2-perl/xs/GtkPrintOperation.xs Wed Mar 18 00:59:01 2009
@@ -3,7 +3,7 @@
  *
  * Licensed under the LGPL, see LICENSE file for more information.
  *
- * $Id: GtkPrintOperation.xs 2113 2009-01-18 16:33:12Z tsch $
+ * $Id: GtkPrintOperation.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -94,7 +94,7 @@
 
 void gtk_print_operation_cancel (GtkPrintOperation *op);
 
-#if GTK_CHECK_VERSION (2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 =for apidoc
 

Modified: trunk/libgtk2-perl/xs/GtkPrintSettings.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkPrintSettings.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkPrintSettings.xs (original)
+++ trunk/libgtk2-perl/xs/GtkPrintSettings.xs Wed Mar 18 00:59:01 2009
@@ -3,7 +3,7 @@
  *
  * Licensed under the LGPL, see LICENSE file for more information.
  *
- * $Id: GtkPrintSettings.xs 2114 2009-01-18 16:41:33Z tsch $
+ * $Id: GtkPrintSettings.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -121,7 +121,7 @@
 
 #endif /* 2.14 */
 
-#if GTK_CHECK_VERSION (2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 gdouble gtk_print_settings_get_printer_lpi (GtkPrintSettings *settings);
 

Modified: trunk/libgtk2-perl/xs/GtkSelection.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkSelection.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkSelection.xs (original)
+++ trunk/libgtk2-perl/xs/GtkSelection.xs Wed Mar 18 00:59:01 2009
@@ -16,13 +16,13 @@
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 
  * Boston, MA  02111-1307  USA.
  *
- * $Id: GtkSelection.xs 2116 2009-01-18 23:02:29Z tsch $
+ * $Id: GtkSelection.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
 
 
-#if !GTK_CHECK_VERSION (2, 15, 0) /* FIXME 2.16 */
+#if !GTK_CHECK_VERSION (2, 16, 0)
 #  define gtk_selection_data_get_selection(d) ((d)->selection)
 #endif /* 2.16 */
 

Modified: trunk/libgtk2-perl/xs/GtkStatusIcon.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkStatusIcon.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkStatusIcon.xs (original)
+++ trunk/libgtk2-perl/xs/GtkStatusIcon.xs Wed Mar 18 00:59:01 2009
@@ -3,7 +3,7 @@
  *
  * Licensed under the LGPL, see LICENSE file for more information.
  *
- * $Id: GtkStatusIcon.xs 2111 2009-01-13 21:03:48Z tsch $
+ * $Id: GtkStatusIcon.xs 2157 2009-03-17 18:21:36Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -134,7 +134,7 @@
 
 #endif /* 2.14 */
 
-#if GTK_CHECK_VERSION (2, 15, 0) /* FIXME: 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 void gtk_status_icon_set_has_tooltip (GtkStatusIcon *status_icon, gboolean has_tooltip);
 

Modified: trunk/libgtk2-perl/xs/GtkStyle.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libgtk2-perl/xs/GtkStyle.xs?rev=32176&op=diff
==============================================================================
--- trunk/libgtk2-perl/xs/GtkStyle.xs (original)
+++ trunk/libgtk2-perl/xs/GtkStyle.xs Wed Mar 18 00:59:01 2009
@@ -16,7 +16,7 @@
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330, 
  * Boston, MA  02111-1307  USA.
  *
- * $Id: GtkStyle.xs 2152 2009-03-08 17:01:28Z tsch $
+ * $Id: GtkStyle.xs 2158 2009-03-17 18:42:54Z tsch $
  */
 
 #include "gtk2perl.h"
@@ -573,21 +573,23 @@
 
 #endif
 
-#if GTK_CHECK_VERSION (2, 15, 0) /* FIXME 2.16 */
+#if GTK_CHECK_VERSION (2, 16, 0)
 
 =for apidoc
 =for signature list = $style->get (widget_package, ...)
+=for signature list = $style->get_style_property (widget_package, ...)
 =for arg widget_package (string) widget package name (ex: 'Gtk2::TreeView')
 =for arg ... (list) list of property names
 
 Fetch and return the values for the style properties named in I<...> for a
-widget of type I<widget_package>.
-
-B<Note>: This method shadows I<Glib::Object::get>. This shouldn't be a problem
-since I<Gtk2::Style> defines no properties (as of gtk+ 2.16).  If you have a
-class that's derived from Gtk2::Style and adds a property or if a new version
-of gtk+ adds a property to I<Gtk2::Style>, the property can be accessed with
-I<get_property> which still resolves to I<Glib::Object::get_property>:
+widget of type I<widget_package>.  I<get_style_property> is an alias for
+I<get>.
+
+B<Note>: The I<get> method shadows I<Glib::Object::get>. This shouldn't be a
+problem since I<Gtk2::Style> defines no properties (as of gtk+ 2.16).  If you
+have a class that's derived from Gtk2::Style and adds a property or if a new
+version of gtk+ adds a property to I<Gtk2::Style>, the property can be accessed
+with I<get_property> which still resolves to I<Glib::Object::get_property>:
 
 	my $value = $style->get_property('property');
 
@@ -596,14 +598,18 @@
 gtk_style_get (style, widget_package, ...)
 	GtkStyle *style
 	const char *widget_package
+    ALIAS:
+	get_style_property = 1
     PREINIT:
 	int i;
 	GType widget_type;
 	gpointer class;
     CODE:
 	/* Use CODE: instead of PPCODE: so we can handle the stack ourselves in
-	 * order to avoid that xsubs called by gtk_style_get_property overwrite
-	 * what we put on the stack. */
+	 * order to avoid that xsubs called by gtk_style_get_style_property
+	 * overwrite what we put on the stack. */
+
+	PERL_UNUSED_VAR (ix);
 
 	widget_type = gperl_type_from_package (widget_package);
 	if (widget_type == 0)
@@ -625,7 +631,7 @@
 
 		if (pspec) {
 			g_value_init (&value, G_PARAM_SPEC_VALUE_TYPE (pspec));
-			gtk_style_get_property (style, widget_type, name, &value);
+			gtk_style_get_style_property (style, widget_type, name, &value);
 			ST (i - 2) = sv_2mortal (gperl_sv_from_value (&value));
 			g_value_unset (&value);
 		}




More information about the Pkg-perl-cvs-commits mailing list