use world-attributes pref-dim instead of world pref-dim* method where applicable

[factor.git] / extra / spheres / spheres.factor

diff --git a/extra/spheres/spheres.factor b/extra/spheres/spheres.factor
index de969e47b63a520cfd20672a1d8a54039a2676b4..819dbe892e861613e18f3d92cf55181b3252870d 100644 (file)
--- a/extra/spheres/spheres.factor
+++ b/extra/spheres/spheres.factor
@@ -196,9 +196,6 @@ M: spheres-world end-world
         [ plane-program>> [ delete-gl-program ] when* ]
     } cleave ;
 
-M: spheres-world pref-dim*
-    drop { 640 480 } ;
-
 :: (draw-sphere) ( program center radius -- )
     program "center" glGetAttribLocation center first3 glVertexAttrib3f
     program "radius" glGetAttribLocation radius glVertexAttrib1f
@@ -307,4 +304,5 @@ MAIN-WINDOW: spheres-window {
             double-buffered
             T{ depth-bits { value 16 } }
         } }
+        { pref-dim { 640 480 } }
     } ;