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

typo

Browse source
This commit is contained in:
Joey Hess 2013-11-25 14:47:56 -04:00
parent 85a82957ea
commit ee3ff0e584
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Assistant/Upgrade.hs
View file

@ -208,7 +208,7 @@ upgradeToDistribution newdir cleanup distributionfile = do
=<< dirContents srcdir =<< dirContents srcdir
#endif #endif
sanitycheck dir = sanitycheck dir =
unlessM doesDirectoryExist $ unlessM (doesDirectoryExist dir) $
error $ "did not find " ++ dir ++ " in " ++ distributionfile error $ "did not find " ++ dir ++ " in " ++ distributionfile
makeorigsymlink olddir = do makeorigsymlink olddir = do
let origdir = parentDir olddir </> installBase let origdir = parentDir olddir </> installBase