[REBOL] 'within? not found into View 1.2.10 ... ?

From: Christophe:Coussement:mil:be at: 28-Aug-2003 13:00

Hi list,


As I just got the new Encap/Command from Cindy, I wanted to convert an app from [View 
1.2.1.3.1] to [1.2.10.3.1], working under WinNT 4.0 SP6.

Now ... in my interface, each time the func 'wake-event is called, I get this weird error:

make object! [
    code: 300
    type: 'script
    id: 'no-value
    arg1: 'within?
    arg2: none
    arg3: none

    near: [either any [pop-face = event/face within? event/offset win-offset? pop-face pop-face/size] 
    [
            no-btn: false
            if block? get in pop-face 'pane [

                no-btn: foreach item pop-face/pane [if get in item 'action [break/return false] true]
            ]
            if any [all [event/type = 'up no-btn] event/type = 'close] [hide-popup]
            do event
        ] [
            if pop-face/action [
                if not find [move time] event/type [hide-popup]
                do event
            ]
        ]]
    where: 'wake-event
]

The libs %mezz.r and %view.r (requested for building View from Base) are #included.

I tried to:

 - redefine the 'within? func by placing its source in my code, but this approach does 
 not work.

 - #include a dropped system/view object (in the hope the func should be overwritten), 
 but it does not work either...

Has anybody an idea about what's going wrong here ?

Thanks a lot !

==xtof

[1] · 2 · 3 · 4 · 5 · See whole thread