Commit | Line | Data |
---|---|---|
eafe3d52 AC |
1 | structure Sign = Request(struct |
2 | val table = "Sign" | |
3 | val adminGroup = "server" | |
4 | fun subject _ = "SSL certificate signing request" | |
5 | val template = "sign" | |
6 | val descr = "SSL certificate signing" | |
7 | ||
8 | fun body (mail, data) = | |
9 | (Mail.mwrite (mail, " Request: "); | |
10 | Mail.mwrite (mail, data); | |
11 | Mail.mwrite (mail, "\n")) | |
12 | end) |