Fix hang when loading ui.backend.windows

2009-06-18 19:30:17 -05:00 · 2009-06-18 19:30:17 -05:00 · a99f8f5741
parent 97f0a24e45
commit a99f8f5741
1 changed files with 1 additions and 1 deletions
--- a/basis/ui/backend/windows/windows.factor
+++ b/basis/ui/backend/windows/windows.factor
@ -253,7 +253,7 @@ CONSTANT: window-control>ex-style
    window-controls>>
    [ window-control>style symbols>flags ]
    [ needs-sysmenu? [ WS_SYSMENU bitor ] when ]
-    [ has-titlebar? [ WS_POPUP flags bitor ] unless ] tri ;
+    [ has-titlebar? [ WS_POPUP bitor ] unless ] tri ;

 : world>ex-style ( world -- n )
    window-controls>> window-control>ex-style symbols>flags ;