Mailing List Archive: Re: How do I update a text-list?

[REBOL] Re: How do I update a text-list?

From: peoyli:algonet:se at: 17-Apr-2001 19:32


Hi,

> How do I update a text-list? I can change the data it is based on, but when
> I 'show' the text-list, nothing happens. I've tried text-list/data,
> text-list/text, text-list/texts, text-list/lines, to no avail.

I got the answer to this question even if it wasn't that I asked for.. so..

[
REBOL []

fix-slider: func [faces [object! block!]] [
  foreach list to-block faces [
    either 0 = length? list/data [
      list/sld/redrag 1
    ][
      list/sld/redrag list/lc / length? list/data
    ]
  ]
]

ch: #"b"

l: layout [
  tl: text-list 100x150 data ["a"]
  button "Add something" [
    append tl/data ch
    ch: ch + 1
    fix-slider tl
    show tl
  ]
]

view center-face l
]

/PeO