shrub/gen/hood/ask.hoon

14 lines
312 B
Plaintext
Raw Normal View History

2016-10-22 02:44:39 +03:00
:: Request a planet from Tlon Inc.
2016-02-05 05:57:44 +03:00
::
2016-02-05 06:05:37 +03:00
:::: /hoon/ask/hood/gen
2016-02-05 05:57:44 +03:00
::
/? 310
2017-11-10 03:06:58 +03:00
/+ old-zuse
=, old-zuse
:- %say
2018-03-19 07:18:20 +03:00
|= {^ {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