urbit/gen/curl.hoon
2017-11-09 16:53:30 -08:00

15 lines
238 B
Plaintext

:: Fetch contents at url
::
:::: /hoon/curl/gen
::
/? 310
/- sole
/+ old-zuse
=, old-zuse
=, sole
:- %get |= {^ {a/tape $~} $~}
^- (sole-request (cask httr))
%+ sole-at (scan a auri:urlp)
|= hit/httr
(sole-so %httr hit)