typo
This commit is contained in:
parent
e81e8913d9
commit
b9afb7785e
1 changed files with 1 additions and 1 deletions
|
@ -106,7 +106,7 @@ defaultRepositoryPath = do
|
|||
home <- myHomeDir
|
||||
if home == cwd
|
||||
then ifM (doesDirectoryExist $ home </> "Desktop")
|
||||
(return "~/Desktop/annex", return "~")
|
||||
(return "~/Desktop/annex", return "~/annex")
|
||||
else return cwd
|
||||
|
||||
addRepositoryForm :: Form RepositoryPath
|
||||
|
|
Loading…
Add table
Reference in a new issue