From: Tony Cook <tony@develop=help.com>
Date: Thu, 12 Apr 2001 13:57:56 +0000 (+0000)
Subject: added function to check giflib version
X-Git-Tag: Imager-0.48^2~741
X-Git-Url: http://git.imager.perl.org/imager.git/commitdiff_plain/03bd24d4d19c4c98a5540e3676473f7155c9e942

added function to check giflib version
---

diff --git a/Imager.xs b/Imager.xs
index 2eb4dfe7..3b70fb80 100644
--- a/Imager.xs
+++ b/Imager.xs
@@ -1056,6 +1056,11 @@ i_readpng_scalar(...)
 
 #ifdef HAVE_LIBGIF
 
+void
+i_giflib_version()
+	PPCODE:
+	  PUSHs(sv_2mortal(newSVnv(IM_GIFMAJOR+IM_GIFMINOR*0.1)));
+
 undef_int
 i_writegif(im,fd,colors,pixdev,fixed)
     Imager::ImgRaw     im