shrub/gen/gmail/send.hoon

::
::::  /hoon/send/gmail/gen
  ::
/?    310
/-    rfc
:-  %say
|=  {^ {to/tape subject/tape opt/$@($~ {mess/tape $~})} _from="urbit-test@gmail.com"}
:-  %gmail-req
:^  %post  /messages/'send'  ~['uploadType'^'simple']
^-  message:rfc
=+  parse-adr=;~((glue pat) (cook crip (star ;~(less pat next))) (cook crip (star next)))
:+  (scan from parse-adr)
  (scan to parse-adr)
[(crip subject) ?~(opt '' (crip mess.opt))]
add +gmail-list, :gmail\|send 2016-02-24 06:55:55 +03:00			`::`
			`:::: /hoon/send/gmail/gen`
			`::`
			`/? 310`
			`/- rfc`
			`:- %say`
abstract and fix email sending 2016-04-15 04:36:48 +03:00			`\|= {^ {to/tape subject/tape opt/$@($~ {mess/tape $~})} _from="urbit-test@gmail.com"}`
add +gmail-list, :gmail\|send 2016-02-24 06:55:55 +03:00			`:- %gmail-req`
			`:^ %post /messages/'send' ~['uploadType'^'simple']`
			`^- message:rfc`
			`=+ parse-adr=;~((glue pat) (cook crip (star ;~(less pat next))) (cook crip (star next)))`
			`:+ (scan from parse-adr)`
			`(scan to parse-adr)`
abstract and fix email sending 2016-04-15 04:36:48 +03:00			`[(crip subject) ?~(opt '' (crip mess.opt))]`