Re: chart row reordering?

2008-09-17 Thread Tomas Hlavaty
Hi Alex, thank you for great explanation! Tomas -- UNSUBSCRIBE: mailto:[EMAIL PROTECTED]

Re: chart row reordering?

2008-09-17 Thread Alexander Burger
Hi Tomas, > (setq *List (; *ID it)) > > (when (nth *List *Bubble) >(xchg @ (cdr @)) ) > > (put!> *ID 'it *List) > (commit) This is correct in principle, but will not work here. The problem here is that 'put!>' always tries to detect whether the new data are different from the current state

Re: chart row reordering?

2008-09-17 Thread Tomas Hlavaty
Hi Alex, > Does the following script something close? yes, that's exactly what I am trying to achieve except how would this work with persistent objects? Assuming I have the following schema and want to change order of items "it" in a category "*ID" of type "+Cat"? (class +Cat +Entity) (rel nr

Re: chart row reordering?

2008-09-16 Thread Alexander Burger
Hi Tomas, > I would like to add a link ^ which would do the same thing as > +BubbleField button: Probably I would use the '' function. Does the following script something close? #!bin/picolisp lib.l (load "ext.l" "lib/http.l" "li

Re: chart row reordering?

2008-09-16 Thread Tomas Hlavaty
Hi Alex, > Nothing I can think of at the moment (except, as you know, the > normal administrative things like changing 3 -> 4 in the +Chart > line). oops, that was it, thanks! One more question regarding ordering. Suppose I do not use a chart but draw the objects myself in a tree-like format in

Re: chart row reordering?

2008-09-16 Thread Alexander Burger
Hi Tomas, > (class +Ord +Entity) > (rel nr (+Need +Key +Number)) > (rel pos (+List +Joint) ord (+Pos)) > > (class +Pos +Entity) > (rel ord (+Dep +Joint) (art) pos (+Ord)) Oops, sorry for the confusion! A month or so ago I noticed that "app/er.l" was not correct :-( The current "testing" releas

chart row reordering?

2008-09-15 Thread Tomas Hlavaty
Hi Alex, app/ord.l:24-52 there is chart which allows to chage the order of the rows. Could you please explain how this works? The app/er.l contains something like: (class +Ord +Entity) (rel nr (+Need +Key +Number)) (rel pos (+List +Joint) ord (+Pos)) (class +Pos +Entity) (rel ord (+Dep +Joint