--- ray/src/cv/ies2rad.c	1993/12/16 10:01:30	2.10
+++ ray/src/cv/ies2rad.c	1994/05/23 10:45:41	2.11
@@ -660,9 +660,9 @@ makeshape(shp, width, length, height)		/* make source 
 register SHAPE	*shp;
 double	width, length, height;
 {
-	if (illumrad >= MINDIM/2.) {
+	if (illumrad/meters2out >= MINDIM/2.) {
 		shp->type = SPHERE;
-		shp->w = shp->l = shp->h = 2.*illumrad;
+		shp->w = shp->l = shp->h = 2.*illumrad / meters2out;
 	} else if (width < MINDIM) {
 		width = -width;
 		if (width < MINDIM) {