pandoc-static: upgrade to 1.13.2.1

2 files changed, 195 insertions, 6 deletions

diff --git a/pcr/pandoc-static/PKGBUILD b/pcr/pandoc-static/PKGBUILD
index c26de70a0..ab6c69af7 100644
--- a/pcr/pandoc-static/PKGBUILD
+++ b/pcr/pandoc-static/PKGBUILD
@@ -4,7 +4,7 @@
 
 pkgname=pandoc-static
 _pkgname=pandoc
-pkgver=1.13.2
+pkgver=1.13.2.1
 pkgrel=1
 pkgdesc='Conversion between markup formats (no Haskell libraries)'
 url='http://johnmacfarlane.net/pandoc/'
@@ -14,19 +14,22 @@ replaces=('pandoc')
 provides=('pandoc')
 
 arch=('i686' 'x86_64')
-depends=('icu>=54' 'icu<55' 'gmp' 'libffi' 'zlib')
+depends=('icu>=55' 'icu<56' 'gmp' 'libffi' 'zlib')
 makedepends=('ghc' 'sh' 'cabal-install' 'alex' 'happy')
 optdepends=('texlive-most: for PDF creation')
 options=(strip !makeflags !distcc !emptydirs)
-source=(https://repo.parabola.nu/other/${pkgname}/${pkgname}-${pkgver}.tar.xz)
-md5sums=('dd2667b233b5f97b2841ae09895c2ac2')
+source=(https://repo.parabola.nu/other/${pkgname}/${pkgname}-${pkgver}.tar.xz{,.sig}
+        pandoc-citeproc-ghc-7.10.patch)
+validpgpkeys=('49F707A1CB366C580E625B3C456032D717A4CD9C')
+sha512sums=('614832f1c96bbdd67a50c8ace76f416d87b9dfeb873a7b2de6d8336a1804f68c53e5460ad62c49097fd8ea052f38a1f66163bc56cc808ac18bc57ce76063ecbc'
+            'SKIP'
+            '22339e9b3dc68151fdf867379bc3b9f600cb5e08b45a26ab755a3d0d2034b461763174d82468fe9f3d6bd8a4a14b1ce30b4ab040c44777f8b99e89915fb4b4ee')
 
 declare -gA _flags
 _flags[pandoc]='https make-pandoc-man-pages'
 _flags[pandoc_citeproc]='small_base bibutils hexpat unicode_collation'
 
 _packages=(hs-bibutils network hexpat text text-icu hsb2hs
-  http-client-0.3.8.2
   http-client-tls http-types
   pandoc-${pkgver} pandoc-citeproc)
 mkdepends=('ghc' 'cabal-install')
@@ -60,6 +63,16 @@ prepare() {
   find "${srcdir}/${pkgname}-${pkgver}/${_pkgname}-${pkgver}" \
     -name default.latex \
     -exec sed "/fontenc/d" -i {} \;
+
+    # https://github.com/hvr/deepseq-generics/issues/2
+    sed "s/\(ghc-prim >= 0.2 && < \)0.4/\10.5/" -i \
+    "${srcdir}/${pkgname}-${pkgver}/deepseq-generics-0.1.1.2/deepseq-generics.cabal"
+
+    sed "s/\(base <4.\)8/\19/" -i \
+    "${srcdir}/${pkgname}-${pkgver}/split-0.2.2/split.cabal"
+
+    pushd "${srcdir}/${pkgname}-${pkgver}/pandoc-citeproc-0.6/"
+    patch -Np1 -i "${srcdir}/pandoc-citeproc-ghc-7.10.patch"
 }
 
 build() (
@@ -128,4 +141,3 @@ package() {
   cp -rv "${srcdir}"/build/usr/share/doc/*/* "${pkgdir}"/usr/share/licenses/${pkgname}
   mv -v        "${pkgdir}"/usr/share/doc/*/* "${pkgdir}"/usr/share/licenses/${pkgname}
 }
-md5sums=('6c763fae16e10400874b15d7b084ad82')
diff --git a/pcr/pandoc-static/pandoc-citeproc-ghc-7.10.patch b/pcr/pandoc-static/pandoc-citeproc-ghc-7.10.patch
new file mode 100644
index 000000000..abdd40ade
--- /dev/null
+++ b/pcr/pandoc-static/pandoc-citeproc-ghc-7.10.patch
@@ -0,0 +1,177 @@
+commit 4e4f9c2f2866c28c01985abdcca82064ed44002e
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:31:30 2015 +1100
+
+    ghc 7.10.1 RC1 requires FlexibleContexts https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#Inferredtype-signaturesnowmayrequiretoenableFlexibleContextsGADTsorTypeFamilies
+
+diff --git a/src/Text/CSL/Util.hs b/src/Text/CSL/Util.hs
+index 6e90bf7..bfe5f4c 100644
+--- a/src/Text/CSL/Util.hs
++++ b/src/Text/CSL/Util.hs
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE ScopedTypeVariables, PatternGuards #-}
++{-# LANGUAGE ScopedTypeVariables, PatternGuards, FlexibleContexts #-}
+ module Text.CSL.Util
+   ( safeRead
+   , readNum
+
+commit 34cc147f87f2714ff3ad821a7640ef7e80323688
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:30:59 2015 +1100
+
+    ghc 7.10.1 RC1 requires specifying the type of the String literal https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#GHCsaysNoinstanceforFoldable...arisingfromtheuseof...
+
+diff --git a/src/Text/CSL/Style.hs b/src/Text/CSL/Style.hs
+index d5972b3..067a9e0 100644
+--- a/src/Text/CSL/Style.hs
++++ b/src/Text/CSL/Style.hs
+@@ -130,7 +130,7 @@ readCSLString s = Walk.walk handleSmallCapsSpans
+   -- this is needed for versions of pandoc that don't turn
+   -- a span with font-variant:small-caps into a SmallCaps element:
+   where handleSmallCapsSpans (Span ("",[],[("style",sty)]) ils)
+-            | filter (`notElem` " \t;") sty == "font-variant:small-caps" =
++            | filter (`notElem` (" \t;" :: String)) sty == "font-variant:small-caps" =
+               SmallCaps ils
+         handleSmallCapsSpans x = x
+ 
+@@ -206,15 +206,15 @@ appendWithPunct :: Formatted -> Formatted -> Formatted
+ appendWithPunct (Formatted left) (Formatted right) =
+   Formatted $
+   case concat [lastleft, firstright] of
+-       [' ',d] | d `elem` ",.:;" -> initInline left ++ right
+-       [c,d] | c `elem` " ,.:;", d == c -> left ++ tailInline right
+-       [c,'.'] | c `elem` ",.!:;?" -> left ++ tailInline right
+-       [c,':'] | c `elem` ",!:;?" -> left ++ tailInline right  -- Mich.: 2005
+-       [c,'!'] | c `elem` ",.!:;?" -> left ++ tailInline right
+-       [c,'?'] | c `elem` ",.!:;?" -> left ++ tailInline right
+-       [c,';'] | c `elem` ",:;" -> left ++ tailInline right -- et al.;
+-       [':',c] | c `elem` ",.!:;?" -> left ++ tailInline right
+-       [';',c] | c `elem` ",.!:;?" -> left ++ tailInline right
++       [' ',d] | d `elem` (",.:;" :: String) -> initInline left ++ right
++       [c,d] | c `elem` (" ,.:;" :: String), d == c -> left ++ tailInline right
++       [c,'.'] | c `elem` (",.!:;?" :: String) -> left ++ tailInline right
++       [c,':'] | c `elem` (",!:;?" :: String) -> left ++ tailInline right  -- Mich.: 2005
++       [c,'!'] | c `elem` (",.!:;?" :: String) -> left ++ tailInline right
++       [c,'?'] | c `elem` (",.!:;?" :: String) -> left ++ tailInline right
++       [c,';'] | c `elem` (",:;" :: String) -> left ++ tailInline right -- et al.;
++       [':',c] | c `elem` (",.!:;?" :: String) -> left ++ tailInline right
++       [';',c] | c `elem` (",.!:;?" :: String) -> left ++ tailInline right
+        -- ".;" -> right  -- e.g. et al.;
+        _    -> left ++ right
+   where lastleft     = lastInline left
+
+commit 8242c706af750f15d1f82d663e2be94f0f80dc34
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:30:39 2015 +1100
+
+    ghc 7.10.1 RC1 requires specifying the type of the String literal https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#GHCsaysNoinstanceforFoldable...arisingfromtheuseof...
+
+diff --git a/src/Text/CSL/Proc.hs b/src/Text/CSL/Proc.hs
+index 3575a59..f98e021 100644
+--- a/src/Text/CSL/Proc.hs
++++ b/src/Text/CSL/Proc.hs
+@@ -288,7 +288,7 @@ formatCitLayout s (CG co f d cs)
+         case ys of
+              Formatted [] -> xs
+              Formatted (Note _ : _) -> xs <> ys
+-             Formatted (Str [c]:_) | c `elem` ", ;:" -> xs <> ys
++             Formatted (Str [c]:_) | c `elem` (", ;:" :: String) -> xs <> ys
+              _ -> xs <> Formatted [Space] <> ys
+       formatAuth   = formatOutput . localMod
+       formatCits   = (if isNote then toNote else id) .
+@@ -328,7 +328,7 @@ localModifiers s b c
+     | otherwise        = id
+     where
+       isPunct' [] = False
+-      isPunct' xs = all (`elem` ".,;:!? ") xs
++      isPunct' xs = all (`elem` (".,;:!? " :: String)) xs
+       check o = case cleanOutput o of
+                   [] -> ONull
+                   x  -> case trim' x of
+
+commit e59f88d317224a76daf7ee152eaacbf7d84fc8a1
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:30:15 2015 +1100
+
+    ghc 7.10.1 RC1 requires specifying the type of the String literal https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#GHCsaysNoinstanceforFoldable...arisingfromtheuseof...
+
+diff --git a/src/Text/CSL/Parser.hs b/src/Text/CSL/Parser.hs
+index a5649bb..ea9b367 100644
+--- a/src/Text/CSL/Parser.hs
++++ b/src/Text/CSL/Parser.hs
+@@ -144,7 +144,7 @@ stringAttr t cur =
+ 
+ parseCslTerm :: Cursor -> CslTerm
+ parseCslTerm cur =
+-    let body = unpack $ T.dropAround (`elem` " \t\r\n") $
++    let body = unpack $ T.dropAround (`elem` (" \t\r\n" :: String)) $
+                   T.concat $ cur $/ content
+     in CT
+       { cslTerm        = stringAttr "name" cur
+
+commit ae6ca8694d9c077f46223a5018dc24d94070491c
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:29:58 2015 +1100
+
+    ghc 7.10.1 RC1 requires specifying the type of the String literal https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#GHCsaysNoinstanceforFoldable...arisingfromtheuseof...
+
+diff --git a/src/Text/CSL/Pandoc.hs b/src/Text/CSL/Pandoc.hs
+index ae48cb4..840702a 100644
+--- a/src/Text/CSL/Pandoc.hs
++++ b/src/Text/CSL/Pandoc.hs
+@@ -201,10 +201,10 @@ endWithPunct xs@(_:_) = case reverse (stringify xs) of
+                                        && isEndPunct c -> True
+                               (c:_) | isEndPunct c     -> True
+                                     | otherwise        -> False
+-  where isEndPunct c = c `elem` ".,;:!?"
++  where isEndPunct c = c `elem` (".,;:!?" :: String)
+ 
+ startWithPunct :: [Inline] -> Bool
+-startWithPunct = and . map (`elem` ".,;:!?") . headInline
++startWithPunct = and . map (`elem` (".,;:!?" :: String)) . headInline
+ 
+ deNote :: Pandoc -> Pandoc
+ deNote = topDown go
+@@ -324,7 +324,7 @@ pWordWithDigits isfirst = try $ do
+   sp <- option "" (pSpace >> return " ")
+   r <- many1 (notFollowedBy pSpace >> notFollowedBy pLocatorPunct >> anyToken)
+   let s = stringify r
+-  guard $ any isDigit s || all (`elem` "IVXLCM") s
++  guard $ any isDigit s || all (`elem` ("IVXLCM" :: String)) s
+   return $ punct ++ sp ++ s
+ 
+ pDigit :: Parsec [Inline] st ()
+
+commit f5a9fc70951c68b60455a1e2fa7755734c68a357
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:28:40 2015 +1100
+
+    ghc 7.10.1 RC1 requires FlexibleContexts https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#Inferredtype-signaturesnowmayrequiretoenableFlexibleContextsGADTsorTypeFamilies
+
+diff --git a/src/Text/CSL/Eval/Names.hs b/src/Text/CSL/Eval/Names.hs
+index 23e9b8e..5a387a2 100644
+--- a/src/Text/CSL/Eval/Names.hs
++++ b/src/Text/CSL/Eval/Names.hs
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE PatternGuards #-}
++{-# LANGUAGE PatternGuards, FlexibleContexts #-}
+ -----------------------------------------------------------------------------
+ -- |
+ -- Module      :  Text.CSL.Eval.Names
+
+commit 780a554f9d3dc0c1a53d285de05065bdb36c1b99
+Author: Mark Wright <gienah@gentoo.org>
+Date:   Sat Jan 10 12:28:24 2015 +1100
+
+    ghc 7.10.1 RC1 requires FlexibleContexts https://ghc.haskell.org/trac/ghc/wiki/Migration/7.10#Inferredtype-signaturesnowmayrequiretoenableFlexibleContextsGADTsorTypeFamilies
+
+diff --git a/src/Text/CSL/Eval.hs b/src/Text/CSL/Eval.hs
+index 57c10dd..cf1dbb5 100644
+--- a/src/Text/CSL/Eval.hs
++++ b/src/Text/CSL/Eval.hs
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE PatternGuards #-}
++{-# LANGUAGE PatternGuards, FlexibleContexts #-}
+ -----------------------------------------------------------------------------
+ -- |
+ -- Module      :  Text.CSL.Eval