--- trunk/MWS_swish.pm	2004/05/07 12:41:16	18
+++ trunk/MWS_swish.pm	2004/05/07 20:52:34	19
@@ -71,7 +71,11 @@
 		push @res_ids, $id;
 
 		foreach my $p (qw(from to cc bcc)) {
-			@{$self->{cache}->{$id}->{$p}} = split(/##/, p($r,$p.'_phrase'));
+			@{$self->{cache}->{$id}->{$p}} = ();
+			foreach my $v (split(/##/, p($r,$p.'_phrase'))) {
+				push @{$self->{cache}->{$id}->{$p}}, $v;
+				$self->add_counter($p,$v);
+			}
 		}
 
 		foreach my $p (qw(subject body date)) {