mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-30 10:27:11 +03:00
890d6b4944
* release/next-vere: build: update gcloud to use non-deprecated action vere: manage memory properly in _fore_import build: update GoogleCloudPlatform/github-actions/setup-gcloud to 0.2.0 king: try undoing warnings in eventlog-lmdb king: diswarn tests king: more warnery king: fix warnings; more consistent warn policy vere: add -i and -o options for import and export herb/lens: add utilites for import/export vere: refactors pier initialization to fix -X king: fix test (daaad) king: fix warnings in Tree (thanks dad) king: this is a holdup!
72 lines
1.5 KiB
Plaintext
72 lines
1.5 KiB
Plaintext
/- lens
|
|
|_ com/command:lens
|
|
++ grad %noun
|
|
++ grow
|
|
|%
|
|
++ noun com
|
|
--
|
|
++ grab
|
|
|%
|
|
++ noun command:lens
|
|
++ json
|
|
|= jon/^json
|
|
^- command:lens
|
|
~| jon=jon
|
|
%- need
|
|
%. jon
|
|
=< %- ot :~
|
|
source+source
|
|
sink+sink
|
|
==
|
|
=, dejs-soft:format
|
|
|%
|
|
++ source
|
|
^- $-(^^json (unit source:lens))
|
|
|= jon/^^json
|
|
=+ tuple=%.(jon (ar source))
|
|
?^ tuple
|
|
`[%tuple u.tuple]
|
|
%. jon
|
|
%- of :~
|
|
data+so
|
|
dojo+so
|
|
clay+so
|
|
url+(su auri:de-purl:html)
|
|
api+(su ;~(plug sym ;~(pfix col prn)))
|
|
:- %get-api
|
|
%- su
|
|
;~ plug
|
|
sym
|
|
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
|
|
==
|
|
listen-api+(su ;~(plug sym ;~(pfix col sym)))
|
|
export+so
|
|
import+(ot app+so base64-jam+so ~)
|
|
export-all+none
|
|
import-all+(ot base64-jam+so ~)
|
|
as+(ot mark+(su sym) next+source ~)
|
|
hoon+(ot code+so next+source ~)
|
|
==
|
|
++ none |=(^^json (some ~))
|
|
++ sink
|
|
^- $-(^^json (unit sink:lens))
|
|
%- of :~
|
|
stdout+none
|
|
output-file+so
|
|
output-pill+so
|
|
output-clay+(su (easy /sentinel/path))
|
|
url+(su auri:de-purl:html)
|
|
to-api+(su ;~(plug sym ;~(pfix col prn)))
|
|
:- %send-api
|
|
%- su
|
|
;~ plug
|
|
sym
|
|
;~(pfix col (more fas (cook crip (star ;~(less fas prn)))))
|
|
==
|
|
command+so
|
|
app+(su sym)
|
|
==
|
|
--
|
|
--
|
|
--
|