aboutsummaryrefslogtreecommitdiff
path: root/Build
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-05-16 20:04:05 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-05-16 20:11:55 -0400
commitc08edac41508431ba5b4e4668d061ef5781cb584 (patch)
tree83ff0b426661de2ecb8ad848ff5e539724ba0e08 /Build
parent16bd051459e13bdd38c2282dc7efaaa46a3ae0ad (diff)
typo
Diffstat (limited to 'Build')
-rw-r--r--Build/NullSoftInstaller.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Build/NullSoftInstaller.hs b/Build/NullSoftInstaller.hs
index 1d2ac1573..eac55c8b9 100644
--- a/Build/NullSoftInstaller.hs
+++ b/Build/NullSoftInstaller.hs
@@ -34,7 +34,7 @@ main = do
let gitannex = tmpdir </> "git-annex.exe"
mustSucceed "ln" [File "dist/build/git-annex/git-annex.exe", File gitannex]
let license = tmpdir </> "git-annex-licenses.txt"
- mustSucceed "sh" [Param "-c", Param "zcat standalone/licences.gz >" ++ license]
+ mustSucceed "sh" [Param "-c", Param $ "zcat standalone/licences.gz > '" ++ license ++ "'"]
writeFile nsifile $ makeInstaller gitannex license
mustSucceed "C:\\Program Files\\NSIS\\makensis" [File nsifile]
removeFile nsifile -- left behind if makensis fails
@@ -44,7 +44,7 @@ main = do
r <- boolSystem cmd params
case r of
True -> return ()
- False -> error $ cmd ++ "failed"
+ False -> error $ cmd ++ " failed"
installer :: FilePath
installer = "git-annex-installer.exe"
@@ -76,7 +76,7 @@ makeInstaller gitannex license = nsis $ do
-- Pages to display
page Directory -- Pick where to install
- page License license
+ page $ License license
page InstFiles -- Give a progress bar while installing
-- Groups of files to install
section "programs" [] $ do