Some CPP for Cabal API changes
This commit is contained in:
parent
03307a8cc8
commit
db3beff4f3
@ -1,3 +1,4 @@
|
||||
{-# LANGUAGE CPP #-}
|
||||
{-# LANGUAGE OverloadedStrings #-}
|
||||
{-# LANGUAGE TemplateHaskell #-}
|
||||
module Devel
|
||||
@ -228,7 +229,11 @@ devel opts passThroughArgs = do
|
||||
|
||||
-- Find out the name of our package, needed for the upcoming Stack
|
||||
-- commands
|
||||
#if MIN_VERSION_Cabal(1, 20, 0)
|
||||
cabal <- D.findPackageDesc "."
|
||||
#else
|
||||
cabal <- D.tryFindPackageDesc "."
|
||||
#endif
|
||||
gpd <- D.readPackageDescription D.normal cabal
|
||||
let pd = D.packageDescription gpd
|
||||
D.PackageIdentifier (D.PackageName packageName) _version = D.package pd
|
||||
|
||||
Loading…
Reference in New Issue
Block a user