automate uploading released tarballs to archive.org

diff --git a/Build/DistributionUpdate.hs b/Build/DistributionUpdate.hs
index 273d442274fd34a2c9c31124b22ee0590af54b8e..8260881d12ac964e4b79ff1eb97673be4ef7d509 100644 (file)
--- a/Build/DistributionUpdate.hs
+++ b/Build/DistributionUpdate.hs
@@ -69,6 +69,7 @@ main = do
        Annex.eval state $ do
                buildrpms topdir updated
                makeinfos updated version
+       syncToArchiveOrg
 
 -- Download a build from the autobuilder, virus check it, and return its
 -- version.
@@ -241,3 +242,13 @@ buildrpms topdir l = do
                ("git-annex-standalone-" ++ tararch ++ ".tar.gz") `isSuffixOf` f
        script = topdir </> "standalone" </> "rpm" </> "rpmbuild-from-standalone-tarball"
        rpmrepo = "git-annex/linux/current/rpms"
+
+-- My .mrconfig is configured to copy new files to archive.org,
+-- and moves old versions of content to archive.org to free up space on my
+-- server.
+syncToArchiveOrg :: IO ()
+syncToArchiveOrg = void $ boolSystem "mr" 
+       [ Param "-d"
+       , File "/srv/web/downloads.kitenet.net"
+       , Param "update"
+       ]

diff --git a/doc/forum/standalone_tarballs_for_specific_versions/comment_3_9002aa86c44c19f28ab74724daad5422._comment b/doc/forum/standalone_tarballs_for_specific_versions/comment_3_9002aa86c44c19f28ab74724daad5422._comment
new file mode 100644 (file)
index 0000000..d89d48c
--- /dev/null
+++ b/doc/forum/standalone_tarballs_for_specific_versions/comment_3_9002aa86c44c19f28ab74724daad5422._comment
@@ -0,0 +1,11 @@
+[[!comment format=mdwn
+ username="joey"
+ subject="""comment 3"""
+ date="2020-03-04T16:25:55Z"
+ content="""
+That file had not been uploaded to archive.org, so there was no archive.org
+url available for it.
+
+What I'll do is automate the upload to archive.org after each release,
+so the tarballs should usually be available from there, barring some breakage.
+"""]]