From a129f53e53b3949d64807fdfd8e92a0a7f19c87d Mon Sep 17 00:00:00 2001 From: Jens Petersen Date: Sat, 27 Jan 2018 19:32:19 +0100 Subject: [PATCH] fix Latin1 in Progressive.hs --- JuicyPixels-3.2.9.3-Progressive-Latin1.patch | 11 +++++++++++ ghc-JuicyPixels.spec | 2 ++ 2 files changed, 13 insertions(+) create mode 100644 JuicyPixels-3.2.9.3-Progressive-Latin1.patch diff --git a/JuicyPixels-3.2.9.3-Progressive-Latin1.patch b/JuicyPixels-3.2.9.3-Progressive-Latin1.patch new file mode 100644 index 0000000..6146501 --- /dev/null +++ b/JuicyPixels-3.2.9.3-Progressive-Latin1.patch @@ -0,0 +1,11 @@ +--- JuicyPixels-3.2.9.3/src/Codec/Picture/Jpg/Progressive.hs~ 2018-01-01 18:46:06.000000000 +0100 ++++ JuicyPixels-3.2.9.3/src/Codec/Picture/Jpg/Progressive.hs 2018-01-27 19:26:56.780022170 +0100 +@@ -40,7 +40,7 @@ + + -- if the displayed MCU block is only displayed in half (like with + -- width 500 then we loose one macroblock of the MCU at the end of +- -- the line. Previous implementation which naïvely used full mcu ++ -- the line. Previous implementation which naively used full mcu + -- was wrong. Only taking into account visible macroblocks + indexSolo = [base + x + | y <- [0 .. compH - 1] diff --git a/ghc-JuicyPixels.spec b/ghc-JuicyPixels.spec index fedc387..f5db50b 100644 --- a/ghc-JuicyPixels.spec +++ b/ghc-JuicyPixels.spec @@ -12,6 +12,7 @@ Summary: Picture loading and serialization License: BSD Url: https://hackage.haskell.org/package/%{pkg_name} Source0: https://hackage.haskell.org/package/%{pkgver}/%{pkgver}.tar.gz +Patch0: JuicyPixels-3.2.9.3-Progressive-Latin1.patch BuildRequires: ghc-Cabal-devel BuildRequires: ghc-rpm-macros @@ -50,6 +51,7 @@ This package provides the Haskell %{pkg_name} library development files. %prep %setup -q -n %{pkgver} sed -i 's/\r$//' LICENSE +%patch0 -p1 -b .orig %build