[REBOL] Re: VID focus questions
From: brett:codeconscious at: 8-Feb-2002 19:39
I wrote:
> I noticed the back-field problem too, but it only occurs if the check box
is
> first in the face, put a text in front
> of it and there is no problem. I guess the code for back-field has a
slight
> bug. The code is very small so a fix should be easy.
I've made a fix (will send it to feedback as well):
if 6939838 = checksum mold get in ctx-text 'back-field [
print "ctx-text/back-field fix applied."
set in ctx-text 'back-field func [face /local item] [
all [
item: find face/parent-face/pane face
while [
if head? item [item: tail item]
face <> first (item: back item)
] [
if all [object? item/1 flag-face? item/1 tabbed] [return
item/1]
]
]
none
]
]
Regards,
Brett.