fix single +solid

This commit is contained in:
Anton Dyudin 2017-12-06 17:31:28 -08:00
parent c4fd65de92
commit 67034edf14

View File

@ -13,8 +13,9 @@
|= $: {now/@da eny/@uvJ bec/beak}
{arg/$@($~ {top/path $~}) dub/_|}
==
:- %noun
?~ arg $(arg ~[top=`path`/(scot %p p.bec)/[q.bec]/(scot %da now)/sys])
::
:- %noun
=+ pax=`path`(weld top.arg `path`[%hoon ~])
=+ arp=`path`(weld top.arg `path`[%ovra ~])
~& %solid-start