--- ray/src/util/glaresrc.c	1991/03/18 16:06:53	1.3
+++ ray/src/util/glaresrc.c	1991/03/19 09:10:58	1.4
@@ -246,10 +246,12 @@ int	v;
 
 close_allsrcs()			/* done with everything */
 {
-	register struct source	*this;
+	register struct source	*this, *nsrc;
 
-	for (this = curlist; this != NULL; this = this->next)
+	for (this = curlist; this != NULL; this = nsrc) {
+		nsrc = this->next;
 		donesource(this);
+	}
 	curlist = NULL;
 }
 
@@ -288,7 +290,7 @@ register struct source	*sp;
 	donelist = sp;
 	if (verbose)
 		fprintf(stderr,
-	"%s: found source at (%f,%f,%f), solid angle %f, brightness %f\n",
+	"%s: found source at (%f,%f,%f), dw %f, br %f\n",
 			progname, sp->dir[0], sp->dir[1], sp->dir[2], 
 			sp->dom, sp->brt);
 }