Setup: avoid trying to install man pages and desktop files on Windows
This commit is contained in:
parent
f9f5860590
commit
55eec1b72a
1 changed files with 2 additions and 1 deletions
3
Setup.hs
3
Setup.hs
|
@ -15,6 +15,7 @@ import Control.Monad
|
|||
import System.Directory
|
||||
import Data.List
|
||||
import Control.Exception
|
||||
import qualified System.Info
|
||||
|
||||
import qualified Build.DesktopFile as DesktopFile
|
||||
import qualified Build.Configure as Configure
|
||||
|
@ -28,7 +29,7 @@ main = defaultMainWithHooks simpleUserHooks
|
|||
}
|
||||
|
||||
myPostCopy :: Args -> CopyFlags -> PackageDescription -> LocalBuildInfo -> IO ()
|
||||
myPostCopy _ flags pkg lbi = do
|
||||
myPostCopy _ flags pkg lbi = when (System.Info.os /= "mingw32") $ do
|
||||
installGitAnnexShell dest verbosity pkg lbi
|
||||
installManpages dest verbosity pkg lbi
|
||||
installDesktopFile dest verbosity pkg lbi
|
||||
|
|
Loading…
Add table
Reference in a new issue