diff --git a/mar/work/command.hoon b/mar/work/command.hoon index 1409b282a..323412ba3 100644 --- a/mar/work/command.hoon +++ b/mar/work/command.hoon @@ -17,7 +17,7 @@ |* a=fist %- cu :_ (ar a) ~(gas in *(set ,_(need *a))) - ++ id (ci (slat %uw) so) + ++ id (ci (slat %uv) so) ++ ship (su fed:ag) ++ coma (of new/task old/(ot id/id dif/uppd ~) sort/(ar id) ~) ++ task @@ -50,7 +50,7 @@ -- -- :: {new: { -:: id:'0waoF.6Df9U.2-gc3.dXDP1', +:: id:'0vaof.6df9u.2agc3.d0dp1', :: date-created:1440011611215, :: version:1, :: date-modified:1440011611215, diff --git a/mar/work/task.hoon b/mar/work/task.hoon index bff407ba5..4490c89e2 100644 --- a/mar/work/task.hoon +++ b/mar/work/task.hoon @@ -47,7 +47,7 @@ ++ grab |% ++ txt |= a=wain ^+ taz - =+ ~[id=%uw "_" date-created=%da " " version=%ud date-modified=%da] + =+ ~[id=%uv "_" date-created=%da " " version=%ud date-modified=%da] =^ b a (advance a ;~(plug (parse -) (punt (parse " " %da ~)))) =+ [-.b `due-date=(unit ,@da)`+.b] =^ tags a (undent a ~(gas in *(set cord))) @@ -73,7 +73,7 @@ ++ txt =+ taz =+ due=?~(due-date ~ ~[' ' da/u.due-date]) - :- (rend uw/id '_' da/date-created ' ' ud/version da/date-modified due) + :- (rend uv/id '_' da/date-created ' ' ud/version da/date-modified due) %+ welp (indent (sort (~(tap in tags)) aor)) :- title :- (rend p/owner '.' tas/status ~) diff --git a/pub/work/test.work-task b/pub/work/test.work-task index a364bb2a1..c5edc1b62 100644 --- a/pub/work/test.work-task +++ b/pub/work/test.work-task @@ -1,4 +1,4 @@ -0w0_~1999.1.1 2~1999.1.2 ~1999.5.20 +0v0_~1999.1.1 2~1999.1.2 ~1999.5.20 Tagged! Yoooo ~fyr.gave diff --git a/sur/work.hoon b/sur/work.hoon index a9c2cd521..c6224725e 100644 --- a/sur/work.hoon +++ b/sur/work.hoon @@ -1,15 +1,15 @@ /- talk |% ++ client - $: tasks=(map ,@uwH client-task) - sort=(list ,@uwH) + $: tasks=(map ,@uvH client-task) + sort=(list ,@uvH) == ++ client-task $: task=task audience=(set station:talk) == ++ task - $: id=@uwH + $: id=@uvH date-created=@da version=@u date-modified=@da @@ -29,8 +29,8 @@ ++ status ?(%took %gave %left) ++ command $% [%new task] - [%old id=@uwH dif=update] - [%sort p=(list ,@uwH)] + [%old id=@uvH dif=update] + [%sort p=(list ,@uvH)] == ++ update $% $: %set