diff options
| -rw-r--r-- | Remote/S3.hs | 5 | ||||
| -rw-r--r-- | debian/changelog | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/Remote/S3.hs b/Remote/S3.hs index 7df1c2df3..5db5b705d 100644 --- a/Remote/S3.hs +++ b/Remote/S3.hs @@ -5,7 +5,7 @@ - Licensed under the GNU GPL version 3 or higher. -} -module Remote.S3 (remote, iaHost, isIAHost) where +module Remote.S3 (remote, iaHost, isIA, isIAHost, iaItemUrl) where import Network.AWS.AWSConnection import Network.AWS.S3Object @@ -283,3 +283,6 @@ isIA c = maybe False isIAHost (M.lookup "host" c) isIAHost :: HostName -> Bool isIAHost h = ".archive.org" `isSuffixOf` map toLower h + +iaItemUrl :: String -> String +iaItemUrl bucket = "http://archive.org/details/" ++ bucket diff --git a/debian/changelog b/debian/changelog index 31c53be58..c61579885 100644 --- a/debian/changelog +++ b/debian/changelog @@ -35,6 +35,8 @@ git-annex (4.20130418) UNRELEASED; urgency=low * webapp: Can now set up Internet Archive repositories. * S3: Dropping content from the Internet Archive doesn't work, but their API indicates it does. Always refuse to drop from there. + * webapp: Display some additional information about a repository on its edit + page. -- Joey Hess <joeyh@debian.org> Thu, 18 Apr 2013 16:22:48 -0400 |