ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-21 05:41:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

story: misc changes

Browse Source
This commit is contained in:
Yaseen 2022-01-25 14:54:30 -05:00
parent 194f3d55c6
commit 86ef82dbe1
3 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkg/arvo/gen/hood/story-init.hoon
View File

@ -11,10 +11,9 @@
:: ::
=/ our p.bec =/ our p.bec
=? desk =(*^desk desk) q.bec :: use current desk if user didn't provide =? desk =(*^desk desk) q.bec :: use current desk if user didn't provide
=/ existing-story .^(? %cu /(scot %p our)/[desk]/(scot %da now)/story):: =/ existing-story .^(? %cu /(scot %p our)/[desk]/(scot %da now)/story)
?: ?&(existing-story !overwrite) ?: ?&(existing-story !overwrite)
~& "Error: {<desk>}/story already exists. Set the optional parameter `overwrite` to `%.y` to forcibly wipe" ~& "Error: {<desk>}/story already exists. Set the optional parameter `overwrite` to `%.y` to forcibly wipe"
:: XX dumb hack to no-op because apparently type system doesn't like it when you mix %kiln-info and %helm-pass
:- %helm-pass [%d %noop ~] :- %helm-pass [%d %noop ~]
=| tale=story =| tale=story
:- %helm-pass :- %helm-pass

1
pkg/arvo/gen/hood/story-remove.hoon
View File

@ -9,6 +9,7 @@
:: Remove a commit message to a given case on a given desk :: Remove a commit message to a given case on a given desk
:: ::
=/ our p.bec =/ our p.bec
:: XX should `base` here be syd or q.bec
=/ tak .^(tako:clay %cs /(scot %p our)/base/(scot %ud aeon)/tako/~) =/ tak .^(tako:clay %cs /(scot %p our)/base/(scot %ud aeon)/tako/~)
=/ tale=(map tako:clay [@t @t]) =/ tale=(map tako:clay [@t @t])
.^((map tako:clay [@t @t]) %cx /(scot %p our)/[syd]/(scot %da now)/story) .^((map tako:clay [@t @t]) %cx /(scot %p our)/[syd]/(scot %da now)/story)

1
pkg/arvo/gen/story-list.hoon
View File

@ -9,6 +9,7 @@
:: ::
:: List all commit messages for the given desk :: List all commit messages for the given desk
:: ::
:: TODO remove this outdated generator, superseded by story-log
=/ our p.bec =/ our p.bec
=/ tale=story .^(story %cx /(scot %p our)/[syd]/(scot %da now)/story) =/ tale=story .^(story %cx /(scot %p our)/[syd]/(scot %da now)/story)
=/ story-to-mime .^($-(story mime) %cf /(scot %p our)/[syd]/(scot %da now)/story/mime) =/ story-to-mime .^($-(story mime) %cf /(scot %p our)/[syd]/(scot %da now)/story/mime)