diff --git a/pkg/base-dev/mar/story-diff.hoon b/pkg/base-dev/mar/story-diff.hoon new file mode 100644 index 000000000..17d417d36 --- /dev/null +++ b/pkg/base-dev/mar/story-diff.hoon @@ -0,0 +1,16 @@ +:: +:::: + :: +/- *story +|_ =story-diff +:: +++ grad %noun +++ grow + |% + ++ noun story-diff + -- +++ grab :: convert from + |% + ++ noun ^story-diff :: make from %noun + -- +-- diff --git a/pkg/base-dev/mar/story.hoon b/pkg/base-dev/mar/story.hoon index 4441dba1d..57051ca69 100644 --- a/pkg/base-dev/mar/story.hoon +++ b/pkg/base-dev/mar/story.hoon @@ -2,8 +2,6 @@ /+ *story !: |_ tale=story -+$ story-diff [additions=story deletions=story] -:: ++ grad |% ++ form %story-diff diff --git a/pkg/base-dev/sur/story.hoon b/pkg/base-dev/sur/story.hoon index f3aff0417..1336a616b 100644 --- a/pkg/base-dev/sur/story.hoon +++ b/pkg/base-dev/sur/story.hoon @@ -1,8 +1,9 @@ ^? |% -+$ prose [title=@t body=@t] -+$ proses (set prose) -+$ story (jug tako:clay prose) :: set len > 1 means conflicting messages have been assigned -+$ chapter [tako:clay proses] :: prose entry type -+$ cash $%([%tako p=tako:clay] case) :: used in generators to accept a tako directly as well ++$ prose [title=@t body=@t] ++$ proses (set prose) ++$ story (jug tako:clay prose) :: set len > 1 means conflicting messages have been assigned ++$ chapter [tako:clay proses] :: prose entry type ++$ cash $%([%tako p=tako:clay] case) :: used in generators to accept a tako directly as well ++$ story-diff [additions=story deletions=story] -- \ No newline at end of file