Got it. sorry I copied from the email. Quick follow up - I altered the tags like this -
(class +Item +Entity) (rel ttl (+IdxFold +String)) (rel tgs (+List +Joint) itm (+Tag)) (rel sts (+IdxFold +String)) (class +Tag +Entity) (rel itm (+Joint) tgs (+Item)) (rel v (+Ref +Link) NIL +TagVal) (class +TagVal +Entity) (rel nm (+IdxFold +String)) This would be better for storage right? Especially if +TagVal has additional fields such as description etc. Regards, Kashyap On Sat, Nov 23, 2019 at 9:32 AM Alexander Burger <a...@software-lab.de> wrote: > On Sat, Nov 23, 2019 at 09:10:26AM -0800, C K Kashyap wrote: > > Okay ... just to clarify. (collect 'nm '+Tag "BLUE" NIL T 'itm) is the > > recommended way to get to all items for a given Tag. > > Well, yes, but this is the previous version which I wrote in a > wrong way. > > To get all blue ones: (collect 'nm '+Tag "BLUE" "BLUE" 'itm) > And to get all: (collect 'nm '+Tag NIL T 'itm) > > ☺/ A!ex > > -- > UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe >