Hello community, here is the log from the commit of package perl-Gtk2 checked in at Tue Aug 21 02:56:04 CEST 2007. -------- --- perl-Gtk2/perl-Gtk2.changes 2007-07-12 11:51:35.000000000 +0200 +++ /mounts/work_users/ro/STABLE/perl-Gtk2/perl-Gtk2.changes 2007-08-21 02:31:29.148233000 +0200 @@ -1,0 +2,5 @@ +Tue Aug 21 02:31:19 CEST 2007 - ro@suse.de + +- update to 1.146 to fix test failures + +------------------------------------------------------------------- Old: ---- Gtk2-1.145.tar.bz2 perl-Gtk2-1.145-tests.diff New: ---- Gtk2-1.146.tar.bz2 perl-Gtk2-1.146-tests.diff ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Gtk2.spec ++++++ --- /var/tmp/diff_new_pack.FG9563/_old 2007-08-21 02:55:56.000000000 +0200 +++ /var/tmp/diff_new_pack.FG9563/_new 2007-08-21 02:55:56.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package perl-Gtk2 (Version 1.145) +# spec file for package perl-Gtk2 (Version 1.146) # # Copyright (c) 2007 SUSE LINUX Products GmbH, Nuernberg, Germany. # This file and all modifications and additions to the pristine @@ -12,8 +12,8 @@ Name: perl-Gtk2 BuildRequires: gtk2-devel perl-Cairo perl-ExtUtils-Depends perl-ExtUtils-PkgConfig perl-Glib update-desktop-files xorg-x11 xorg-x11-Xvfb xorg-x11-server -Version: 1.145 -Release: 2 +Version: 1.146 +Release: 1 Requires: perl = %{perl_version} Requires: perl-Glib perl-Cairo Autoreqprov: on @@ -22,7 +22,7 @@ URL: http://cpan.org/modules/by-module/Gtk2/ Summary: Gtk2 Perl module Source: Gtk2-%{version}.tar.bz2 -Patch: %{name}-%{version}-tests.diff +Patch: perl-Gtk2-1.146-tests.diff BuildRoot: %{_tmppath}/%{name}-%{version}-build %description @@ -78,6 +78,8 @@ /var/adm/perl-modules/%{name} %changelog +* Tue Aug 21 2007 - ro@suse.de +- update to 1.146 to fix test failures * Thu Jul 12 2007 - anicka@suse.cz - temporarily disable some tests failing with gtk2 2.11.5 (they seem to be wrong anyway) ++++++ Gtk2-1.145.tar.bz2 -> Gtk2-1.146.tar.bz2 ++++++ diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/ChangeLog new/Gtk2-1.146/ChangeLog --- old/Gtk2-1.145/ChangeLog 2007-07-02 20:29:44.000000000 +0200 +++ new/Gtk2-1.146/ChangeLog 2007-08-04 15:48:46.000000000 +0200 @@ -1,3 +1,47 @@ +2007-08-04 kaffeetisch + + * Gtk2.pm + * NEWS + * README: Stable release 1.146. + +2007-08-04 kaffeetisch + + Merge from HEAD: + + * t/GtkTooltips.t: Fix test failure due to change of semantics in + gtk+. + +2007-07-22 kaffeetisch + + Merge from HEAD: + + * t/GdkWindow.t + * t/GtkIconTheme.t + * t/GtkActionGroup.t + * t/GtkRecentManager.t: Fix test failures. + + * xs/GtkCellRenderer.xs: Mortalize all SVs we put on the stack. + In the past, we had to be careful not to cause destruction of + pre-existing C objects, but that's not necessary anymore. + + * xs/GtkRadioAction.xs + * xs/GtkRadioButton.xs + * xs/GtkRadioMenuItem.xs: Plug leaks in the get_group() methods: + Mark new SVs as mortal when we put them on the stack. + + * xs/PangoTypes.xs: Since pango uses GSlice starting with 1.12, + use g_slice_new0 instead of g_new0 in Gtk2::Pango::Matrix::new + when appropriate to avoid memory corruption. (#458458, reported + by Quentin Sculo) + +2007-07-05 kaffeetisch + + Merge from HEAD: + + * xs/GdkPixbuf.xs: Really plug the leaks in + Gtk2::Gdk::Pixbuf::render_pixmap_and_mask() and + render_pixmap_and_mask_for_colormap(). + 2007-07-02 kaffeetisch * Gtk2.pm, NEWS, README: Stable release 1.145. diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/Gtk2.pm new/Gtk2-1.146/Gtk2.pm --- old/Gtk2-1.145/Gtk2.pm 2007-07-02 20:30:25.000000000 +0200 +++ new/Gtk2-1.146/Gtk2.pm 2007-08-04 15:49:08.000000000 +0200 @@ -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. # -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/Gtk2.pm,v 1.100.2.6 2007/07/02 18:30:25 kaffeetisch Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/Gtk2.pm,v 1.100.2.7 2007/08/04 13:49:08 kaffeetisch Exp $ # package Gtk2; @@ -35,7 +35,7 @@ require DynaLoader; -our $VERSION = '1.145'; +our $VERSION = '1.146'; our @ISA = qw(DynaLoader); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/META.yml new/Gtk2-1.146/META.yml --- old/Gtk2-1.145/META.yml 2007-07-02 20:35:03.000000000 +0200 +++ new/Gtk2-1.146/META.yml 2007-08-04 15:49:27.000000000 +0200 @@ -1,9 +1,9 @@ --- #YAML:1.0 name: Gtk2 -version: 1.145 +version: 1.146 abstract: Perl interface to the 2.x series of the Gimp Toolkit library license: ~ -generated_by: ExtUtils::MakeMaker version 6.32 +generated_by: ExtUtils::MakeMaker version 6.36 distribution_type: module requires: Cairo: 1.00 diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/NEWS new/Gtk2-1.146/NEWS --- old/Gtk2-1.145/NEWS 2007-07-02 20:28:40.000000000 +0200 +++ new/Gtk2-1.146/NEWS 2007-08-04 15:07:46.000000000 +0200 @@ -1,3 +1,11 @@ +Overview of changes in Gtk2 1.146 +================================= + +* Avoid memory corruption in Gtk2::Pango::Matrix::new. + [Torsten, Quentin Sculo] +* Plug a few memory leaks. [muppet, Torsten] +* Fix some test failures. [Torsten] + Overview of changes in Gtk2 1.145 ================================= diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/README new/Gtk2-1.146/README --- old/Gtk2-1.145/README 2007-07-02 20:30:25.000000000 +0200 +++ new/Gtk2-1.146/README 2007-08-04 15:49:08.000000000 +0200 @@ -1,4 +1,4 @@ -Gtk2 version 1.145 +Gtk2 version 1.146 ================== Perl bindings to the 2.x series of the Gtk+ graphical user interface library. @@ -101,4 +101,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,v 1.77.2.5 2007/07/02 18:30:25 kaffeetisch Exp $ +# $Id: README,v 1.77.2.6 2007/08/04 13:49:08 kaffeetisch Exp $ diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/t/GdkWindow.t new/Gtk2-1.146/t/GdkWindow.t --- old/Gtk2-1.145/t/GdkWindow.t 2006-12-04 21:00:38.000000000 +0100 +++ new/Gtk2-1.146/t/GdkWindow.t 2007-07-22 23:19:08.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use Gtk2::TestHelper tests => 40; -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GdkWindow.t,v 1.19 2006/08/07 18:36:03 kaffeetisch Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GdkWindow.t,v 1.19.2.1 2007/07/22 21:19:08 kaffeetisch Exp $ my $attributes = { title => "Bla", @@ -267,7 +267,7 @@ $window -> set_decorations("all"); my @deco = $window -> get_decorations(); -like($deco[0], qr/^(?:1|)$/); +ok(defined $deco[0]); isa_ok($deco[1], "Gtk2::Gdk::WMDecoration"); $window -> set_functions("all"); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/t/GtkActionGroup.t new/Gtk2-1.146/t/GtkActionGroup.t --- old/Gtk2-1.145/t/GtkActionGroup.t 2006-10-17 21:56:36.000000000 +0200 +++ new/Gtk2-1.146/t/GtkActionGroup.t 2007-07-22 23:19:08.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkActionGroup.t,v 1.7 2005/01/10 06:32:28 muppetman Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkActionGroup.t,v 1.7.8.1 2007/07/22 21:19:08 kaffeetisch Exp $ # use Gtk2::TestHelper @@ -30,9 +30,9 @@ is (@list, 0); $action_group->add_action_with_accel ($action, undef); -$action_group->add_action_with_accel ($action, "<shift>a"); - $action_group->remove_action ($action); + +$action_group->add_action_with_accel ($action, "<shift>a"); $action_group->remove_action ($action); my @action_entries = ( @@ -96,6 +96,8 @@ skip "translation API is (semi) new in 2.6", 3+14 unless Gtk2->CHECK_VERSION (2, 6, 0); + my $action_group = Gtk2::ActionGroup->new ("Fred"); + $action_group->set_translate_func(sub { my ($string, $data) = @_; diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/t/GtkIconTheme.t new/Gtk2-1.146/t/GtkIconTheme.t --- old/Gtk2-1.145/t/GtkIconTheme.t 2007-06-22 19:32:49.000000000 +0200 +++ new/Gtk2-1.146/t/GtkIconTheme.t 2007-07-22 23:19:08.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkIconTheme.t,v 1.14.2.1 2007/06/22 17:32:49 kaffeetisch Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkIconTheme.t,v 1.14.2.2 2007/07/22 21:19:08 kaffeetisch Exp $ # use Gtk2::TestHelper @@ -34,7 +34,7 @@ isa_ok ($icon_info->load_icon, 'Gtk2::Gdk::Pixbuf'); - is ($icon_info->get_base_size, 24); + ok (defined $icon_info->get_base_size); like ($icon_info->get_filename, qr/stock_edit/); # FIXME: diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/t/GtkRecentManager.t new/Gtk2-1.146/t/GtkRecentManager.t --- old/Gtk2-1.145/t/GtkRecentManager.t 2006-12-04 21:00:39.000000000 +0100 +++ new/Gtk2-1.146/t/GtkRecentManager.t 2007-07-22 23:19:08.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkRecentManager.t,v 1.4.2.1 2006/11/19 20:29:00 kaffeetisch Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkRecentManager.t,v 1.4.2.2 2007/07/22 21:19:08 kaffeetisch Exp $ # ######################### @@ -11,6 +11,7 @@ use strict; use warnings; +use File::Basename qw(basename); use Gtk2::TestHelper tests => 36, at_least_version => [2, 10, 0, "GtkRecentManager is new in 2.10"], @@ -78,7 +79,7 @@ is($recent_info->get_display_name, 'Stock edit', 'check name'); is($recent_info->get_description, 'GTK+ stock icon for edit', 'check description'); is($recent_info->get_mime_type, 'image/png', 'check MIME'); - is($recent_info->get_short_name, 'stock_edit.png', 'check short name'); + is($recent_info->get_short_name, basename $icon_file, 'check short name'); ok(defined $recent_info->get_uri_display, 'check display uri'); ok(defined $recent_info->get_age, 'check age'); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/t/GtkToolbar.t new/Gtk2-1.146/t/GtkToolbar.t --- old/Gtk2-1.145/t/GtkToolbar.t 2006-11-19 21:22:04.000000000 +0100 +++ new/Gtk2-1.146/t/GtkToolbar.t 2007-08-04 14:24:17.000000000 +0200 @@ -1,8 +1,8 @@ # -# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkToolbar.t,v 1.8 2004/08/15 21:15:12 muppetman Exp $ +# $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/t/GtkToolbar.t,v 1.8.10.1 2007/08/04 12:24:17 kaffeetisch Exp $ # -use Gtk2::TestHelper tests => 53; +use Gtk2::TestHelper tests => 52; use strict; use warnings; @@ -225,9 +225,6 @@ $toolbar->set_tooltips (TRUE); ok ($toolbar->get_tooltips, '[sg]et_tooltips'); -$toolbar->set_tooltips (FALSE); -ok (!$toolbar->get_tooltips, '[sg]et_tooltips'); - $toolbar->set_orientation ('vertical'); is ('vertical', $toolbar->get_orientation, '[sg]et_orientation'); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/GdkPixbuf.xs new/Gtk2-1.146/xs/GdkPixbuf.xs --- old/Gtk2-1.145/xs/GdkPixbuf.xs 2007-07-02 20:15:17.000000000 +0200 +++ new/Gtk2-1.146/xs/GdkPixbuf.xs 2007-07-05 23:37:12.000000000 +0200 @@ -16,7 +16,7 @@ * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307 USA. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GdkPixbuf.xs,v 1.38.4.1 2007/07/02 18:15:17 kaffeetisch Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GdkPixbuf.xs,v 1.38.4.2 2007/07/05 21:37:12 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -192,9 +192,9 @@ GdkBitmap *bm; gdk_pixbuf_render_pixmap_and_mask_for_colormap (pixbuf, colormap, &pm, GIMME_V == G_ARRAY ? &bm : 0, alpha_threshold); - XPUSHs (newSVGdkPixmap_noinc (pm)); + XPUSHs (sv_2mortal (newSVGdkPixmap_noinc (pm))); if (GIMME_V == G_ARRAY) - XPUSHs (newSVGdkBitmap_noinc (bm)); + XPUSHs (sv_2mortal (newSVGdkBitmap_noinc (bm))); } @@ -212,9 +212,9 @@ GdkBitmap *bm; gdk_pixbuf_render_pixmap_and_mask (pixbuf, &pm, GIMME_V == G_ARRAY ? &bm : 0, alpha_threshold); - XPUSHs (newSVGdkPixmap_noinc (pm)); + XPUSHs (sv_2mortal (newSVGdkPixmap_noinc (pm))); if (GIMME_V == G_ARRAY) - XPUSHs (newSVGdkBitmap_noinc (bm)); + XPUSHs (sv_2mortal (newSVGdkBitmap_noinc (bm))); } =for apidoc get_from_image diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/GtkCellRenderer.xs new/Gtk2-1.146/xs/GtkCellRenderer.xs --- old/Gtk2-1.145/xs/GtkCellRenderer.xs 2006-10-17 21:56:37.000000000 +0200 +++ new/Gtk2-1.146/xs/GtkCellRenderer.xs 2007-07-22 23:19:09.000000000 +0200 @@ -16,7 +16,7 @@ * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307 USA. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkCellRenderer.xs,v 1.29 2005/02/08 05:17:41 muppetman Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkCellRenderer.xs,v 1.29.8.1 2007/07/22 21:19:09 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -132,8 +132,8 @@ PUSHMARK (SP); EXTEND (SP, 3); - PUSHs (newSVGtkCellRenderer (cell)); - PUSHs (newSVGtkWidget (widget)); + PUSHs (sv_2mortal (newSVGtkCellRenderer (cell))); + PUSHs (sv_2mortal (newSVGtkWidget (widget))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (cell_area))); PUTBACK; @@ -177,9 +177,9 @@ PUSHMARK (SP); EXTEND (SP, 7); - PUSHs (newSVGtkCellRenderer (cell)); - PUSHs (newSVGdkDrawable_ornull (drawable)); - PUSHs (newSVGtkWidget_ornull (widget)); + PUSHs (sv_2mortal (newSVGtkCellRenderer (cell))); + PUSHs (sv_2mortal (newSVGdkDrawable_ornull (drawable))); + PUSHs (sv_2mortal (newSVGtkWidget_ornull (widget))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (background_area))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (cell_area))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (expose_area))); @@ -213,9 +213,9 @@ SAVETMPS; PUSHMARK (SP); - XPUSHs (newSVGtkCellRenderer (cell)); + XPUSHs (sv_2mortal (newSVGtkCellRenderer (cell))); XPUSHs (sv_2mortal (newSVGdkEvent_ornull (event))); - XPUSHs (newSVGtkWidget_ornull (widget)); + XPUSHs (sv_2mortal (newSVGtkWidget_ornull (widget))); XPUSHs (sv_2mortal (newSVGChar_ornull (path))); XPUSHs (sv_2mortal (newSVGdkRectangle_ornull (background_area))); XPUSHs (sv_2mortal (newSVGdkRectangle_ornull (cell_area))); @@ -257,9 +257,9 @@ PUSHMARK (SP); EXTEND (SP, 7); - PUSHs (newSVGtkCellRenderer (cell)); + PUSHs (sv_2mortal (newSVGtkCellRenderer (cell))); PUSHs (sv_2mortal (newSVGdkEvent_ornull (event))); - PUSHs (newSVGtkWidget_ornull (widget)); + PUSHs (sv_2mortal (newSVGtkWidget_ornull (widget))); PUSHs (sv_2mortal (newSVGChar_ornull (path))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (background_area))); PUSHs (sv_2mortal (newSVGdkRectangle_ornull (cell_area))); @@ -727,7 +727,7 @@ SvGdkRectangle_ornull (ST (5)), SvGtkCellRendererState (ST (6))); EXTEND (SP, 1); - PUSHs (newSVGtkCellEditable_ornull (editable)); + PUSHs (sv_2mortal (newSVGtkCellEditable_ornull (editable))); } break; default: diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/GtkRadioAction.xs new/Gtk2-1.146/xs/GtkRadioAction.xs --- old/Gtk2-1.145/xs/GtkRadioAction.xs 2006-10-17 21:56:37.000000000 +0200 +++ new/Gtk2-1.146/xs/GtkRadioAction.xs 2007-07-22 23:19:10.000000000 +0200 @@ -3,7 +3,7 @@ * * Licensed under the LGPL, see LICENSE file for more information. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioAction.xs,v 1.7 2006/08/07 18:36:10 kaffeetisch Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioAction.xs,v 1.7.2.1 2007/07/22 21:19:10 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -36,7 +36,7 @@ av = newAV (); for (i = group ; i != NULL ; i = i->next) av_push (av, newSVGtkRadioAction (i->data)); - XPUSHs (newRV_noinc ((SV*)av)); + PUSHs (sv_2mortal (newRV_noinc ((SV*)av))); ## void gtk_radio_action_set_group (GtkRadioAction *action, GSList *group); void gtk_radio_action_set_group (GtkRadioAction *action, SV *member_or_listref); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/GtkRadioButton.xs new/Gtk2-1.146/xs/GtkRadioButton.xs --- old/Gtk2-1.145/xs/GtkRadioButton.xs 2006-10-17 21:56:37.000000000 +0200 +++ new/Gtk2-1.146/xs/GtkRadioButton.xs 2007-07-22 23:19:10.000000000 +0200 @@ -16,7 +16,7 @@ * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307 USA. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioButton.xs,v 1.16 2004/10/09 03:21:42 muppetman Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioButton.xs,v 1.16.10.1 2007/07/22 21:19:10 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -195,5 +195,5 @@ { av_push(av, newSVGtkRadioButton(GTK_RADIO_BUTTON(i->data))); } - XPUSHs(newRV_noinc((SV*)av)); + PUSHs(sv_2mortal(newRV_noinc((SV*)av))); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/GtkRadioMenuItem.xs new/Gtk2-1.146/xs/GtkRadioMenuItem.xs --- old/Gtk2-1.145/xs/GtkRadioMenuItem.xs 2006-10-17 21:56:37.000000000 +0200 +++ new/Gtk2-1.146/xs/GtkRadioMenuItem.xs 2007-07-22 23:19:10.000000000 +0200 @@ -16,7 +16,7 @@ * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307 USA. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioMenuItem.xs,v 1.15 2004/03/17 03:52:25 muppetman Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/GtkRadioMenuItem.xs,v 1.15.12.1 2007/07/22 21:19:10 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -101,7 +101,7 @@ { av_push(av, newSVGtkRadioMenuItem(GTK_RADIO_MENU_ITEM(i->data))); } - XPUSHs(newRV_noinc((SV*)av)); + PUSHs(sv_2mortal(newRV_noinc((SV*)av))); void gtk_radio_menu_item_set_group (radio_menu_item, member_or_listref) diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/Gtk2-1.145/xs/PangoTypes.xs new/Gtk2-1.146/xs/PangoTypes.xs --- old/Gtk2-1.145/xs/PangoTypes.xs 2006-10-17 21:58:46.000000000 +0200 +++ new/Gtk2-1.146/xs/PangoTypes.xs 2007-07-22 23:15:15.000000000 +0200 @@ -16,7 +16,7 @@ * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307 USA. * - * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/PangoTypes.xs,v 1.6 2006/10/03 15:49:15 kaffeetisch Exp $ + * $Header: /cvsroot/gtk2-perl/gtk2-perl-xs/Gtk2/xs/PangoTypes.xs,v 1.6.2.1 2007/07/22 21:15:15 kaffeetisch Exp $ */ #include "gtk2perl.h" @@ -113,7 +113,11 @@ double x0 double y0 CODE: +#if PANGO_CHECK_VERSION (1, 12, 0) + RETVAL = g_slice_new0 (PangoMatrix); +#else RETVAL = g_new0 (PangoMatrix, 1); +#endif RETVAL->xx = xx; RETVAL->xy = xy; RETVAL->yx = yx; ++++++ perl-Gtk2-1.145-tests.diff -> perl-Gtk2-1.146-tests.diff ++++++ --- perl-Gtk2/perl-Gtk2-1.145-tests.diff 2007-07-12 11:40:54.000000000 +0200 +++ /mounts/work_users/ro/STABLE/perl-Gtk2/perl-Gtk2-1.146-tests.diff 2007-08-21 02:45:19.243231000 +0200 @@ -1,29 +1,3 @@ ---- t/GtkActionGroup.t -+++ t/GtkActionGroup.t -@@ -4,7 +4,7 @@ - - use Gtk2::TestHelper - at_least_version => [2, 4, 0, "Action-based menus are new in 2.4"], -- tests => 28; -+ tests => 14; - - my $action_group = Gtk2::ActionGroup->new ("Fred"); - -@@ -110,10 +110,10 @@ - # as of 2.6.0 we have the ability to call the translation function - # from add_*_actions like we're supposed to, so let's test that. - # the following should result in 14 oks. -- $action_group->set_translate_func (sub { ok(1, 'xlate'); reverse $_[0]; }); -- $action_group->add_actions (\@action_entries); -- $action_group->add_toggle_actions (\@toggle_entries, 42); -- $action_group->add_radio_actions (\@color_entries, COLOR_GREEN, \&on_change); -+# $action_group->set_translate_func (sub { ok(1, 'xlate'); reverse $_[0]; }); -+# $action_group->add_actions (\@action_entries); -+# $action_group->add_toggle_actions (\@toggle_entries, 42); -+# $action_group->add_radio_actions (\@color_entries, COLOR_GREEN, \&on_change); - } - - __END__ --- t/GtkIconTheme.t +++ t/GtkIconTheme.t @@ -4,7 +4,7 @@ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... --------------------------------------------------------------------- To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org For additional commands, e-mail: opensuse-commit+help@opensuse.org
participants (1)
-
root@Hilbert.suse.de