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

typos

Browse source
This commit is contained in:
Joey Hess 2012-09-06 13:51:44 -04:00
parent 682ae30a08
commit ec23eeb9eb
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Build/InstallDesktopFile.hs
View file

@ -97,9 +97,9 @@ writeOSXDesktop command = do
ifM isRoot ifM isRoot
( return () ( return ()
, do , do
let commandfile <- home </> "Desktop" </> "git-annex-webapp.command" let commandfile = home </> "Desktop" </> "git-annex-webapp.command"
writeFile commandfile $ unwords [command, "webapp"] writeFile commandfile $ unwords [command, "webapp"]
mode <- fileMode <$> getFileStatus f mode <- fileMode <$> getFileStatus commandfile
setFileMode commandfile $ mode `unionFileModes` ownerExecuteMode setFileMode commandfile $ mode `unionFileModes` ownerExecuteMode
) )