--- trunk/sender.pl 2005/05/15 16:29:44 16 +++ trunk/sender.pl 2005/05/15 16:32:36 17 @@ -85,7 +85,7 @@ } foreach my $list (@lists) { - print $list->name,"\n"; + print $list->name," <",$list->email,">\n"; foreach my $user_on_list ($user_list->search(list_id => $list->id)) { my $user = $users->retrieve( id => $user_on_list->user_id ); print "\t",$user->full_name," <", $user->email, ">\n";