urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-20 01:01:37 +03:00
Code Issues Packages Projects Releases Wiki Activity

story: misc changes

Browse Source
This commit is contained in:
Yaseen 2022-01-26 11:41:22 -05:00
parent d8450c2892
commit 484772e2b7
3 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

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

4
pkg/arvo/gen/hood/story-set.hoon
View File

@ -11,8 +11,8 @@
::
=/ our p.bec
=? cas =(*case cas) [%da now] :: set current commit when cas not provided
=/ tak .^(tako:clay %cs /(scot %p our)/[syd]/(scot cas)/tako/~)
=/ tak .^(tako:clay %cs /(scot %p our)/[syd]/(scot cas)/tako/~)
=/ tale=story .^(story %cx /(scot %p our)/[syd]/(scot %da now)/story)
=. tale (~(put ju tale) tak prose)
=. tale (~(put ju tale) tak prose)
:- %helm-pass
[%c [%info syd %& [/story %ins story+!>(tale)]~]]

2
pkg/base-dev/mar/story.hoon
View File

@ -151,6 +151,8 @@
(just '\0a') :: parse trailing newline
==
::
:: XX TODO: implement parsing in conflicts
=/ proses-parse ~
=/ title-parser
;~ sfix :: throw away trailing newlines
(cook crip (star prn)) :: parse any number of ascii characters, turn into cord