That didn't seem to work for me.
ie. The following two lines show the same error:
view center-face layout [text-list data files]
view center-face layout [text-list data files as-is]
Anton.
> Hi Ashley,
>
> Work around for #2 is to use the AS-IS keyword.
> i.e. change the text-list to :
>
> text-list data files as-is
>
>
> Cheers Phil
>
> === Original Message ===
> 2. text-list anomalies with first entry
> files: copy []
>
> foreach file read %. [
> insert tail files reform ["o^-" file]
> ]
>
> view center-face layout [
> text 200 {Click "Area" then type two lines of text in the
> area, close and reopen the window.
> Notice how the field text has been repositioned.}
> button 200 "Area" [
> view/new center-face layout [
> field 50 "Text"
> area 50x30
> ]
> ]
> text 200 {Notice how the first tab is ignored.}
> text-list data files
> text 200 {Click rapidly with the left then right mouse buttons.
> Notice how left clicks are faster than right
> clicks [on Windoze].}
> box blue 200x50 "Click here" with [
> data: now/time/precise
> feel: make feel [
> engage: func [face action event] [
> if action = 'alt-down [
> print reform ["Right" now/time/precise -
> face/data] face/data: now/time/precise
> ]
> if action = 'down [
> print reform ["Left" now/time/precise -
> face/data] face/data: now/time/precise
> ]
> ]
> ]
> ]
> text 200 {The first result counts values within a block, the
> second the number of blocks.}
> button 200 "Load block(s)" [
> write/lines %test.dat remold [now now]
> print length? load %test.dat
> write/append/lines %test.dat remold [now now]
> print length? load %test.dat
> ]
> ]
> Regards,
>
> Ashley
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
