[REBOL] Re: auto id's for vid objects
From: tomc:darkwing:uoregon at: 15-Feb-2004 20:57
Howdy,
when using mark: (...) :mark
it only makes sense if you are changing 'mark in the paren section
otherwise the :mark can be ommited and the effect will be the same.
your any [to "button" ... to "text" ...]
is doing what you asked , not what you want
to "button" is skipping to the first button doing its thing OK
then to "text"
skipping over the secong button because the rule is asking it to skip till
it finds "text" which it slso does OK then it is back too the top of the
'any and since there ate no more "button" after the "text" it is done.
my guess is you want to wrap the to "button" ... rule in its own 'any
but be careful as nested anys are awfully easy to please (infinite loops)
something like this will work as long as all your widget types are
clustered together
rule: [
any[
to "button" mark:
(insert :mark reduce [btn button_count: button_count + 1":"{ }]
mark: skip mark 16):mark
]
any[
to "text" mark:
(insert :mark reduce [txt txt_count: txt_count + 1":"{ }]
mark: skip mark 14) :mark
]
]
HTH
On Sun, 15 Feb 2004, iNetW3 wrote:
