Bug #97760 for GD: gif animation support in Ubuntu Linux

Tue Aug 05 08:08:49 2014 KABANOID [...] cpan.org - Ticket created

Subject:	gif animation support in Ubuntu Linux
Date:	Tue, 5 Aug 2014 16:08:40 +0400
To:	bug-GD [...] rt.cpan.org
From:	Mike Katasonov <kabanoid [...] cpan.org>

Hello. I am using GD $VERSION = '2.53'; and gdlib version 2.1.0 However when I try to call $im->gifanimbegin, perl script dies with the string: "libgd 2.0.33 or higher required for animated GIF support" Additional info: perl -v This is perl 5, version 18, subversion 2 (v5.18.2) built for x86_64-linux-gnu-thread-multi (with 41 registered patches, see perl -V for more detail) uname -a Linux xxx 3.13.0-24-generic #46-Ubuntu SMP Thu Apr 10 19:11:08 UTC 2014 x86_64 x86_64 x86_64 GNU/Linux

Mon Sep 08 23:04:49 2014 bricas [...] cpan.org - Correspondence added

On Tue Aug 05 09:08:49 2014, KABANOID wrote: Show quoted text

> Hello. > I am using GD $VERSION = '2.53'; and gdlib version 2.1.0 > > However when I try to call $im->gifanimbegin, perl script dies with the > string: > > "libgd 2.0.33 or higher required for animated GIF support"

Just adding my voice to say I'm also suffering from this bug. -Brian

Mon Sep 08 23:04:50 2014 The RT System itself - Status changed from 'new' to 'open'

Wed Sep 10 22:52:01 2014 bricas [...] cpan.org - Correspondence added

I now have a patch that makes gif animations work again. Basically the issue lies with the fact that Makefile.PL checks if the minor version (well, really the "patch" version if you go by semver.org) is >= 33. That's fine for the 2.0.x series of libgd, however, with 2.1.x that fails. I've modified it to pull out the middle version number and check if that is > 0 or if the last number is >= 33. Works for local setup (Ubuntu 14.04, libgd version '2.1.1-dev@').

Subject:

animgif-2-1-x.patch

--- Makefile.PL 2014-04-01 11:23:20.000000000 -0300 +++ Makefile.PL.new 2014-09-10 23:41:44.732099869 -0300 @@ -296,8 +296,10 @@ ($$lib_gd_path = $libdir) =~ s!/[^/]+$!!; $$options = $features; - my ($minor) = $version =~ /^2\.\d+\.(\d+)$/; - $$options .= " GD_UNCLOSEDPOLY GD_ANIMGIF GD_FTCIRCLE VERSION_33" if defined($minor) && $minor >= 33; + my ($mid,$minor) = $version =~ /^2\.(\d+)\.(\d+)/; + if( defined $mid && defined $minor ) { + $$options .= " GD_UNCLOSEDPOLY GD_ANIMGIF GD_FTCIRCLE VERSION_33" if $mid > 0 || $minor >= 33; + } my @correct_inc = map {s/^-I// && $_} split /\s+/,$cflags; check_for_stray_headers($includedir,@correct_inc);

Fri Nov 21 10:54:09 2014 bricas [...] cpan.org - Correspondence added

FYI: This is basically a duplicate of RT #89592 (also https://github.com/lstein/Perl-GD/pull/9)

Fri Apr 21 06:41:24 2017 RURBAN [...] cpan.org - Correspondence added

Fixed since 2.57 -- Reini Urban

Fri Apr 21 06:41:28 2017 RURBAN [...] cpan.org - Status changed from 'open' to 'resolved'