[libgtk3-perl] 01/04: 0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch: new patch, that adds support for gdk-pixbuf >= 2.31.3, which reverted some annotation changes that came with 2.31.2 (Closes: #786604).
Intrigeri
intrigeri at moszumanska.debian.org
Sun May 31 08:15:25 UTC 2015
This is an automated email from the git hooks/post-receive script.
intrigeri pushed a commit to branch master
in repository libgtk3-perl.
commit be10edf44a23aca50f10ea4634f2aea88454f54b
Author: intrigeri <intrigeri at boum.org>
Date: Sun May 31 07:55:07 2015 +0000
0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch: new patch, that adds support for gdk-pixbuf >= 2.31.3, which reverted some annotation changes that came with 2.31.2 (Closes: #786604).
---
...-pixbuf-2.31.3-that-reverted-some-annotat.patch | 80 ++++++++++++++++++++++
debian/patches/series | 1 +
2 files changed, 81 insertions(+)
diff --git a/debian/patches/0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch b/debian/patches/0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch
new file mode 100644
index 0000000..5cc333d
--- /dev/null
+++ b/debian/patches/0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch
@@ -0,0 +1,80 @@
+From: intrigeri <intrigeri at boum.org>
+Date: Sun, 31 May 2015 07:52:49 +0000
+Forwarded: https://mail.gnome.org/archives/gtk-perl-list/2015-May/msg00021.html
+Subject: Support gdk-pixbuf >= 2.31.3,
+ that reverted some annotation changes that came with 2.31.2.
+
+---
+ lib/Gtk3.pm | 38 +++++++++++++++++++++++++++++++++++---
+ 1 file changed, 35 insertions(+), 3 deletions(-)
+
+diff --git a/lib/Gtk3.pm b/lib/Gtk3.pm
+index 64221a0..1a6113a 100644
+--- a/lib/Gtk3.pm
++++ b/lib/Gtk3.pm
+@@ -1431,6 +1431,11 @@ my $HAVE_GDK_PIXBUF_2_31_2 = sub {
+ return (Gtk3::Gdk::PIXBUF_MAJOR () == 2 && Gtk3::Gdk::PIXBUF_MINOR () > 31) ||
+ (Gtk3::Gdk::PIXBUF_MAJOR () == 2 && Gtk3::Gdk::PIXBUF_MINOR () == 31 && Gtk3::Gdk::PIXBUF_MICRO () >= 2);
+ };
++my $HAVE_GDK_PIXBUF_2_31_3 = sub {
++ return (Gtk3::Gdk::PIXBUF_MAJOR () == 2 && Gtk3::Gdk::PIXBUF_MINOR () > 31) ||
++ (Gtk3::Gdk::PIXBUF_MAJOR () == 2 && Gtk3::Gdk::PIXBUF_MINOR () == 31 && Gtk3::Gdk::PIXBUF_MICRO () >= 3);
++};
++
+
+ sub Gtk3::Gdk::Pixbuf::save {
+ my ($pixbuf, $filename, $type, @rest) = @_;
+@@ -1439,7 +1444,16 @@ sub Gtk3::Gdk::Pixbuf::save {
+ croak ("Usage: \$pixbuf->save (\$filename, \$type, \\\@keys, \\\@values)\n",
+ " -or-: \$pixbuf->save (\$filename, \$type, \$key1 => \$value1, ...)");
+ }
+- my $method = $HAVE_GDK_PIXBUF_2_31_2->() ? 'save' : 'savev';
++ my $method;
++ if ($HAVE_GDK_PIXBUF_2_31_3->()) {
++ $method = 'savev';
++ }
++ elsif ($HAVE_GDK_PIXBUF_2_31_2->()) {
++ $method = 'save';
++ }
++ else {
++ $method = 'savev';
++ }
+ Glib::Object::Introspection->invoke (
+ $_GDK_PIXBUF_BASENAME, 'Pixbuf', $method,
+ $pixbuf, $filename, $type, $keys, $values);
+@@ -1452,7 +1466,16 @@ sub Gtk3::Gdk::Pixbuf::save_to_buffer {
+ croak ("Usage: \$pixbuf->save_to_buffer (\$type, \\\@keys, \\\@values)\n",
+ " -or-: \$pixbuf->save_to_buffer (\$type, \$key1 => \$value1, ...)");
+ }
+- my $method = $HAVE_GDK_PIXBUF_2_31_2->() ? 'save_to_buffer' : 'save_to_bufferv';
++ my $method;
++ if ($HAVE_GDK_PIXBUF_2_31_3->()) {
++ $method = 'save_to_bufferv';
++ }
++ elsif ($HAVE_GDK_PIXBUF_2_31_2->()) {
++ $method = 'save_to_buffer';
++ }
++ else {
++ $method = 'save_to_bufferv';
++ }
+ my (undef, $buffer) =
+ Glib::Object::Introspection->invoke (
+ $_GDK_PIXBUF_BASENAME, 'Pixbuf', $method,
+@@ -1467,7 +1490,16 @@ sub Gtk3::Gdk::Pixbuf::save_to_callback {
+ croak ("Usage: \$pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \\\@keys, \\\@values)\n",
+ " -or-: \$pixbuf->save_to_callback (\$save_func, \$user_data, \$type, \$key1 => \$value1, ...)");
+ }
+- my $method = $HAVE_GDK_PIXBUF_2_31_2->() ? 'save_to_callback' : 'save_to_callbackv';
++ my $method;
++ if ($HAVE_GDK_PIXBUF_2_31_3->()) {
++ $method = 'save_to_callbackv';
++ }
++ elsif ($HAVE_GDK_PIXBUF_2_31_2->()) {
++ $method = 'save_to_callback';
++ }
++ else {
++ $method = 'save_to_callbackv';
++ }
+ Glib::Object::Introspection->invoke (
+ $_GDK_PIXBUF_BASENAME, 'Pixbuf', $method,
+ $pixbuf, $save_func, $user_data, $type, $keys, $values);
diff --git a/debian/patches/series b/debian/patches/series
index 937ee11..3c1daed 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
0001-Use-a-temporary-directory-as-HOME.patch
+0002-Support-gdk-pixbuf-2.31.3-that-reverted-some-annotat.patch
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libgtk3-perl.git
More information about the Pkg-perl-cvs-commits
mailing list