From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 9 Oct 2013 00:45:37 +0000 (+0100)
Subject: implement initiator_expect
X-Git-Tag: debian/0.16_experimental2^2~18
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=e8b6fa044b8df746e84aa034a44d7c96156cc546;p=dgit.git

implement initiator_expect
---

diff --git a/TODO b/TODO
index 58905973..7a3d6883 100644
--- a/TODO
+++ b/TODO
@@ -1,3 +1,5 @@
+implement i_resp_*
+
 --gpg= etc. @gpg should be in manual
 should pass @gpg to debsign
 --ssh= etc. @ssh should be in manual
diff --git a/dgit b/dgit
index 84823813..381b7311 100755
--- a/dgit
+++ b/dgit
@@ -233,7 +233,10 @@ sub responder_receive_files ($@) {
 
 #---------- remote protocol support, initiator ----------
 
-
+sub initiator_expect (&) {
+    my ($match) = @_;
+    protocol_expect \*RO, &$match;
+}
 
 #---------- end remote code ----------