[REBOL] Re: Just two ways to the same place?
From: kpeters:otaksoft at: 29-Aug-2007 20:04
Tim & Max ~
so then the script I just wrote below would not
be possible with an anonymous context, right?
Kai
rebol []
;----------------------------------------------
selector: center-face layout [
btn "Module 1" [ unview view/new module-1 ]
btn "Module 2" [ unview view/new module-2 ]
;
btn "# of calls to Module 1" [ notify form m1/c ]
btn "# of calls to Module 2" [ notify form m2/c ]
]
;----------------------------------------------
m1: context [
c: 0
set 'module-1 does [
center-face layout [
text "Module #1"
btn "Back" [ c: c + 1 unview view/new selector ]
]
]
]
;----------------------------------------------
m2: context [
c: 0
set 'module-2 does [
center-face layout [
text "Module #2"
btn "Back" [ c: c + 1 unview view/new selector ]
]
]
]
;----------------------------------------------
view selector
;-------------------- EoS ---------------------
