diff options
author | Joey Hess <joey@kitenet.net> | 2013-05-16 20:04:05 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-05-16 20:11:55 -0400 |
commit | c08edac41508431ba5b4e4668d061ef5781cb584 (patch) | |
tree | 83ff0b426661de2ecb8ad848ff5e539724ba0e08 /Build/NullSoftInstaller.hs | |
parent | 16bd051459e13bdd38c2282dc7efaaa46a3ae0ad (diff) |
typo
Diffstat (limited to 'Build/NullSoftInstaller.hs')
-rw-r--r-- | Build/NullSoftInstaller.hs | 6 |
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
|