cgi: implement get_mid_txt

This is essential when telling people to use something like:
	curl $URL | git am

1 files changed, 10 insertions, 0 deletions

diff --git a/t/cgi.t b/t/cgi.t
index 3ba74f30..a19f2cf1 100644
--- a/t/cgi.t
+++ b/t/cgi.t
@@ -122,6 +122,16 @@ EOF
         # more checks in t/feed.t
 }
 
+
+{
+        local $ENV{HOME} = $home;
+        my $res = cgi_run("/test/m/blahblah\@example.com.txt");
+        like($res->{body}, qr/Message-Id: <blahblah\@example\.com>/,
+                "mid.txt hit");
+        $res = cgi_run("/test/m/blahblah\@example.con.txt");
+        like($res->{head}, qr/Status: 404 Not Found/, "mid.txt miss");
+}
+
 done_testing();
 
 sub run_with_env {