steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix gesture logger bug which was breaking UI

db4
Slava Pestov 2008-09-03 04:02:18 -05:00
parent 0f9a707c55
commit 1756e94824
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/ui/gadgets/worlds/worlds.factor
View File

@ -16,7 +16,9 @@ window-loc ;
: find-world ( gadget -- world/f ) [ world? ] find-parent ; : find-world ( gadget -- world/f ) [ world? ] find-parent ;
: show-status ( string/f gadget -- ) : show-status ( string/f gadget -- )
find-world dup [ status>> set-model ] [ 2drop ] if ; find-world dup [
status>> dup [ set-model ] [ 2drop ] if
] [ 2drop ] if ;
: hide-status ( gadget -- ) f swap show-status ; : hide-status ( gadget -- ) f swap show-status ;