]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/backend/x11/x11.factor
core/basis/extra: use flags{ } in places.
[factor.git] / basis / ui / backend / x11 / x11.factor
index 6b2210704ec9134d9afb8fb7a161735537112ee0..7c63f37a7f5ee3defb6c662d0cefac299378f2a2 100644 (file)
@@ -268,7 +268,7 @@ M: x11-ui-backend set-title ( string world -- )
         dpy get
         root get
         0
-        SubstructureNotifyMask SubstructureRedirectMask bitor
+        flags{ SubstructureNotifyMask SubstructureRedirectMask }
     ] dip XSendEvent drop ;
 
 M: x11-ui-backend (set-fullscreen) ( world ? -- )