From: Mark Wooding <mdw@distorted.org.uk>
Date: Sun, 5 Apr 2015 14:09:03 +0000 (+0100)
Subject: etc/config.tcl: New (better?) upload arrangements.
X-Git-Url: https://git.distorted.org.uk/~mdw/ca/commitdiff_plain/7e0f58bf390f14e3ff92dd4d260b57bd45715643

etc/config.tcl: New (better?) upload arrangements.
---

diff --git a/etc/config.tcl b/etc/config.tcl
index 1c0a16c..ee8dd31 100644
--- a/etc/config.tcl
+++ b/etc/config.tcl
@@ -34,6 +34,10 @@ set P(tls-server-longterm) {
 }
 
 proc update-hook {} {
-  exec 2>@stderr rsync -av --delete-after ca.cert crl cert req publish/
-  exec 2>@stderr userv root publish-ca
+  global env
+  if {![info exists env(CA_BODGE)]} {
+    exec 2>@stderr rsync -rtv --delete-delay \
+	ca.cert crl cert req archive \
+	sysupl-ca@stratocaster.distorted.org.uk:files/
+  }
 }