From a15a6f8ddc78e85d1516b1f9b3991a21db0546e8 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 28 Jun 2015 23:10:06 +0100
Subject: Infra: Add drs-cron-wrap

---
 Makefile            |  2 +-
 infra/drs-cron-wrap | 14 ++++++++++++++
 2 files changed, 15 insertions(+), 1 deletion(-)
 create mode 100755 infra/drs-cron-wrap

diff --git a/Makefile b/Makefile
index c865cc3..8f9a84f 100644
--- a/Makefile
+++ b/Makefile
@@ -36,7 +36,7 @@ PERLMODULES=Debian/Dgit.pm
 INFRA_PROGRAMS=dgit-repos-server dgit-ssh-dispatch \
 	dgit-repos-policy-debian dgit-repos-admin-debian \
 	dgit-repos-policy-trusting
-INFRA_EXAMPLES=get-dm-txt ssh-wrap
+INFRA_EXAMPLES=get-dm-txt ssh-wrap drs-cron-wrap
 INFRA_PERLMODULES=Debian/Dgit/Policy/Debian.pm
 
 all:
diff --git a/infra/drs-cron-wrap b/infra/drs-cron-wrap
new file mode 100755
index 0000000..52e819b
--- /dev/null
+++ b/infra/drs-cron-wrap
@@ -0,0 +1,14 @@
+#!/bin/sh
+set -e
+umask 002
+
+distro=$1; shift
+
+srvdir=/srv/dgit.debian.org
+dispatchdir=$srvdir/dispatch-dir
+dgitlive=$srvdir/dgit-live
+
+distrodir=$dispatchdir/distro=$distro
+
+PERLLIB="$dgitlive${PERLLIB+:}${PERLLIB}" \
+exec $dgitlive/infra/dgit-repos-server $distro $distrodir '' --cron
-- 
cgit v1.2.3