--- deliantra/Deliantra-Client/Client.xs	2006/05/14 22:58:24	1.80
+++ deliantra/Deliantra-Client/Client.xs	2006/05/14 23:19:14	1.81
@@ -1592,10 +1592,10 @@
 void glColor (float r, float g, float b, float a = 1.0)
 	PROTOTYPE: @
         CODE:
-        glColor4ub (MIN ((int)r * 256., 255),
-                    MIN ((int)g * 256., 255),
-                    MIN ((int)b * 256., 255),
-                    MIN ((int)a * 256., 255));
+        glColor4ub (MIN ((int)(r * 255.f), 255),
+                    MIN ((int)(g * 255.f), 255),
+                    MIN ((int)(b * 255.f), 255),
+                    MIN ((int)(a * 255.f), 255));
 
 void glVertex (float x, float y, float z = 0.)
         CODE: