summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-07-31 21:12:58 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-07-31 21:12:58 -0400
commitb9afb7785e84ba03cb44a9b6962dbd01feaa4aae (patch)
tree24b782f3a629a7aa924c2ff724159d64543804bb
parente81e8913d9c663cbe680224e6237433e7508e7d3 (diff)
typo
-rw-r--r--Assistant/WebApp/Configurators.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/WebApp/Configurators.hs b/Assistant/WebApp/Configurators.hs
index d646e6fb7..69108e46e 100644
--- a/Assistant/WebApp/Configurators.hs
+++ b/Assistant/WebApp/Configurators.hs
@@ -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