--- trunk/conf/isi/cu-au-count.pl	2009/05/29 21:41:37	1208
+++ trunk/conf/isi/cu-au-count.pl	2009/05/30 15:26:25	1210
@@ -1,9 +1,14 @@
 
 foreach my $cr ( rec_array 'CR' ) {
+	if ( ! $cr->{author} ) {
+		warn "# cr ",dump( $cr );
+		next;
+	}
 	foreach my $au ( rec_array 'AU' ) {
-		row(
-			cited => $cr->{author},
-			au => $au,
+		row( 'cited',
+			cited_au => $cr->{author},
+			from_au => $au,
 		);
+		row( 'authors', au => $au );
 	}
 }