+ if (!strcasecmp(cmd, "subscribe")) {
+ serv_printf("SUBS subscribe|%s|%s|digest|%s/listsub",
+ room,
+ email,
+ WC->http_host
+ );
+ serv_gets(buf);
+ if (buf[0] == '2') {
+ wprintf("<CENTER><H1>Confirmation request sent</H1>"
+ "You are subscribing <TT>");
+ escputs(email);
+ wprintf("</TT> to the "");
+ escputs(room);
+ wprintf("" mailing list. The listserver has "
+ "sent you an e-mail with one additional "
+ "Web link for you to click on to confirm "
+ "your subscription. This extra step is for "
+ "your protection, as it prevents others from "
+ "being able to subscribe you to lists.<BR><BR>"
+ "Please click on the link which is being "
+ "e-mailed to you and your subscription will "
+ "be confirmed.<BR></CENTER>\n"
+ );
+ }
+ else {
+ wprintf("<FONT SIZE=+1>ERROR: </FONT>%s<BR><BR>\n",
+ &buf[4]);
+ goto FORM;
+ }