--- ltp	Sun May 12 23:56:26 2002
+++ ltp-0.4	Sun May 12 23:57:14 2002
@@ -23,12 +23,21 @@
 # it accecpts --out ascii and latex
 #
 sub supporters {
+
 	if (!$opt_out || $opt_out =~ /ascii/i) {
+	
 		my %supporters= query_supporters();
-		foreach my $name (keys %supporters) {
-		print "$name \t $supporters{$name}{'email'}\n";
-		}	
-	} elsif ($opt_out =~ /latex/i) {
+		my $length;
+		
+	foreach my $name (keys %supporters) {
+		 if (length($name) > $length) { $length=length($name); }
+	}
+		
+	foreach my $name (keys %supporters) {
+	         #print "$name \t $supporters{$name}{'email'}\n";
+		 printf "%${length}s  %s\n", $name, $supporters{$name}{'email'};
+	}	
+		} elsif ($opt_out =~ /latex/i) {
 		my %supporters= query_supporters();
 		print latex_head('\usepackage{supertabular}');
 		print '\\begin{supertabular}{||c||c||}';