dgit-repos-server: wip, upload-pack

[dgit.git] / dgit-repos-server

diff --git a/dgit-repos-server b/dgit-repos-server
index 31a44f3fe75c9f384c50e6f7633b085e7052b3e9..e6b2dfbb2b64893f64ce68337e24e7176094424e 100644 (file)
--- a/dgit-repos-server
+++ b/dgit-repos-server
@@ -393,6 +393,16 @@ sub stunthook () {
     onwardpush();
 }
 
+#----- git-upload-pack -----
+
+sub fixmissing__git_upload_pack () {
+    $destrepo = "$dgitrepos/_empty";
+}
+
+sub main__git_upload_pack () {
+    runcmd qw(git upload-pack), $destdir;
+}
+
 #----- arg parsing and main program -----
 
 sub argval () {