Thanks Alex,
When I do it for real, I'll probably just use a number with "bits" for each
tag :) This is really for practice and hence the excessive factorization.
I still could not get the (+E/R +Chart) route to work - I just get the
> :[task.l:8] !? (mapcar 'val> (car G)) <--- line 8 is the action function
in
> task.l
for any edits :(
And regarding the (+E/R +Fmt) route - this Set function works
'((This) (mapcar '((This) (: nm nm)) This))
In the Val function, can we not query like this -
'((Nm) # Val function
(request! '(+Tag)
'tsk THETASK 'nm (request! '(+TagNm) 'nm Nm) ) )
Is there a way to get the access to the task object in the Value function?
Regards,
Kashyap
On Sat, Dec 7, 2019 at 11:00 AM Alexander Burger <[email protected]>
wrote:
> On Sat, Dec 07, 2019 at 07:57:53AM -0800, C K Kashyap wrote:
> > :[task.l:8] !? (mapcar 'val> (car G)) <--- line 8 is the action function
> in
> > task.l
> >
> > val> -- Bad message
> > I have an empty choTag function for now - I don't suppose that is
> involved
> > when I try to delete a tag.
>
> Right, this does not matter.
>
>
> > And this does not render the tags in the text field - its empty and when
> I
> > try to edit/save it I get a "Not a list error" :(
> >
> > (gui '(+E/R +Fmt +ListTextField)
> > '(tgs : home obj)
> > '((This) (: nm)) # Set function
> > '((Nm) (request! '(+Tag) 'nm Nm)) # Val function
> > '(","," ")
> > 40 )
>
> Yes, makes sense, because you have one more indirection in the model:
>
> (rel tgs (+List +Joint) tsk (+Tag))
> ....
> (class +Tag +Entity)
> (rel tsk (+Joint) tgs (+Task))
> (rel nm (+Ref +Link) NIL +TagNm)
>
> (class +TagNm +Entity)
> (rel nm (+IdxFold +String))
>
> So you probably need
>
> '((This) (: nm nm)) # Set function
>
> to get the text strings to display, and
>
> '((Nm) # Val function
> (request! '(+Tag)
> 'nm (request! '(+TagNm) 'nm Nm) ) )
>
> I think your model is a bit over-factorized ;)
>
> Also, fetching tags by name is not unique, so it is not clear *which*
> object is
> returned by 'request' if several ones with the same names exist. It seems
> to me
> that +Key instead of +Ref and +IdxFold is more appropriate here.
>
> ☺/ A!ex
>
> --
> UNSUBSCRIBE: mailto:[email protected]?subject=Unsubscribe
>