--- ray/src/rt/srcsupp.c	1992/01/15 16:54:50	2.3
+++ ray/src/rt/srcsupp.c	1992/02/26 09:49:37	2.4
@@ -545,7 +545,8 @@ register RAY  *r;
  */
 
 #define  badcomponent(m, r)	(r->crtype&(AMBIENT|SPECULAR) && \
-				!(r->crtype&SHADOW || distglow(m, r)))
+				!(r->crtype&SHADOW || r->rod < 0.0 || \
+					distglow(m, r)))
 
 /* overcount *
  *