fix comment ownership

This commit is contained in:
Philip C Monk 2015-09-08 19:31:42 -04:00
parent 1b10c2e204
commit 30e1b9e9a4
3 changed files with 5 additions and 4 deletions

View File

@ -83,7 +83,7 @@
|= up=update
^+ +>
?- -.up
%add ?>(?=(%comment +<.up) (send-change %add-comment +>.up))
%add ?>(?=(%comment +<.up) (send-change %add-comment our +>.up))
%doer
?- +<.up
%release (send-change %set-doer ~)
@ -258,7 +258,7 @@
%set-done tax.u.tax(done ?.(don.meat.action ~ `when))
%add-comment
%= tax.u.tax
discussion [[when her com.meat.action] discussion.tax.u.tax]
discussion [[when [who com]:meat.action] discussion.tax.u.tax]
==
==
=+ ooo=(~(get by unordered) id.action +(version.action))

View File

@ -52,7 +52,8 @@
%set-tags =+(feh "{(tr-term -.feh)} {<tag>}")
%set-title =+(feh "{(tr-term -.feh)} {<(trip til)>}")
%set-description =+(feh "{(tr-term -.feh)} {<(trip des)>}")
%add-comment =+(feh "{(tr-term -.feh)} {<(trip com)>}")
%add-comment =+ feh
"{(tr-term -.feh)} {(scow %p who)} {<(trip com)>}"
==
--
--

View File

@ -93,7 +93,7 @@
[%set-title til=@t] :: set title
[%set-description des=@t] :: XX (list ,@t) :: set description
[%set-done don=?] :: set done
[%add-comment com=@t] :: XX (list ,@t) :: add comment
[%add-comment who=@p com=@t] :: XX (list ,@t) :: add comment
== ::
++ task ::
$: id=@uvH ::