diff --git a/gen/cat.hoon b/gen/cat.hoon index d9386191a..3049c8857 100644 --- a/gen/cat.hoon +++ b/gen/cat.hoon @@ -9,7 +9,7 @@ :::: :: :- %say -|= {^ {arg/(list path)} vane/?($c $g)} +|= {^ {arg/(list path)} vane/?($g $c)} =- tang+(flop `tang`(zing -)) %+ turn arg |= pax/path diff --git a/gen/hood/begin.hoon b/gen/hood/begin.hoon index 6b6b27c3a..977de7ecf 100644 --- a/gen/hood/begin.hoon +++ b/gen/hood/begin.hoon @@ -17,7 +17,7 @@ :- %ask |= $: {now/@da eny/@uvJ bec/beak} {arg/_(scug *@ *{his/@p tic/@p $~})} - safety/?($on $off) + safety/?($off $on) == ^- (sole-result (cask begs)) ?. =(safety %off) diff --git a/gen/hood/merge.hoon b/gen/hood/merge.hoon index 95a52253a..53e3d01a6 100644 --- a/gen/hood/merge.hoon +++ b/gen/hood/merge.hoon @@ -15,11 +15,11 @@ :: :- %say |= $: {now/@da eny/@uvJ bek/beak} - {arg/{?(sorc {syd/$@(desk beaky) sorc})} cas/case gem/?($auto germ)} + {arg/{?(sorc {syd/$@(desk beaky) sorc})} cas/case gem/?(germ $auto)} == =* our p.bek |^ :- %kiln-merge - ^- {syd/desk her/ship sud/desk cas/case gem/?($auto germ)} + ^- {syd/desk her/ship sud/desk cas/case gem/?(germ $auto)} ?- arg {@ @ $~} =+(arg [sud ?.(=(our her) her (sein her)) sud (opt-case da+now) gem]) diff --git a/gen/ls.hoon b/gen/ls.hoon index 192ad584f..c476c3c0f 100644 --- a/gen/ls.hoon +++ b/gen/ls.hoon @@ -9,6 +9,6 @@ :: ~& % :- %say -|= {^ {arg/path $~} vane/?($c $g)} +|= {^ {arg/path $~} vane/?($g $c)} =+ lon=.^(arch (cat 3 vane %y) arg) tang+[?~(dir.lon leaf+"~" (subdir vane arg dir.lon))]~ diff --git a/gen/ls/subdir.hoon b/gen/ls/subdir.hoon index 8b1cbe7d8..6bef2d4c8 100644 --- a/gen/ls/subdir.hoon +++ b/gen/ls/subdir.hoon @@ -5,7 +5,7 @@ /? 310 |% ++ subdir - |= {vane/?($c $g) pax/path des/(map @t $~)} + |= {vane/?($g $c) pax/path des/(map @t $~)} ^- tank :+ %rose [" " `~] %+ turn (sort ~(tap by des) aor) diff --git a/gen/twit/feed.hoon b/gen/twit/feed.hoon index 999f6f4d2..a22ce7a00 100644 --- a/gen/twit/feed.hoon +++ b/gen/twit/feed.hoon @@ -11,7 +11,7 @@ :: :- %say |= $: {now/@da eny/@uvJ bek/beak} - {{who/iden $~} typ/?($home $user)} + {{who/iden $~} typ/?($user $home)} == =+ pax=/(scot %p p.bek)/twit/(scot %da now)/[typ]/[who] :- %tang diff --git a/gen/womb/shop.hoon b/gen/womb/shop.hoon index f9138d0e8..9426f43c2 100644 --- a/gen/womb/shop.hoon +++ b/gen/womb/shop.hoon @@ -5,7 +5,7 @@ /? 310 :- %say |= $: {now/@da eny/@uvJ bec/beak} - arg/$@($~ {typ/?($stars $planets $galaxies) $~}) + arg/$@($~ {typ/?($planets $galaxies $stars) $~}) who/(unit @p) == ?~ arg $(arg ~[typ=%planets])