mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

Setup: avoid trying to install man pages and desktop files on Windows

Browse source
This commit is contained in:
Joey Hess 2016-05-05 16:05:27 -04:00
parent f9f5860590
commit 55eec1b72a
Failed to extract signature
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Setup.hs
View file

@ -15,6 +15,7 @@ import Control.Monad
import System.Directory import System.Directory
import Data.List import Data.List
import Control.Exception import Control.Exception
import qualified System.Info
import qualified Build.DesktopFile as DesktopFile import qualified Build.DesktopFile as DesktopFile
import qualified Build.Configure as Configure import qualified Build.Configure as Configure
@ -28,7 +29,7 @@ main = defaultMainWithHooks simpleUserHooks
} }
myPostCopy :: Args -> CopyFlags -> PackageDescription -> LocalBuildInfo -> IO () 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 installGitAnnexShell dest verbosity pkg lbi
installManpages dest verbosity pkg lbi installManpages dest verbosity pkg lbi
installDesktopFile dest verbosity pkg lbi installDesktopFile dest verbosity pkg lbi