boids.ui: Add workaround for display glitch

diff --git a/extra/boids/ui/ui.factor b/extra/boids/ui/ui.factor
index f380441960aabc89645df0af7c16d9f227ef212b..38dd9b4f78903a87a645c951cbdf77e005162e72 100755 (executable)
--- a/extra/boids/ui/ui.factor
+++ b/extra/boids/ui/ui.factor
@@ -36,6 +36,7 @@ IN: boids.ui
     dup pos>> gl-translate-2d
         vel>> first2 rect> arg rad>deg 0 0 1 glRotated
     { { 0 5 } { 0 -5 } { 20 0 } } triangle
+    fill-mode
   glPopMatrix ;
 
 : draw-boids ( -- ) boids> [ draw-boid ] each ;
@@ -43,9 +44,7 @@ IN: boids.ui
 : boid-color ( -- color ) { 1.0 0 0 0.3 } ;
 
 : display ( -- )
-  white gl-clear
   boid-color >fill-color
-  2 glLineWidth
   draw-boids ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!