aboutsummaryrefslogtreecommitdiff
path: root/Locations.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-09-18 17:50:07 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-09-18 17:50:07 -0400
commit18bae020ede6770dfbe00a3335c0e9f8b7f7fdf6 (patch)
tree74eb967c26258c40649e80d8992aee556b04f6f0 /Locations.hs
parent467844d7d3f703f99fcde1f951f33efda5e90074 (diff)
make other repositories list list all autostarted repos
And add a form to add another, unrelated repository
Diffstat (limited to 'Locations.hs')
-rw-r--r--Locations.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/Locations.hs b/Locations.hs
index 3e278dcbb..397081cc4 100644
--- a/Locations.hs
+++ b/Locations.hs
@@ -27,6 +27,7 @@ module Locations (
gitAnnexDaemonStatusFile,
gitAnnexLogFile,
gitAnnexHtmlShim,
+ gitAnnexUrlFile,
gitAnnexSshDir,
gitAnnexRemotesDir,
gitAnnexAssistantDefaultDir,
@@ -167,6 +168,10 @@ gitAnnexLogFile r = gitAnnexDir r </> "daemon.log"
gitAnnexHtmlShim :: Git.Repo -> FilePath
gitAnnexHtmlShim r = gitAnnexDir r </> "webapp.html"
+{- File containing the url to the webapp. -}
+gitAnnexUrlFile :: Git.Repo -> FilePath
+gitAnnexUrlFile r = gitAnnexDir r </> "url"
+
{- .git/annex/ssh/ is used for ssh connection caching -}
gitAnnexSshDir :: Git.Repo -> FilePath
gitAnnexSshDir r = addTrailingPathSeparator $ gitAnnexDir r </> "ssh"