Just another update

This commit is contained in:
Ingy döt Net 2015-02-20 00:35:01 -05:00
parent a25938f123
commit 00a190b0a6
6591 changed files with 94363 additions and 23227 deletions

View file

@ -0,0 +1,11 @@
(require '[postal.core :refer [send-message]])
(send-message {:host "smtp.gmail.com"
:ssl true
:user your_username
:pass your_password}
{:from "you@yourdomain.com"
:to ["your_friend@example.com"]
:cc ["bob@builder.com" "dora@explorer.com"]
:subject "Yo"
:body "Testing."})

View file

@ -1,10 +1,10 @@
import std.net.curl;
void main() {
auto smtp = SMTP("smtps://smtp.gmail.com");
smtp.setAuthentication("someuser@gmail.com", "somepassword");
smtp.mailTo = ["<friend@example.com>"];
smtp.mailFrom = "<someuser@gmail.com>";
smtp.message = "Subject:test\n\nExample Message";
smtp.perform();
import std.net.curl;
auto s = SMTP("smtps://smtp.gmail.com");
s.setAuthentication("someuser@gmail.com", "somepassword");
s.mailTo = ["<friend@example.com>"];
s.mailFrom = "<someuser@gmail.com>";
s.message = "Subject:test\n\nExample Message";
s.perform;
}

View file

@ -0,0 +1,7 @@
procedure main(args)
mail := open("mailto:"||args[1], "m", "Subject : "||args[2],
"X-Note: automatically send by Unicon") |
stop("Cannot send mail to ",args[1])
every write(mail , !&input)
close (mail)
end