remove %set %doer

ape/work.hoon

@@ -13,9 +13,6 @@
 ::
 ::  audience stuff seems messed up from talk?  get extraneous stations
 ::
-::  first thing to do is obviously make process-duty accept stuff out
-::    of order
-::
 ::::
   ::
 /?  314
@@ -98,15 +95,14 @@
     ^+  +>
     ?-    -.up
         %add  ?>(?=(%comment +<.up) (send-change %add-comment +>.up))
-        %own
+        %doer
       ?-  +<.up
-        %announce  (send-change %set-doer ~)
-        %claim     (send-change %set-doer `our)
+        %release  (send-change %set-doer ~)
+        %claim    (send-change %set-doer `our)
       ==
     ::
         %set
       ?-  +<.up
-        %doer         (send-change %set-doer +>.up)
         %date-due     (send-change %set-date-due +>.up)
         %title        (send-change %set-title +>.up)
         %description  (send-change %set-description +>.up)

mar/work/command.hoon

@@ -68,7 +68,7 @@
     ++  stan  (su ;~((glue fas) ;~(pfix sig fed:ag) urs:ab))
     ++  uppd
       %-  of  :~
-        own/(of announce/ul claim/ul ~)
+        doer/(of release/ul claim/ul ~)
         add/(of comment/so ~)
         :-  %set
         %-  of  :~

sur/work.hoon

@@ -36,8 +36,7 @@
   ==
 ++  update
   $%  $:  %set
-  $%  [%doer p=(unit ,@p)]
-      [%date-due p=(unit ,@da)]
+  $%  [%date-due p=(unit ,@da)]
       [%title p=@t]
       [%description p=@t]
       [%tags p=(set ,@t)]
@@ -46,8 +45,8 @@
       $:  %add
   $%  [%comment @t]
   ==  ==
-      $:  %own
-  $%  [%announce ~]
+      $:  %doer
+  $%  [%release ~]
       [%claim ~]
   ==  ==
   ==