From be2c76123ebe028d3a26dabd7c20e280b1e2f13e Mon Sep 17 00:00:00 2001 From: "Andrey A. Chernov" Date: Fri, 15 Mar 2002 06:21:46 +0000 Subject: Workaround hack for perl Ping() method wrong image dimension bug. According to author, it is fixed in different way in not yet released 5.4.4 --- graphics/ImageMagick/files/patch-aa | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 graphics/ImageMagick/files/patch-aa (limited to 'graphics/ImageMagick/files/patch-aa') diff --git a/graphics/ImageMagick/files/patch-aa b/graphics/ImageMagick/files/patch-aa new file mode 100644 index 000000000000..8a2f1ce28355 --- /dev/null +++ b/graphics/ImageMagick/files/patch-aa @@ -0,0 +1,16 @@ +--- PerlMagick/Magick.xs.bak Fri Mar 1 00:35:16 2002 ++++ PerlMagick/Magick.xs Fri Mar 15 07:42:00 2002 +@@ -6249,9 +6249,11 @@ + EXTEND(sp,4*count); + for (p=image ; p != (Image *) NULL; p=p->next) + { +- FormatString(message,"%u",p->columns); ++ FormatString(message,"%u", ++ p->magick_columns ? p->magick_columns : p->columns); + PUSHs(sv_2mortal(newSVpv(message,0))); +- FormatString(message,"%u",p->rows); ++ FormatString(message,"%u", ++ p->magick_rows ? p->magick_rows : p->rows); + PUSHs(sv_2mortal(newSVpv(message,0))); + FormatString(message,"%lu",(unsigned long) GetBlobSize(p)); + PUSHs(sv_2mortal(newSVpv(message,0))); -- cgit v1.2.3