urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2025-01-07 05:26:56 +03:00
Code Issues Packages Projects Releases Wiki Activity

dojo: fix gall scries in +to-command

Browse Source
This commit is contained in:
silnem2 2023-07-03 16:28:04 -06:00 committed by Pyry Kovanen
parent 43160147f4
commit d6362cb293
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
pkg/arvo/app/dojo.hoon
View File

@ -115,7 +115,7 @@
:: |parser-at: parsers for dojo expressions using :dir as working directory :: |parser-at: parsers for dojo expressions using :dir as working directory
:: ::
++ parser-at ++ parser-at
|= [our=ship dir=beam] |= [our=ship now=@da dir=beam]
|% |%
++ default-app %hood ++ default-app %hood
++ hoon-parser (vang | (en-beam dir)) ++ hoon-parser (vang | (en-beam dir))
@ -129,7 +129,7 @@
=/ =desk =/ =desk
::TODO maybe should recognize if the user specified a desk explicitly. ::TODO maybe should recognize if the user specified a desk explicitly.
:: currently eats the :app|desk#gen case. :: currently eats the :app|desk#gen case.
=+ gop=(en-beam dir(q q.gol, s /$)) =+ gop=/(scot %p our)/[q.gol]/(scot %da now)/$
?. .^(? %gu gop) ?. .^(? %gu gop)
q.dir q.dir
.^(desk %gd gop) .^(desk %gd gop)
@ -365,7 +365,7 @@
dir(r [%da now.hid]) dir(r [%da now.hid])
:: ::
++ he-beak `beak`[p q r]:he-beam ++ he-beak `beak`[p q r]:he-beam
++ he-parser (parser-at our.hid he-beam) ++ he-parser (parser-at our.hid now.hid he-beam)
:: ::
++ dy :: project work ++ dy :: project work
|_ dojo-project :: |_ dojo-project ::