RegisterUserFunc fails when one calls another

[Archens]

I've boiled the issue down to a simple example:

Code:

Public Function Foo(objW)
    Foo = objW.hwnd
End Function

Public Function Bar(objX)
    Bar = objX.Foo()
End Function

RegisterUserFunc "Window", "Foo", "Foo"
RegisterUserFunc "Window", "Bar", "Bar"

msgbox Window("nativeclass:=Shell_TrayWnd").hwnd
msgbox Window("nativeclass:=Shell_TrayWnd").Foo()
msgbox Window("nativeclass:=Shell_TrayWnd").Bar()

UnRegisterUserFunc "Window", "Foo"
UnRegisterUserFunc "Window", "Bar"

The Foo method works the first time, but fails when it's called from inside another RegisterUserFunced method.

Is it my code that's broken, or is it RegisterUserFunc?

Thanks!
Archens