--- trunk/sender.pl	2005/06/08 14:26:31	55
+++ trunk/sender.pl	2005/06/21 09:41:22	57
@@ -119,7 +119,7 @@
 	foreach my $list (@lists) {
 		print $list->name,": ",$list->from_addr," <",$list->email,">\n";
 		foreach my $u ($nos->list_members( list => $list->name )) {
-			print "\t",$u->{'name'}, " <", $u->{'email'}, ">\n";
+			print "\t",$u->{'name'}, " <", $u->{'email'}, ">",( $u->{'ext_id'} ? ' ['.$u->{'ext_id'}.']' : '' ),"\n";
 		}
 	}