urbit/gen/hood/ask.hoon
2016-10-21 16:44:39 -07:00

12 lines
288 B
Plaintext

:: Request a planet from Tlon Inc.
::
:::: /hoon/ask/hood/gen
::
/? 310
:- %say
|= {^ {mel/cord $~} $~}
=+ adr=(star ;~(less (mask "\"\\()[],:;<>@") prn))
=+ dom=[;~(plug dlab dot (most dot dlab))]:urlp
=+ ~|(bad-email+mel (rash mel ;~((glue pat) adr dom)))
helm-send-ask+mel