@@ -1,14 +1,19 @@
11{-# LANGUAGE OverloadedStrings #-}
2+{-# LANGUAGE ScopedTypeVariables #-}
23
34module Distribution.Nixpkgs.Haskell.FromCabal.PostProcess ( postProcess, pkg ) where
45
56import Control.Lens
7+import Control.Monad.Trans.State
68import Data.List.Split
9+import Data.Map ( Map )
10+import qualified Data.Map as Map
11+import Data.Map.Lens
712import Data.Set ( Set )
813import qualified Data.Set as Set
9−import Data.Set.Lens
1014import Distribution.Nixpkgs.Haskell
1115import Distribution.Nixpkgs.Meta
16+import Distribution.Nixpkgs.License
1217import Distribution.Package
1318import Distribution.System
1419import Distribution.Text
@@ -16,7 +21,11 @@ import Distribution.Version
1621import Language.Nix
1722
1823postProcess :: Derivation -> Derivation
19−postProcess deriv = foldr ($) (fixGtkBuilds deriv) [ f | (Dependency n vr, f) <- hooks, packageName deriv == n, packageVersion deriv `withinRange` vr ]
24+postProcess deriv =
25+ foldr (.) id [ f | (Dependency n vr _, f) <- hooks, packageName deriv == n, packageVersion deriv `withinRange` vr ]
26+ . fixGtkBuilds
27+ . fixBuildDependsForTools
28+ $ deriv
2029
2130fixGtkBuilds :: Derivation -> Derivation
2231fixGtkBuilds drv = drv & dependencies . pkgconfig %~ Set.filter (not . collidesWithHaskellName)
@@ -24,54 +33,93 @@ fixGtkBuilds drv = drv & dependencies . pkgconfig %~ Set.filter (not . collidesW
2433 & dependencies . tool %~ Set.filter (not . collidesWithHaskellName)
2534 where
2635 collidesWithHaskellName :: Binding -> Bool
27− collidesWithHaskellName b = view localName b `Set.member` buildDeps
36+ collidesWithHaskellName b = case buildDeps Map.!? view localName b of
37+ Nothing -> False -- totally uncollided
38+ Just p -> p /= view reference b -- identical is not collision, and important to preserve for cross
2839
2940 myName :: Identifier
3041 myName = ident # unPackageName (packageName drv)
3142
32− buildDeps :: Set Identifier
33− buildDeps = Set.delete myName (setOf (dependencies . haskell . folded . localName) drv)
43+ buildDeps :: Map Identifier Path
44+ buildDeps = Map.delete myName (toMapOf (dependencies . haskell . to Set.toList . traverse . binding . ifolded) drv)
45+
46+-- Per https://github.com/haskell/cabal/issues/5412 hvr considers
47+-- `build-depends` providing executables an accident, and fragile one at that,
48+-- unworthy of any compatibility hacks. But while he and the other Hackage
49+-- maintainers is dedicated to fixing executables and libraries on Hackage, test
50+-- suites and benchmarks are not a priority, as it is trivial to skip building
51+-- test-suites with cabal-install. Nix however wishes to build test suites much
52+-- more widely, so skipping those components is not an option.
53+--
54+-- Between that, and Stack not changing behavior as of
55+-- https://github.com/commercialhaskell/stack/pull/4132, it seems likely that
56+-- for a while packages scraped from Hackage will continue to improperly use
57+-- `build-depends: package-for-tool` instead of `build-tool-depends` (which does
58+-- also work for Stack). Until that changes, we provide do this to work around
59+-- those package's brokenness.
60+fixBuildDependsForTools :: Derivation -> Derivation
61+fixBuildDependsForTools = foldr (.) id
62+ [ fmap snd $ runState $ do
63+ needs <- use $ cloneLens c . haskell . contains p
64+ cloneLens c . tool . contains p ||= needs
65+ | (c :: ALens' Derivation BuildInfo) <- [ testDepends, benchmarkDepends ]
66+ , p <- self <$> [ "hspec-discover"
67+ , "tasty-discover"
68+ , "hsx2hs"
69+ , "markdown-unlit"
70+ ]
71+ ]
3472
3573hooks :: [(Dependency, Derivation -> Derivation)]
3674hooks =
3775 [ ("Agda < 2.5", set (executableDepends . tool . contains (pkg "emacs")) True . set phaseOverrides agdaPostInstall)
3876 , ("Agda >= 2.5", set (executableDepends . tool . contains (pkg "emacs")) True . set phaseOverrides agda25PostInstall)
3977 , ("alex < 3.1.5", set (testDepends . tool . contains (pkg "perl")) True)
40− , ("alex", set (executableDepends . tool . contains (bind "self.happy")) True)
41− , ("alsa-core", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux))) , ("bustle", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
78+ , ("alex", set (executableDepends . tool . contains (self "happy")) True)
79+ , ("alsa-core", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux)))
4280 , ("bindings-GLFW", over (libraryDepends . system) (Set.union (Set.fromList [bind "pkgs.xorg.libXext", bind "pkgs.xorg.libXfixes"])))
43− , ("bindings-lxc", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux))) , ("bustle", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
44− , ("bustle", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
81+ , ("bindings-lxc", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux)))
82+ , ("bustle", bustleOverrides)
83+ , ("Cabal", set doCheck False) -- test suite doesn't work in Nix
84+ , ("Cabal >2.2", over (setupDepends . haskell) (Set.union (Set.fromList [self "mtl", self "parsec"]))) -- https://github.com/haskell/cabal/issues/5391
4585 , ("cabal-helper", set doCheck False) -- https://github.com/DanielG/cabal-helper/issues/17
4686 , ("cabal-install", set doCheck False . set phaseOverrides cabalInstallPostInstall)
47− , ("Cabal", set doCheck False) -- test suite doesn't work in Nix
87+ , ("cabal2nix > 2", cabal2nixOverrides)
4888 , ("darcs", set phaseOverrides darcsInstallPostInstall . set doCheck False)
4989 , ("dbus", set doCheck False) -- don't execute tests that try to access the network
5090 , ("dns", set testTarget "spec") -- don't execute tests that try to access the network
5191 , ("eventstore", over (metaSection . platforms) (Set.filter (\(Platform arch _) -> arch == X86_64)))
5292 , ("freenect < 1.2.1", over configureFlags (Set.union (Set.fromList ["--extra-include-dirs=${pkgs.freenect}/include/libfreenect", "--extra-lib-dirs=${pkgs.freenect}/lib"])))
93+ , ("fltkhs", set (libraryDepends . system . contains (pkg "fltk14")) True . over (libraryDepends . pkgconfig) (Set.union (pkgs ["libGLU", "libGL"]))) -- TODO: fltk14 belongs into the *setup* dependencies.
5394 , ("gf", set phaseOverrides gfPhaseOverrides . set doCheck False)
5495 , ("gi-cairo", giCairoPhaseOverrides) -- https://github.com/haskell-gi/haskell-gi/issues/36
96+ , ("gi-gdk", set runHaddock True )
97+ , ("gi-gio", set runHaddock True )
98+ , ("gi-glib", set runHaddock True )
99+ , ("gi-gst", giGstLibOverrides "gstreamer") -- https://github.com/haskell-gi/haskell-gi/issues/36
55100 , ("gi-gstaudio", giGstLibOverrides "gst-plugins-base") -- https://github.com/haskell-gi/haskell-gi/issues/36
56101 , ("gi-gstbase", giGstLibOverrides "gst-plugins-base") -- https://github.com/haskell-gi/haskell-gi/issues/36
57− , ("gi-gst", giGstLibOverrides "gstreamer") -- https://github.com/haskell-gi/haskell-gi/issues/36
58102 , ("gi-gstvideo", giGstLibOverrides "gst-plugins-base") -- https://github.com/haskell-gi/haskell-gi/issues/36
103+ , ("gi-gtk", set runHaddock True )
59104 , ("gi-javascriptcore < 4.0.0.0", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
60− , ("gio", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
61− , ("gi-pangocairo", giCairoPhaseOverrides) -- https://github.com/haskell-gi/haskell-gi/issues/36
62105 , ("gi-pango", giCairoPhaseOverrides) -- https://github.com/haskell-gi/haskell-gi/issues/36
63− , ("git-annex", gitAnnexHook)
106+ , ("gi-pango", set runHaddock True )
107+ , ("gi-pangocairo", giCairoPhaseOverrides) -- https://github.com/haskell-gi/haskell-gi/issues/36
108+ , ("gi-vte", set runHaddock True )
109+ , ("gi-webkit", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
110+ , ("gio", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
111+ , ("git", set doCheck False) -- https://github.com/vincenthz/hit/issues/33
64112 , ("git-annex >= 6.20170925 && < 6.20171214", set doCheck False) -- some versions of git-annex require their test suite to be run inside of a git checkout
113+ , ("git-annex", gitAnnexHook)
65114 , ("github-backup", set (executableDepends . tool . contains (pkg "git")) True)
66− , ("git", set doCheck False) -- https://github.com/vincenthz/hit/issues/33
67− , ("gi-webkit", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
115+ , ("GLFW", over (libraryDepends . system) (Set.union (Set.fromList [bind "pkgs.xorg.libXext", bind "pkgs.xorg.libXfixes"])))
68116 , ("GlomeVec", set (libraryDepends . pkgconfig . contains (bind "self.llvmPackages.llvm")) True)
69− , ("goatee-gtk", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os /= OSX)))
117+ , ("graphviz", set (testDepends . system . contains (pkg "graphviz")) True)
70118 , ("gtk3", gtk3Hook)
119+ , ("gtkglext", gtkglextHook)
71120 , ("haddock", haddockHook) -- https://github.com/haskell/haddock/issues/511
72121 , ("hakyll", set (testDepends . tool . contains (pkg "utillinux")) True) -- test suite depends on "rev"
73122 , ("haskell-src-exts", set doCheck False)
74− , ("hspec-core >= 2.4.4", hspecCoreOverrides)
75123 , ("hfsevents", hfseventsOverrides)
76124 , ("HFuse", set phaseOverrides hfusePreConfigure)
77125 , ("hlibgit2 >= 0.18.0.14", set (testDepends . tool . contains (pkg "git")) True)
@@ -79,30 +127,34 @@ hooks =
79127 , ("holy-project", set doCheck False) -- attempts to access the network
80128 , ("hoogle", set testTarget "--test-option=--no-net")
81129 , ("hsignal < 0.2.7.4", set phaseOverrides "prePatch = \"rm -v Setup.lhs\";") -- https://github.com/amcphail/hsignal/issues/1
82− , ("hslua < 0.9.3", over (libraryDepends . each) (replace (pkg "lua") (pkg "lua5_1")))
83− , ("hslua >= 0.9.3", over (libraryDepends . each) (replace (pkg "lua") (pkg "lua5_3")))
84− , ("http-client-openssl >= 0.2.0.1", set doCheck False) -- attempts to access the network
130+ , ("hslua < 0.9.3", over (libraryDepends . system) (replace (pkg "lua") (pkg "lua5_1")))
131+ , ("hslua >= 0.9.3", over (libraryDepends . system) (replace (pkg "lua") (pkg "lua5_3")))
132+ , ("hspec-core >= 2.4.4", hspecCoreOverrides)
85133 , ("http-client", set doCheck False) -- attempts to access the network
134+ , ("http-client-openssl >= 0.2.0.1", set doCheck False) -- attempts to access the network
86135 , ("http-client-tls >= 0.2.2", set doCheck False) -- attempts to access the network
87136 , ("http-conduit", set doCheck False) -- attempts to access the network
88137 , ("imagemagick", set (libraryDepends . pkgconfig . contains (pkg "imagemagick")) True) -- https://github.com/NixOS/cabal2nix/issues/136
89− , ("include-file <= 0.1.0.2", set (libraryDepends . haskell . contains (bind "self.random")) True) -- https://github.com/Daniel-Diaz/include-file/issues/1
138+ , ("include-file <= 0.1.0.2", set (libraryDepends . haskell . contains (self "random")) True) -- https://github.com/Daniel-Diaz/include-file/issues/1
90139 , ("js-jquery", set doCheck False) -- attempts to access the network
91140 , ("libconfig", over (libraryDepends . system) (replace "config = null" (pkg "libconfig")))
92141 , ("libxml", set (configureFlags . contains "--extra-include-dir=${libxml2.dev}/include/libxml2") True)
93142 , ("liquid-fixpoint", set (executableDepends . system . contains (pkg "ocaml")) True . set (testDepends . system . contains (pkg "z3")) True . set (testDepends . system . contains (pkg "nettools")) True . set (testDepends . system . contains (pkg "git")) True . set doCheck False)
94143 , ("liquidhaskell", set (testDepends . system . contains (pkg "z3")) True)
95− , ("lzma-clib", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Windows)) . set (libraryDepends . haskell . contains (bind "self.only-buildable-on-windows")) False)
96− , ("MFlow < 4.6", set (libraryDepends . tool . contains (bind "self.cpphs")) True)
144+ , ("lzma-clib", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Windows)) . set (libraryDepends . haskell . contains (self "only-buildable-on-windows")) False)
145+ , ("MFlow < 4.6", set (libraryDepends . tool . contains (self "cpphs")) True)
97146 , ("mwc-random", set doCheck False)
98147 , ("mysql", set (libraryDepends . system . contains (pkg "mysql")) True)
99148 , ("network-attoparsec", set doCheck False) -- test suite requires network access
100149 , ("numeric-qq", set doCheck False) -- test suite doesn't finish even after 1+ days
101150 , ("opencv", opencvOverrides)
102− , ("pandoc >= 1.16.0.2", set doCheck False) -- https://github.com/jgm/pandoc/issues/2709 and https://github.com/fpco/stackage/issues/1332
103− , ("pandoc-citeproc", set doCheck False) -- https://github.com/jgm/pandoc-citeproc/issues/172
104− , ("pandoc", set jailbreak False) -- jailbreak-cabal break the build
151+ , ("pandoc >= 1.16.0.2 && < 2.5", set doCheck False) -- https://github.com/jgm/pandoc/issues/2709 and https://github.com/fpco/stackage/issues/1332
152+ , ("pandoc < 2.6", pandocPre26Overrides)
153+ , ("pandoc >= 2.6", pandocOverrides)
154+ , ("pandoc-citeproc", set doCheck False) -- https://github.com/jgm/pandoc-citeproc/issues/369
105155 , ("purescript", set doCheck False) -- test suite doesn't cope with Nix build env
156+ , ("proto-lens-protobuf-types", set (libraryDepends . tool . contains (pkg "protobuf")) True)
157+ , ("proto-lens-protoc", set (libraryDepends . tool . contains (pkg "protobuf")) True)
106158 , ("qtah-cpp-qt5", set (libraryDepends . system . contains (bind "pkgs.qt5.qtbase")) True)
107159 , ("qtah-qt5", set (libraryDepends . tool . contains (bind "pkgs.qt5.qtbase")) True)
108160 , ("readline", over (libraryDepends . system) (Set.union (pkgs ["readline", "ncurses"])))
@@ -116,26 +168,31 @@ hooks =
116168 , ("target", set (testDepends . system . contains (pkg "z3")) True)
117169 , ("terminfo", set (libraryDepends . system . contains (pkg "ncurses")) True)
118170 , ("text", set doCheck False) -- break infinite recursion
119− , ("thyme", set (libraryDepends . tool . contains (bind "self.cpphs")) True) -- required on Darwin
171+ , ("tensorflow-proto", set (libraryDepends . tool . contains (pkg "protobuf")) True)
172+ , ("thyme", set (libraryDepends . tool . contains (self "cpphs")) True) -- required on Darwin
120173 , ("twilio", set doCheck False) -- attempts to access the network
121174 , ("tz", set phaseOverrides "preConfigure = \"export TZDIR=${pkgs.tzdata}/share/zoneinfo\";")
122− , ("udev", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux))) , ("bustle", set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True)
123− , ("webkitgtk3-javascriptcore", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
175+ , ("udev", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Linux)))
124176 , ("webkitgtk3", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
177+ , ("webkitgtk3-javascriptcore", webkitgtk24xHook) -- https://github.com/haskell-gi/haskell-gi/issues/36
125178 , ("websockets", set doCheck False) -- https://github.com/jaspervdj/websockets/issues/104
126179 , ("Win32", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Windows)))
127180 , ("Win32-shortcut", over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os == Windows)))
128− , ("wxcore", set (libraryDepends . pkgconfig . contains (pkg "wxGTK")) True)
129181 , ("wxc", wxcHook)
182+ , ("wxcore", set (libraryDepends . pkgconfig . contains (pkg "wxGTK")) True)
130183 , ("X11", over (libraryDepends . system) (Set.union (Set.fromList $ map bind ["pkgs.xorg.libXinerama","pkgs.xorg.libXext","pkgs.xorg.libXrender","pkgs.xorg.libXScrnSaver"])))
131− , ("xmonad", set phaseOverrides xmonadPostInstall)
132− , ("zip-archive < 0.3.1", over (testDepends . tool) (replace (bind "self.zip") (pkg "zip")))
133− , ("zip-archive >= 0.3.1", over (testDepends . tool) (Set.union (Set.fromList [pkg "zip", pkg "unzip"]))) -- https://github.com/jgm/zip-archive/issues/35
184+ , ("xmonad >= 0.14.2", set phaseOverrides xmonadPostInstall)
185+ , ("zip-archive < 0.3.1", over (testDepends . tool) (replace (self "zip") (pkg "zip")))
186+ , ("zip-archive >= 0.3.1 && < 0.3.2.3", over (testDepends . tool) (Set.union (Set.fromList [pkg "zip", pkg "unzip"]))) -- https://github.com/jgm/zip-archive/issues/35
187+ , ("zip-archive >= 0.4", set (testDepends . tool . contains (pkg "which")) True)
134188 ]
135189
136190pkg :: Identifier -> Binding
137191pkg i = binding # (i, path # ["pkgs",i])
138192
193+self :: Identifier -> Binding
194+self i = binding # (i, path # ["self",i])
195+
139196pkgs :: [Identifier] -> Set Binding
140197pkgs = Set.fromList . map pkg
141198
@@ -145,10 +202,18 @@ bind s = binding # (i, path # is)
145202 is = map (review ident) (splitOn "." s)
146203 i = last is
147204
205+-- | @replace old new bset@ replaces the Nix binding @old@ with @new@ in the
206+-- set of bindings @bset@. If @old@ is not found in @bset@, then the function
207+-- fails with an 'error'.
148208replace :: Binding -> Binding -> Set Binding -> Set Binding
149−replace old new bs = if old `Set.member` bs then Set.insert new (Set.delete old bs) else bs
209+replace old new bs
210+ | old `Set.member` bs = Set.insert new (Set.delete old bs)
211+ | otherwise = error (unwords [ "post-process: cannot replace name binding"
212+ , show old, "by", show new
213+ , "because it's not found in set"
214+ , show bs
215+ ])
150216
151−-- TODO: I need to figure out how to conveniently replace a binding in a set.
152217gtk3Hook :: Derivation -> Derivation -- https://github.com/NixOS/cabal2nix/issues/145
153218gtk3Hook = set (libraryDepends . pkgconfig . contains (pkg "gtk3")) True
154219 . over (libraryDepends . pkgconfig) (Set.filter (\b -> view localName b /= "gtk3"))
@@ -162,17 +227,15 @@ haddockHook = set doCheck False
162227gitAnnexHook :: Derivation -> Derivation
163228gitAnnexHook = set phaseOverrides gitAnnexOverrides
164229 . over (executableDepends . system) (Set.union buildInputs)
165− . over (metaSection . platforms) (Set.filter (\(Platform _ os) -> os /= OSX))
166230 where
167231 gitAnnexOverrides = unlines
168232 [ "preConfigure = \"export HOME=$TEMPDIR; patchShebangs .\";"
169− , "installPhase = \"make PREFIX=$out BUILDER=: install\";"
170− , "checkPhase = ''"
233+ , "postBuild = ''"
171234 , " ln -sf dist/build/git-annex/git-annex git-annex"
172235 , " ln -sf git-annex git-annex-shell"
173− , " export PATH+=\":$PWD\""
174− , " git-annex test"
175236 , "'';"
237+ , "installPhase = \"make PREFIX=$out BUILDER=: install install-completions\";"
238+ , "checkPhase = ''PATH+=\":$PWD\" git-annex test'';"
176239 , "enableSharedExecutables = false;"
177240 ]
178241 buildInputs = pkgs ["git","rsync","gnupg","curl","wget","lsof","openssh","which","bup","perl"]
@@ -193,13 +256,13 @@ gfPhaseOverrides = unlines
193256 , " sed -i \"s|numJobs (bf bi)++||\" ./Setup.hs"
194257 -- Parallel compilation fails. Disable it.
195258 , "'';"
196− , "preBuild = ''export LD_LIBRARY_PATH=`pwd`/dist/build:$LD_LIBRARY_PATH'';"
259+ , "preBuild = ''export LD_LIBRARY_PATH=`pwd`/dist/build''${LD_LIBRARY_PATH:+:}$LD_LIBRARY_PATH'';"
197260 -- The build step itself, after having built the library, needs to be able
198261 -- to find the library it just built in order to compile grammar files.
199262 ]
200263
201264wxcHook :: Derivation -> Derivation
202−wxcHook drv = drv & libraryDepends . system %~ Set.union (Set.fromList [pkg "mesa", bind "pkgs.xorg.libX11"])
265+wxcHook drv = drv & libraryDepends . system %~ Set.union (Set.fromList [pkg "libGL", bind "pkgs.xorg.libX11"])
203266 & libraryDepends . pkgconfig . contains (pkg "wxGTK") .~ True
204267 & phaseOverrides .~ wxcPostInstall (packageVersion drv)
205268 & runHaddock .~ False
@@ -229,10 +292,8 @@ darcsInstallPostInstall = unlines
229292xmonadPostInstall :: String
230293xmonadPostInstall = unlines
231294 [ "postInstall = ''"
232− , " shopt -s globstar"
233− , " mkdir -p $doc/share/man/man1"
234− , " mv \"$data/\"**\"/man/\"*[0-9] $doc/share/man/man1/"
235− , " rm \"$data/\"**\"/man/\"*"
295+ , " install -D man/xmonad.1 ''${!outputDoc}/share/man/man1/xmonad.1"
296+ , " install -D man/xmonad.hs ''${!outputDoc}/share/doc/$name/sample-xmonad.hs"
236297 , "'';"
237298 ]
238299
@@ -299,8 +360,50 @@ webkitgtk24xHook = set (libraryDepends . pkgconfig . contains (pkg "webkitgtk24x
299360opencvOverrides :: Derivation -> Derivation
300361opencvOverrides = set phaseOverrides "hardeningDisable = [ \"bindnow\" ];"
301362 . over (libraryDepends . pkgconfig) (replace (pkg "opencv") (pkg "opencv3"))
302− . set (configureFlags . contains "--with-gcc=${stdenv.cc}/bin/c++") True
303− . set (configureFlags . contains "--with-ld=${stdenv.cc}/bin/c++") True
304363
305364hspecCoreOverrides :: Derivation -> Derivation -- https://github.com/hspec/hspec/issues/330
306365hspecCoreOverrides = set phaseOverrides "testTarget = \"--test-option=--skip --test-option='Test.Hspec.Core.Runner.hspecResult runs specs in parallel'\";"
366+
367+cabal2nixOverrides :: Derivation -> Derivation
368+cabal2nixOverrides = set phaseOverrides $ unlines
369+ [ "preCheck = ''"
370+ , " export PATH=\"$PWD/dist/build/cabal2nix:$PATH\""
371+ , " export HOME=\"$TMPDIR/home\""
372+ , "'';"
373+ ]
374+
375+gtkglextHook :: Derivation -> Derivation
376+gtkglextHook = over (libraryDepends . system) (Set.union (Set.fromList deps))
377+ where
378+ deps :: [Binding]
379+ deps = bind <$> [ "pkgs.gtk2"
380+ , "pkgs.libGLU"
381+ , "pkgs.xorg.libSM"
382+ , "pkgs.xorg.libICE"
383+ , "pkgs.xorg.libXt"
384+ , "pkgs.xorg.libXmu"
385+ ]
386+
387+pandocPre26Overrides :: Derivation -> Derivation
388+pandocPre26Overrides = set phaseOverrides postInstall
389+ where
390+ postInstall = unlines [ "postInstall = ''"
391+ , " mkdir -p $out/share"
392+ , " mv $data/*/*/man $out/share/"
393+ , "'';"
394+ ]
395+
396+pandocOverrides :: Derivation -> Derivation
397+pandocOverrides = set phaseOverrides postInstall
398+ where
399+ postInstall = unlines [ "postInstall = ''"
400+ , " mkdir -p $out/share/man/man1"
401+ , " mv \"man/\"*.1 $out/share/man/man1/"
402+ , "'';"
403+ ]
404+
405+bustleOverrides :: Derivation -> Derivation
406+bustleOverrides = set (libraryDepends . pkgconfig . contains "system-glib = pkgs.glib") True
407+ . set (executableDepends . pkgconfig . contains "gio-unix = null") False
408+ . set (metaSection . license) (Known "stdenv.lib.licenses.lgpl21Plus")
409+ . set (metaSection . hydraPlatforms) allKnownPlatforms